Date dans TextBox

[Bruce68]

Bonjour à tous

J'ai trouvé un calendrier sur le Web qui met la date dans la cellule active de la feuille, ce que je voudrais c'est mettre la date dans le textBox actif de l'userForm1'( L'UserForm pouvant contenir une dizaine de TextBox et pouvoir mettre une date différente dans chaque TextBox mais appeler le calendrier avec un seul bouton, comme dans le fichier joint).

Je vous remercie de votre aide

 

[Si...]

Re : Date dans TextBox

Salut

( L'UserForm pouvant contenir une dizaine de TextBox et pouvoir mettre une date différente dans chaque TextBox

et avec un Module de classe comme dans l'exemple joint ?

 

[Bruce68]

Re : Date dans TextBox

Bonsoir si et le forum

Exellent, merci pour la réponse et le fichier

 

[Bruce68]

Re : Date dans TextBox

Bonsoir à tous

Pour JM27

Le ficher fonctionne avec:NomBoite = Me.ActiveControl.Name ald NomBoite = N° TextBox.

Déclaration de la variable: Public NomBoite As String. dans Module

 

[JM27]

Re : Date dans TextBox

Bonjour
Pour Bruce
C'est exactement la même chose:
2 possibilités:

Tu donnes une valeur numérique à ta textbox lors de l'appel et tu déclares ta variable NomBoite public en byte
UserForm1.Controls("TextBox" & NomBoite).Value = Jour
(Tu en as la preuve dans le post #15)

Ou
tu utilises

Me.ActiveControl.Name qui va te renvoyer le nom complet de la textbox.
et dans ce cas la tu déclares ta variable public en string
et dans ce cas:
UserForm1.Controls(NomBoite).Value = Jour

salut