Comment désigner "génériquemt" 1 userform active ?

Charly88

XLDnaute Occasionnel
Bonjour à tous, un petit problème, a priori, tout simple aujourd'hui... J'ai plusieurs userformes dont certaines textbox ont des noms identiques et sur lesquelles je voudrais effectuer la même action ; donc je me suis dit que j'allais mettre cette action dans un module, de cette manière :



Public Sub Neww()

Sheets('transit').Select

Cells.Range('A2') = Numéro
Cells.Range('B2') = Titre
Cells.Range('C2') = Comment
Cells.Range('G2') = Comboréa.ListIndex
Cells.Range('H2') = Comboacteur.ListIndex
Cells.Range('I2') = Comboactrice.ListIndex

End Sub



Mon idée c'est que les userform 1 2 ou 3 ayant les même 'Numéro, Titre, etc', la même procédure pouvait passer... mais non.
Il ne plante que pour les listindex mais en fait aucune ligne ne fonctionne.

Je n'ai pas trouvé d''ActiveUserform' et ActiveWindow ne fonctionne pas mieux... Y'a-t-il une solution simple ?



Merci d'avance encore une fois :)
 

Discussions similaires

Statistiques des forums

Discussions
312 492
Messages
2 088 938
Membres
103 988
dernier inscrit
Feonix