Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Date dans TextBox

Bruce68

XLDnaute Impliqué
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
 

Pièces jointes

  • Choix Date Textbox.xlsm
    32.6 KB · Affichages: 43
  • Choix Date Textbox.xlsm
    32.6 KB · Affichages: 54

Bruce68

XLDnaute Impliqué
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
 

Pièces jointes

  • Choix Date TextboxM-6.xlsm
    40 KB · Affichages: 55

JM27

XLDnaute Barbatruc
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
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…