userform affiché en permanence

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #2

Re : userform affiché en permanence

J'ai mis le code :

ça marche quand je change de dossier (deactivate) mais quand je reviens sur le dossier (activate), il stipule une erreur

Private Sub Workbook_Activate()
UserForm1.Show ' ICI
End Sub

Private Sub Workbook_Deactivate()
Unload UserForm1
End Sub

@

 

Dernière édition: 17 Août 2007

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #3

Re : userform affiché en permanence

mon erreur vient de mon activation de dossier par macro .

Dans dossier données.xls, pour retourner dans le dossier D*.xls

Private Sub CommandButton1_Click()
Windows(Me.ComboBox1.Value).Activate
Unload UserForm3
End Sub

et c'est pour ça que ça marche pas , mais pourquoi ?

dossier D*.xls
Private Sub Workbook_Activate()
UserForm1.Show
End Sub

@ merci

 

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #4

Re : userform affiché en permanence

bonsoir
est ce que ce soir je vais avoir pus de chance . . .

merci geraldine

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 17 Août 2007

• #5

Re : userform affiché en permanence

Bonjour,

J'ai pris ton code :

Option Explicit

Private Sub Workbook_Activate()
UserForm1.Show
End Sub

Private Sub Workbook_Deactivate()
Unload UserForm1
End Sub

Cliquez pour agrandir...

que j'ai placé dans ThisWorkBook et mis le ShowModal à False

et cela fonctionne chez moi 😕

Peux-tu essayer avec ce fichier et en ouvrant un autre fichier ?

A+

 

Dernière édition: 10 Avril 2008

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #6

Re : userform affiché en permanence

bonsoir jcgl,

oui ça marche si tu passe par exemple par les onglets d'excel dans la barre de windows (en bas). Mais je passe d'un dossier à l'autre par lintermediaire d'une userform et une combobox ainsi qu'un bouton et le code ci-dessous

Private Sub CommandButton1_Click()
Windows(Me.ComboBox1.Value).Activate
Unload UserForm3
End Sub

et là il bug au niveau de

Private Sub Workbook_Activate()
UserForm1.Show ' ICI
End Sub

@

 

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #7

Re : userform affiché en permanence

et pour completer,les infos por m combobx

Private Sub UserForm_Initialize()
For i = 1 To Application.Workbooks.Count
x = Application.Workbooks.Item(i).Name
Me.ComboBox1.AddItem x
Next
End Sub

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 17 Août 2007

• #8

Re : userform affiché en permanence

Re,

Peux-être serait-il judicieux, pour éviter de tourner en rond, de joindre ton fichier 😛

A+

 

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #9

Re : userform affiché en permanence

en deux fois j'ai pas de zip sur cet ordi

 

Pièces jointes

• gege01.xls

  37 KB · Affichages: 57

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #10

Re : userform affiché en permanence

et le second fichier

 

Pièces jointes

• gege02.xls

  36.5 KB · Affichages: 58

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 17 Août 2007

• #11

Re : userform affiché en permanence

Bonsoir Geraldine, JC,

Pour info....

Pas de Zip, t'es pas encore sous Win 3.1... alors...

Clic droit sur ton fichier et Envoyer vers/Dossier compressé.... et c'est bon....

Bonne soirée

 

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #12

Re : userform affiché en permanence

il faut ouvrir les 2 fichiers, et sur gege01 tu as un bouton, et tu arrives a une combobox quite donne la liste des dossiers, tu clic sur le dossier gégé02 et bug, et je menvois pour ecrire mon ordinateur portable est lent a l'ecriture... lettre manquante etc ...
merci

 

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #13

Re : userform affiché en permanence

bonsoir jeanpierre et oui j'avais pas vu, entre vista et excel 2007 ... rrrrrrrrrr

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 17 Août 2007

• #14

Re : userform affiché en permanence

Re,

Si j'ai bien compris ta demande....

J'ai testé chez moi et cela fonctionne

A+

 

Dernière édition: 10 Avril 2008

Vote positif 0 Vote négatif

G

Geraldine

XLDnaute Occasionnel

• 17 Août 2007

• #15

Re : userform affiché en permanence

sans rien modifié ?

 

Vote positif 0 Vote négatif