[RESOLU Calvus]textbox-usf1 vers textbox-usf2

[Bearn 64]

Bonsoir le Forum,

Puis je demander une aide qui vous paraîtra simple mais je bute.

en cliquent sur C2 du UserForm1 je transféré la valeur Ligne=2 dans le UserForm2 je saisi une valeur numérique ou texte puis clic sur ferme la valeur devant s'ecrire dans CAT2.


Merci de vos réponses.

 

[Calvus]

Bonjour,

C'est bien, mais c'est quoi la question ??

 

[Bearn 64]

Calvus

(clic sur ferme la valeur devant s'ecrire dans CAT2)


Private Sub Fermer_Click()
MsgBox Ligne
UserForm1.Cat1 = UserForm2.Cat
Unload Me
End Sub


Comment dire Userform1.Cat Ligne


Le but etant de faire une boucle qui me permette de passer de CAT1 à CAT3 en passant par la saisie issue de UserForm2


Merci

 

[Calvus]

Re,

si j'ai bien compris ta demande, voici le code :

Private Sub Fermer_Click()
MsgBox(UserForm1.Cat1)
 
For i = 1 To 3
If UserForm1("Cat" & i) = "" Then UserForm1("Cat" & i).Value = UserForm2.Cat.Value: Unload Me: Exit Sub
  Next
  Unload Me
End Sub

A+

 

[Bearn 64]

Calvus

Merci merci et encore merci

se qui me manquait ("Cat" & i)


Ok ok Bonne soirée