Huidig uur + 2 uren in vba

[tkint]

Beste,

Hoe schrijf in VBA-code dat in een textbox de huidige tijd (uur en minuten) + 2 uren verschijnt bij het openen van een userform?

 

[Joske2000]

Zoiets ?

TextBox1.Value = Now + 0.083333333

Gr,

Joske

 

[tkint]

Beste,

Code functioneert. Bedankt.

 

[OctaFish]

Dat kan natuurlijk netter:

Me.TextBox1.Value = Now + TimeSerial(2, 0, 0)

 

[tkint]

@Octafish,

Ik heb een format-instructie moeten toepassen want ik krijg zowel datum als uur.

 

[OctaFish]

Dat mag natuurlijk altijd; Maar je kunt er ook dit van maken:

Me.TextBox1.Value = Time + TimeSerial(2, 0, 0)