2 UserForm à l'ouverture, mais...

ziopizza

XLDnaute Occasionnel

• 16 Juillet 2006

• #2

Re : 2 UserForm à l'ouverture, mais...

Bonjour 800vfr13,
Regarde fichier joint un exemple.
Salut
Yves
Excuse moi 800VFR76

 

Pièces jointes

• Classeur1.zip

  9.1 KB · Affichages: 45
• Classeur1.zip

  9.1 KB · Affichages: 49
• Classeur1.zip

  9.1 KB · Affichages: 48

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 16 Juillet 2006

• #3

Re : 2 UserForm à l'ouverture, mais...

Bonjour ziopizza,

C'est presque ca,mais je voudrais que cela ce fasse a l'ouverture du fichier, donc dans "ThisWorkbook"

Comme dans ce fichier.

 

Pièces jointes

• Classeur1.xls

  33 KB · Affichages: 82
• Classeur1.xls

  33 KB · Affichages: 81
• Classeur1.xls

  33 KB · Affichages: 77

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 16 Juillet 2006

• #4

Re : 2 UserForm à l'ouverture, mais...

Re,

Euh j'ai du me tromper la.

Je remet le fichier.

 

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 16 Juillet 2006

• #5

Re : 2 UserForm à l'ouverture, mais...

RE,

Ah ba non alors

 

Pièces jointes

• Classeur1.zip

  9 KB · Affichages: 27
• Classeur1.zip

  9 KB · Affichages: 28
• Classeur1.zip

  9 KB · Affichages: 31

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 16 Juillet 2006

• #6

Re : 2 UserForm à l'ouverture, mais...

Re bonjour,
Autre fichier.
Yves

 

Pièces jointes

• clas2.zip

  9.9 KB · Affichages: 36
• clas2.zip

  9.9 KB · Affichages: 38
• clas2.zip

  9.9 KB · Affichages: 33

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 17 Juillet 2006

• #7

Re : 2 UserForm à l'ouverture, mais...

Re,

Oui sauf que a chaque fois que j'ouvre le fichier il démarre sur la feuille 1 et je voudrais pouvoir l'ouvrir sur la page sur laquelle j'étais lors du dernier enregistrement.

Si c'est possible, sans vouloir t'embéter non plus.

 

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 17 Juillet 2006

• #8

Re : 2 UserForm à l'ouverture, mais...

Bonjour,
Suprime ( Sheets("Feuil1").Activate ) dans le workbook_Open.
Salut
Yves

Private Sub Workbook_Open()
UserForm1.Show
UserForm2.Show
Sheets("Feuil1").Activate
End Sub

 

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 17 Juillet 2006

• #9

Re : 2 UserForm à l'ouverture, mais...

Re,

Non ca marche pas si je fais comme ca, a l'ouverture si je suis sur la feuille 2 j'ai les 2 userforms qui s'ouvrent, et la j'en veux qu'un.

 

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 17 Juillet 2006

• #10

Re : 2 UserForm à l'ouverture, mais...

re bonjour,
Un autre essai.
Yves

 

Pièces jointes

• clas2.zip

  10.9 KB · Affichages: 32
• clas2.zip

  10.9 KB · Affichages: 29
• clas2.zip

  10.9 KB · Affichages: 32

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 18 Juillet 2006

• #11

Re : 2 UserForm à l'ouverture, mais...

Re,

La je comprend plus ton fichier marche comme je veux, mais quand je le met dans mon fichier en faisant un copier coller des macros ca marche aussi, sauf pour l'ouverture sur la feuille 2 ou la il m'ouvre les 2 userforms.

Cela peut-il venir des macro qui sont déja sur dans ces feuilles, j'en doute, je te met le fichier avec les mêmes macro que j'ai dans l'autre fichier.

Pour un fichier ca marche et pour l'autre ca marche pas, pourquoi

 

Pièces jointes

• clas2.zip

  12.9 KB · Affichages: 29
• clas2.zip

  12.9 KB · Affichages: 32
• clas2.zip

  12.9 KB · Affichages: 28

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 18 Juillet 2006

• #12

Re : 2 UserForm à l'ouverture, mais...

Bonjour 800vfr76,
Juste une petite inversion dans les userforms.
Voila le fichier corrigé.
Salut
Yves

 

Pièces jointes

• clas3.zip

  13 KB · Affichages: 48

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 18 Juillet 2006

• #13

Re : 2 UserForm à l'ouverture, mais...

Re,

Ok merci j'ai vu que cela venait des userforms, j'ai refais mon fichier a partir de l'autre et c bon.

Par contre je comprends pas pourquoi si je supprime les userfroms et que j'en importe d'autre cela ne marche plus, pourtant ils ont les mêmes noms, sans doute un espèce de code qu'il ont quand ils sont crées

En tout cas merci de t'être penché sur mon problème.

J'adore ce forum, ou il y a tous ces gents sympas pour dépanner les personnes comme moi.

 

Vote positif 0 Vote négatif

800vfr76

XLDnaute Occasionnel

• 18 Juillet 2006

• #14

Re : 2 UserForm à l'ouverture, mais...

Re,

Par contre n'y a-t-il pas un moyen pour que cela marche si je change le nom des feuilles, sans être obligé d'aller dans la macro pour changer le nom des feuille dans la macro.

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 18 Juillet 2006

• #15

Re : 2 UserForm à l'ouverture, mais...

Bonjour 800..., Ziopizza, bonjour le forum,

Peut-être comme ça :

Code:

If ActiveSheet.Index = 2 Then
Unload UserForm1
End If

 

Vote positif 0 Vote négatif