sub test()
Application.Dialogs(xlDialogOpen).Show
var = ActiveWindow.Caption
'je demande de saisir un fichier excel et je voudrais garder son nom 'dans la variable var
end sub
et dans le module 2 :
sub test2()
Call Module1.test
Windows(var).Activate
end sub
Or, si je fais la meme manip au sein d'une meme procédure ca marche
Public nom As String
Sub test()
Application.Dialogs(xlDialogOpen).Show
nom = ActiveWindow.Caption
Application.Dialogs(xlDialogOpen).Show
' ici on a ouvert un autre classeur, qui devient alors le classeur actif
Windows(nom).Activate
'le classeur ouvert en premier lieu, dont le nom a été dans la variable string nom est activé maintenant.