aktiv dato i Excel

spøgsmål ikke forstået !!!

I dag er det den den 17/5-2002. I en række øverst oppe i Excel har jeg en række indeholdende alle datoerne i år.

01-maj 02-maj 03-maj .... 17-maj 18-maj osv.

Jeg vil gerne have at når det er dagsdato(i dag 17/5) så bliver datoen markeret i cellen.

Jeg er heller ikke sikker på hvad du mener, men det jeg umiddelbart kommer til at tænke på, er at lave en betinget formattering der skifter farven på cellen, hvis det er dags dato.

jimse. lige netop. men hvordan gør jeg det ?

Prøv denne her. Du kan modificere den så den passer til dit ark.

--------------------

Public Sub markerDagsDato()

Dim nu As Date
nu = Now()

For Each c In Worksheets("Sheet1").Range("1:1")

If Day(c.Value) = Day(nu) And Month(c.Value) = Month(nu) Then
    c.Select
    With Selection.Interior
        .ColorIndex = 15
        .Pattern = xlSolid
    End With
End If

Next c

End Sub

hmm script sprog, meeeen blackadder, hvordan får jeg puttet det ind i mn regneark ?. og du lave en if på Day ? skal det ikke være på nu istedet for ?

Lav en celle med følgende: =IDAG()

Marker alle de celler du har datoer i og vælg betinget formattering.
Vælg celleværdien er lig med og peg så på den celle du lige lavede.

Men betingelsen for at det virker er at du har brugt datoformat i de celler datoerne står.

Brug betinget formatering
Celleværdi lig med =Idag()

Du kan indsætte den i en Workbook_Open() makro, så den bliver aktiveret
hver gang arket åbnes.

Selve If-sætningen er god nok vil jeg mene.

Ellers kan du prøve at lave noget betinget formatering som jimse foreslår

Den havde jeg lige overset...
Ingen grund til at gøre tingene mere kompliceret end højst nødvendigt  :-)

jiimse: skal jeg vælge celleværdi er eller skal jeg vælge formel er ?. dagsdato er det = date() ?

Under "formel er" skal du indsætte formlen:
=A1=IDAG()

A1 er den celle du står i.

Derefter skal du lige vælge den formatering du ønsker - f.eks. en grå celle.

Formateringen kan så kopieres til alle de celler du ønsker v.h.a. "Indsæt speciel".

Hov, så ikke lige bak's svar, som er identisk med mit.
Betragt venligst mit svar som en kommentar!

Hvordan kopierer jeg formateringen ??????

Jeg får ikke en disse mail, så det kniber lidt at følge med her, men du kopierer bare med formatpenslen. Dobbeltklik på penslen, så den ikke slår fra af sig selv.

.... eller vælg "Kopier" og derefter "Indsæt speciel -> Formater".

takker :-),blackadder: Kan nu godt li din løsning, da jeg er ret vild med at programmere :-)