datum en tijd op basis van celwaarde

[regf]

Hoi.
in bijgevoegd bestand kan ik een opdracht klaar melden door achter de opdracht in kolom dubbel te klikken.
nu wil ik ook nog graag de datum en tijd vermeld zien als men dubbel klikt.
wie kan mij helpen
BVD Reg

 

[edmoor]

En waar moet die datum/tijd dan komen?

 

[regf]

sorry dat staat er idd niet bij, rechts naast de kolom afgewerkt.

 

[VenA]

zo?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Row >= 5 And Target.Row <= 290000 And Target.Column = 8 Then
    Cancel = True
    Target.Value = IIf(Target.Value = "", "ü", "")
    Target.Offset(, 4) = IIf(Target.Value = "", "", Date)
  End If
End Sub

 

[regf]

heb de code in een module geplaatst maar zie geen datum, (krijg ook geen foutmelding)???

 

[VenA]

Dan heb je iets niet goed gedaan.

 

[regf]

Ahh, ik zie wat ik verkeerd heb gedaan, ik had de oude VBA code laten staan.
het werkt idd, harstikke bedankt.
ik meld het af.