Fermer un fichier et ouvrir un autre

job75

XLDnaute Barbatruc

• 20 Novembre 2015

• #2

Re : Fermer un fichier et ouvrir un autre

Bonsoir RONIBO,

Code:

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Workbooks.Open ThisWorkbook.Path & "\2.xlsm" 'adapter éventuellement le chemin
ThisWorkbook.Close True
End Sub

A+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 20 Novembre 2015

• #3

Re : Fermer un fichier et ouvrir un autre

Bonsoir Job75,

Merci pour le code qui fonctionne 🙂

Par contre j'ai un truc qui cloche dans ma tête, pourquoi USF de mon premier fichier apparaît sur le fond d'écran de mon deuxième fichier ?

A+

PS : Clic sur le deuxième icône de mon USF (Le E de pôle emploi)

Fichier N°1 = Accueil
Fichier N°2 = Gestion de pôle emploi

 

Pièces jointes

• Job75.zip

  88.4 KB · Affichages: 32
• Job75.zip

  88.4 KB · Affichages: 39

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 20 Novembre 2015

• #4

Re : Fermer un fichier et ouvrir un autre

Re,

Code:

Me.Hide

A+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 20 Novembre 2015

• #5

Re : Fermer un fichier et ouvrir un autre

Re,

C'est vrai que je suis bête, du coup ça corrigé mon problème par contre je n'arrive pas à utiliser ceci :

'Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
' Application.DisplayAlerts = False
' Application.Quit
'End Sub

Cliquez pour agrandir...

Il me dit que le chemin est pas bon bizarrement

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 20 Novembre 2015

• #6

Re : Fermer un fichier et ouvrir un autre

Re,

Cela n'a plus rien à voir avec l'objet de ce fil.

A+

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 20 Novembre 2015

• #7

Re : Fermer un fichier et ouvrir un autre

D'accord merci beaucoup

 

Vote positif 0 Vote négatif