Fermer un fichier excel par macro vba depuis un autre fichier excel

[controlo]

Bonjour ,

J'ouvre un fichier excel depuis un autre fichier excel avec une userform et un bouton,pour sortir de mon second fichier j'ai un bouton dans une feuille qui fait appel à une macro qui contient ceci : Application.Run("gdabsm.xls!Module2.Macro1"). Dans la macro1 du fichier gdabsm.xls j'ai cela :

Sub Macro1()
'
'

'

Workbooks("fdva.xls").Close
Windows("gdabsm.xls").Activate
Workbooks("gdabsm.xls").Activate
UserForm1.Show

End Sub

Le problème est que le classeur excel fdva.xls se ferme bien ,mais les lignes suivantes ne s'executes pas, c'est à dire quand final je n'ai pas la userform1 qui s'affiche.Alors si quelqu'un pouvais m'aider ce serait sympa !!!!

 

[roro69]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Bonjour;
Ton userform1 est actif dans quelle classeur.........
A++

 

[roro69]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Bonjour
A VOIR:

gdabsm.xls
qui contient le userform
sub mamacro()
userform1.show(0)
end sub

depuis fdva.xls

sub lotremacro()

Windows("gdabsm.xls").Activate
Workbooks("gdabsm.xls").Activate
application.run "gdabsm.xls!mamacro"
Workbooks("fdva.xls").Close
end sub

A++

 

[controlo]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Mon userform est actif dans mon classeur gdabsm.xls

 

[roro69]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Alors pourquoi pas mettre dans la procédure Workbook_Activate comme ceci

Private Sub Workbook_Activate()
Userform1.show(0)
End Sub

A++

 

[controlo]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

roro 69

J'ai mis le userform1.show dans le private sub worrbook_activate et ca ne marche tjrs pas

A++

 

[roro69]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Bonjour
peut tu soit mettre toute ta procédure ou un morceau de fichier
A++

 

[controlo]

Re : Fermer un fichier excel par macro vba depuis un autre fichier excel

Grand merci à toi RORO69 j'ai essayé ta solution suivante et ça marche !!!!!!!

A+ sur le Forum et bonne journée à toi.


gdabsm.xls
qui contient le userform
sub mamacro()
userform1.show(0)
end sub

depuis fdva.xls

sub lotremacro()

Windows("gdabsm.xls").Activate
Workbooks("gdabsm.xls").Activate
application.run "gdabsm.xls!mamacro"
Workbooks("fdva.xls").Close
end sub