Bonjour,
Je reviens vers vous car avec la commande suivante.
Dans mon UserForm cela n'aboutit pas.
Peut-être pourriez-vous me venir en aide et me proposer une solution dans le fichier ci-annexé ?
Merci à l'avance et bonne soirée.
Webperegrino
Je reviens vers vous car avec la commande suivante.
Dans mon UserForm cela n'aboutit pas.
Peut-être pourriez-vous me venir en aide et me proposer une solution dans le fichier ci-annexé ?
Merci à l'avance et bonne soirée.
Webperegrino
VB:
Private Sub UserForm4_Initialize() 'UserForm4_Initialize()
'Affichage de la dernière visite sur XXXXXX
'Si c'est avec un Label
Label1 = Sheets("Feuil1").[$g$4].Text
Label2 = Sheets("Feuil1").[$g$5].Text
'Si c'est avec un TextBox
TexBox1 = Sheets("Feuil1").[$g$4].Text
TexBox2 = Sheets("Feuil1").[$g$5].Text
End Sub
Pièces jointes
Dernière édition: