Utiliser 1 userform pour plusieurs feuill

Signaler
Messages postés
2
Date d'inscription
lundi 10 novembre 2008
Statut
Membre
Dernière intervention
12 novembre 2008
-
Messages postés
577
Date d'inscription
vendredi 26 septembre 2008
Statut
Membre
Dernière intervention
20 novembre 2010
-
Bonjour à tous, j'utilise un userform sur une feuill de calcul excel, un boutton de commande active celui-ci sur excel. j'aimerai utilser ce même userform sur une autre feuill en utilisant un autre boutton de commande. est-ce possible?

Sub Bouton2_QuandClic()


UserForm5.Show
End Sub

CODE DE L'USERFORM

Private Sub CommandButton1_Click()


 Worksheets("Nouvelle Minute").Cells(2, 22) = TextBox1
    Worksheets("Nouvelle Minute").Cells(4, 22) = TextBox2
    Worksheets("Nouvelle Minute").Cells(5, 22) = TextBox3
    Worksheets("Nouvelle Minute").Cells(7, 22) = TextBox4
    Worksheets("Nouvelle Minute").Cells(2, 25) = TextBox5
    Worksheets("Nouvelle Minute").Cells(3, 25) = TextBox6
    Worksheets("Nouvelle Minute").Cells(5, 25) = TextBox7
    Worksheets("Nouvelle Minute").Cells(5, 26) = TextBox8
    Worksheets("Nouvelle Minute").Cells(7, 24) = TextBox9
    Worksheets("Nouvelle Minute").Cells(56, 1) = ComboBox1
    Worksheets("Nouvelle Minute").Cells(57, 1) = TextBox10
    Worksheets("Nouvelle Minute").Cells(58, 1) = TextBox11
    Worksheets("Nouvelle Minute").Cells(59, 1) = TextBox12
   
End Sub
Private Sub UserForm_Initialize()


ComboBox1.ColumnCount = 1


ComboBox1.List() = Array("PL", "SRPL", "PJAC", "GC")


End Sub


Private Sub CommandButton2_Click()
    Unload Me
End Sub

3 réponses

Messages postés
577
Date d'inscription
vendredi 26 septembre 2008
Statut
Membre
Dernière intervention
20 novembre 2010
4
Bonjour antivirius

Pour que ton userform fonctionne sur plusieurs feuilles de calcul, remplace toutes tes instructions
Worksheets("Nouvelle Minute")
par
ActiveSheet

Cela répond-il à ta question ?

Cordialement
Messages postés
2
Date d'inscription
lundi 10 novembre 2008
Statut
Membre
Dernière intervention
12 novembre 2008

Ok merci, si je comprends bien, en remplaçant
Worksheets
par
ActiveSheet
, l'userform fonctionnera sur la feuill active. Merci beaucoup.
Messages postés
577
Date d'inscription
vendredi 26 septembre 2008
Statut
Membre
Dernière intervention
20 novembre 2010
4
Bonjour


Oui, c'est bien ça.


Cordialement