Z
ZX-6R
Guest
Bonjour, je souhaite créer une macro dans un fichier qui me permettra de faire des impressions de plusieurs fichiers excel différents.
Mon problème est que lorsque ma macro ouvre un fichier, excel me demande si je veux mettre à jour les liens.
Comment faire pour que la réponse soit automatiquement NON.
Idem à la fermeture du fichier à imprimer, comment faire pour que la réponse à la question "voulez vous sauvegarder soit toujours négative..?
Voila ma macro :
Sub ServiceGestion()
' ouvrir le fichier
Workbooks.Open Filename:= _
chemin & "COMP 2005\COMP 5 HFM.xls"
' impression des onglets
Windows("COMP 5 HFM.XLS").Activate
Sheets("RNM GISI").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Windows("Impression des books.xls").Activate
Sheets("Feuil1").Select
' fermer le fichier
Windows("COMP 5 HFM.xls").Activate
ActiveWindow.Close
Range("G18").Select
End Sub
La partie impression des onglets sera assez grosse quand la macro sera finie, il me serait donc très pratique de lancer la macro et de la laisser tourner sans avoir besoin de cliquer sur non toutes les 10 secondes.
Un grand merci a ceux qui peuvent m'aider
Mon problème est que lorsque ma macro ouvre un fichier, excel me demande si je veux mettre à jour les liens.
Comment faire pour que la réponse soit automatiquement NON.
Idem à la fermeture du fichier à imprimer, comment faire pour que la réponse à la question "voulez vous sauvegarder soit toujours négative..?
Voila ma macro :
Sub ServiceGestion()
' ouvrir le fichier
Workbooks.Open Filename:= _
chemin & "COMP 2005\COMP 5 HFM.xls"
' impression des onglets
Windows("COMP 5 HFM.XLS").Activate
Sheets("RNM GISI").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Windows("Impression des books.xls").Activate
Sheets("Feuil1").Select
' fermer le fichier
Windows("COMP 5 HFM.xls").Activate
ActiveWindow.Close
Range("G18").Select
End Sub
La partie impression des onglets sera assez grosse quand la macro sera finie, il me serait donc très pratique de lancer la macro et de la laisser tourner sans avoir besoin de cliquer sur non toutes les 10 secondes.
Un grand merci a ceux qui peuvent m'aider