Macro sauvegarde
roy
-
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
merci de bien vouloir me depanner commme la plupart des débutant ....
"probleme" pour moi
je voudrais trouver une macro qui d'un clic sur le bouton (ca je sais faire;;;le bouton)
me sauvegarde le fichier SOUS UN AUTRE NOM automatiquement
"probleme" pour moi
je voudrais trouver une macro qui d'un clic sur le bouton (ca je sais faire;;;le bouton)
me sauvegarde le fichier SOUS UN AUTRE NOM automatiquement
3 réponses
-
Bonjour,
Merci de préciser le logiciel utilisé !!!!!
A+
Thierry -
salut thierry
j utilise excel 2002 et toute les macro que je trouve dans les forums ne foonctionne pas, ou sont des bakup
moi je souhaiterais une macro qui me copirais mon modèle
enregistrerais cette copie sous le non d'une cellule de référence
style facture
enregistrement copie faite qu il me réouvre le modèle vierge
merci a +
roy-
Bonsoir,
essaie ça :
Sub Test()
'
' Test Macro
'
'
ActiveWorkbook.SaveAs Filename:=ActiveCell.Value, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub
En espérant que ça te convienne.
A+
Thierry
PS : un grand merci à mon frangin pour la réponse !!!!
-
-
bonjour
je te propose plutôt cette instruction qui te permet de sauver ta facture,
et de continuer à travailler sur le même classeur de base :
ActiveWorkbook.SaveCopyAs ActiveCell.Value
tu peux ainsi faire une série de factures sans avoir à changer
de classeur et en les sauvegardant au fur et à mesure.
si tu mets cette macro dans ta feuille, tu n'a même pas besoin de bouton,
car lorsque tu changes la valeur de ton nom de classeur il est sauvé.
Private Sub Worksheet_Change(ByVal sel As Range)
Select Case sel.address
Case "$A$1" ' la cellule qui contient ton nom de classeur
ActiveWorkbook.SaveCopyAs sel.Value
End Select
End Sub
il te suffit de choisir l'enplacement de la cellule qui contient le nom.
