Différence Saveas et Savecopyas

Résolu/Fermé
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - Modifié par crapoulou le 26/05/2016 à 09:22
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - 26 mai 2016 à 10:53
Bonjour,

j'ai un petit soucis de programmation avec le code suivant

Sub Sauvegarde_sur_ordre()
Dim chemin As String
Dim fichier As String

chemin = Range("Chemin").Text

fichier = Range("Nom_Classeur").Text & " " & "le" & " " & Format(Now, "dd-mm-yyyy" & " à " & _"hh""h""mm") & " " & "" & ".xlsx"


Application.DisplayAlerts = False
ActiveWorkbook.SaveAs chemin & fichier, FileFormat:=xlOpenXMLWorkbook
End Sub



Quand j'utilise saveas j'ai un enregistrement qui s'effectue comme un "enregistrer sous"
mais avec savecopyas ça ne fonctionne pas et ce qui m'interesse c'est une copie.

Auriez vous une solution ?

Par avance merci


1 réponse

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
26 mai 2016 à 10:48
Bonjour
en allant dans l'aide....



et:


0
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 1
26 mai 2016 à 10:53
Bonjour et merci Michel

Sauf que je pense qu'il y a un soucis avec ma façon de rédiger puisque lorsque je remplace le saveas par savecopyas j'ai un message d'erreur.

Mon chemin et le nom du ficher sont des cellules nommées.
0