Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketDato i celle

 Besvar Besvar
Forfatter
Torben57 Se dropdown
Forum Begynder
Forum Begynder
Avatar

Medlem: 17.Mar.2019
Land: Danmark
Status: Offline
Point: 14
Direkte link til dette indlæg Emne: Dato i celle
    Sendt: 01.Jul.2019 kl. 08:49
Hej.
jeg mangler lidt hjælp og forklaring.

Jeg har lavet dette til at indsætte den aktuelle dato i celle "C4"
(indsat i ThisWorkbook)

Private Sub Workbook_Open()

  Range("C4").Find(Empty, LookIn:=xlValues).Select

  ActiveCell = Format(Now(), "dd-mm-yy")

End Sub


Det virker fint men er arket gemt og åbnes en anden dag slettes den gamle dato før den aktuelle date sættes ind.

Hilsen Torben Jensen 



Til top



Til top
Kurt Kubik Se dropdown
Sølv bruger
Sølv bruger


Medlem: 18.Feb.2012
Status: Offline
Point: 209
Direkte link til dette indlæg Sendt: 04.Jul.2019 kl. 23:57
Hvad er dit sprøgsmål?


Hej fra Lars (Kurt Kubik)
Til top
icet Se dropdown
Bronze bruger
Bronze bruger


Medlem: 08.Nov.2013
Status: Offline
Point: 95
Direkte link til dette indlæg Sendt: 06.Jul.2019 kl. 08:43
Hej prøv evt. denne kode


Private Sub Workbook_Open()

If IsEmpty(Range("C4").Value) Then
        Range("C4").Value = Format(Now(), "dd-mm-yy")
End If

End Sub

Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk