Enregistrement auto
Le
Daniel
re Bonjour à tous!
Je cherche à sauvegarder mon fichier sous un répertoire spécifique et avec
le nom de ma feuille active. L'enregistrement doit se faire dans le rep :
I:\LOGISTIQUE\ETIQUETTES\APPLICATION\GESTION DES ETIQUETTES\CHILI
Mais en fait ce chemin d'acces est différent selon les cas donc se sont des
variables :
La première partie (I:\LOGISTIQUE\ETIQUETTES\APPLICATION\GESTION DES
ETIQUETTES) se trouve sur la feuille lien en cellule A4!
La deuxième partie (CHILI) est une variable qui se trouve sur la feuille
active, cellule C2.
La code que j'ai fait ne marche pas ! pourquoi??
Sub testlien()
ActiveWorkbook.SaveAs filename:= _
Range("Lien!A4") & Range("C2") & "\" & ActiveSheet.Name & ".xls"
End Sub
Merci de votre réponse
Je cherche à sauvegarder mon fichier sous un répertoire spécifique et avec
le nom de ma feuille active. L'enregistrement doit se faire dans le rep :
I:\LOGISTIQUE\ETIQUETTES\APPLICATION\GESTION DES ETIQUETTES\CHILI
Mais en fait ce chemin d'acces est différent selon les cas donc se sont des
variables :
La première partie (I:\LOGISTIQUE\ETIQUETTES\APPLICATION\GESTION DES
ETIQUETTES) se trouve sur la feuille lien en cellule A4!
La deuxième partie (CHILI) est une variable qui se trouve sur la feuille
active, cellule C2.
La code que j'ai fait ne marche pas ! pourquoi??
Sub testlien()
ActiveWorkbook.SaveAs filename:= _
Range("Lien!A4") & Range("C2") & "\" & ActiveSheet.Name & ".xls"
End Sub
Merci de votre réponse
Poser une question
Il semble manquer un entre les 2 valeurs des cellules
ActiveWorkbook.SaveAs filename:= _
Range("Lien!A4") & "" & Range("C2") & "" & ActiveSheet.Name & ".xls"
Michel