Format heure "hh:mm" dans un textbox et cellule

[Guigui]

Hello le forum,

Dans 2 textbox, je voudrai saisir les heures et minutes d'un horaire

Ensuite, je regroupe c'est 2 value pour que dans ma cellule s'affiche :
HH:MM

[A1] = TextBox1 & ':' & TextBox2

Voila ca c fait ..
par contre je souhaite qu'a l'ouverture de mon Userform, la valeur de A1 soit separer dans textbox1 et textbox2 (pour les Heure et les Minutes)

je fais donc ceci :

Private Sub UserForm_Initialize()
TextBox1 = Left(Range('A1'), 2)
TextBox2 = Right(Range('A1'), 2)
End Sub

Mais textbox1 prend alors la valeur '0,' et textbox2 des chiffres
J'ai beau mettre une commande de format deavnt ca ne change rien ...

J'ai donc besoin d'un ti coup de pouce ...

Merci d'avance pour votre aide
A+
Guillaume

ps: je ne peut pas joindre de fichier, je suis au taf et ca ne passe pas !! sorry

 

[wape]

Bonjour Guigui et le forum,

Essaye avec :

Private Sub UserForm_Initialize()

TextBox1 = Format(Range('A1'), 'hh')

TextBox2 = Format(Range('A1'), 'nn')

End Sub

wape

 

[Guigui]

Bonjour Wape,

Je tiens à m'excuser de ne pas t'avoir répondu suite à ton aide...

Je n'avais plus de connexion internet chez moi (4 mois durant) et à mon travail difficile d'avoir un ti moment pour te répondre ...

Merci encore, ta solution ma pourtant bien aidé...

A+
Guillaume