enregistrement multiple

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 07/10/2010 par 4glcat-caf2
'

'
ActiveCell.FormulaR1C1 = "smgsdgls"
Range("A2").Select
ActiveWorkbook.SaveAs Filename:= _
"D:\UTILISATEURS\4glcat-caf2\Mes documents\Essai.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

ActiveWorkbook.SaveAs Filename:= _
"Z:\Essai.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

ActiveWorkbook.SaveAs Filename:= _
"\\160.12.128.10\Partage_4GLCAT\PRIVE\DRH PRIVE\DRH BRRCP CAF\Essai.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False



End Sub

bonjour,

j'ai creer cette macro pour me permettre d'enregistrer une feuille de calcul sur ma machine en local et sur le réseau en meme temps, lorsque je fais l'enregistrement en utilisant le mappage réseau donc en utilisant Z:\"nom du fichier" cela fonctionne mais lorsque je veux passer par l'adresse réseau j'ai une erreur 1004.
je voudrais passer par l'adresse réseau car ce fichier est en partage et le mappage n'est pas forcement sur la lettre Z pour tous les utilisateurs

quelqu'un aurait'il une solution

merci de votre aide 🙂