Excel 2007 - macro sauvegarde auto

Résolu
Eaheru Messages postés 205 Statut Membre -  
Eaheru Messages postés 205 Statut Membre -
Bonjour,

Je souhaites intégrer à une macro VB, une instruction qui me permettra de sauver mon fichier Excel 2007 en cours dans un autre répertoire tout en changeant son nom de "test.xls" à "test_datedujourcourant.xls".

Quelqu'un aurait une piste pour cette concaténation du nom ?

Merci de votre aide :)

3 réponses

  1.
    lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjour, 
    Sub VVV()
Dim Chemin As String, D As String
    D = Replace(Date, "/", "-")
    Chemin = ThisWorkbook.Path & "\"
    ThisWorkbook.SaveCopyAs Chemin & "Test_" & D & ".xls"
End Sub

    A+
    1
  2. Eaheru Messages postés 205 Statut Membre 20
     
    Bonjour et merci :)

    pour bien comprendre, cette macro fait bien un "SaveAS" avec le nouveau nom sous le même répertoire que le fichier originel ?
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Salut,
      Salut Lermitte222,
      Je m'incruste 2 secondes si vous le permettez...
      Dans : 
      Chemin = ThisWorkbook.Path & "\"

      ThisWorkbook.Path signifie : chemin d'accès de ce classeur
      Quant au nouveau nom, il est définit par : 
      "Test_" & D &
      0
  3. Eaheru Messages postés 205 Statut Membre 20
     
    Parfait , j'ai modifié les chemins de sauvegarde, ca marche impeccablement !

    Merci à vous 2 !!! :)
    0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses