Timestamp in cel voegen met VO

[Edwin008]

Hallo,

Is het mogelijk om met voorwaardelijke opmaak cellen te voorzien van huidige tijd?

Voorbeeld:

Wanneer in kolom A1 enz gegevens worden getypt , zou er in kolom B1 enz automatisch de huidige tijd moeten verschijnen.

Het lukt mij niet met VO.

Kan iemand mij helpen aub?

Alvast heel erg bedankt!!

 

[edmoor]

Celinhoud is geen opmaak dus dat zal met VO inderdaad niet gaan, maar misschien dat iemand er een idee over heeft.
Met een simple VBA functie achter dat blad is het geen enkel probleem. Zet in de eigenschappen van kolom B de gewenste tijd opmaak en dit achter het blad:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Value <> "" Then Cells(Target.Row, 2) = Time
    End If
End Sub

 

[Edwin008]

Hoi Edmoor, het werkt fantastisch!
Nogmaals bedankt man!! :thumb::thumb: