Sauvegarde d'une feuille sur un chemin précis
Bonjour,
J'ai un problème avec mon code, lorsque je l’exécute tout semble marcher mis à part une chose, le fichier ne se met pas au bon endroit au niveau du chemin. Pouvez-vous m'aider svp ?
(Je suis débutant en VBA)
Sub Enregistrer()
Dim mois As String
Dim année As String
Dim extension As String
Dim Chemin As String
Dim nomfichier As String
mois = Sheets("Résultats Indicateurs").Range("D11")
année = Sheets("Résultats Indicateurs").Range("D10")
extension = ".xlsx"
nomfichier = "Indicateurs" & " " & mois & " " & année & extension
Chemin = "C:\Users\sntabla\Documents\Adrien\TESTMACRO"
Sheets("Résultats Indicateurs").Copy
ActiveWorkbook.SaveAs Filename:=nomfichier
ActiveWorkbook.Save
ActiveWorkbook.Close
Exit Sub
End Sub
Plus précisément, le fichier se sauvegarde dans Documents et ne va donc pas "au bout" du chemin (jusqu'à TESTMACRO), avez vous une idée ?
Cordialement
End Sub
Bonjour,
à tester,
ActiveWorkbook.SaveAs Filename:=Chemin & "\" & nomfichierToujours pas... Mais maintenant la feuille se situe dans Adrien ...
Je pense que le problème vient bien de cette ligne mais je n'arrive pas à trouver...
il faut adapter la variable chemin
Chemin = "C:\Users\sntabla\Documents\Adrien\TESTMACRO"
Comment ça ? je ne comprends pas
Je dois changer le chemin ?
C'est bon c'était ce que vous m'avez fait remarqué au premier message, merci beaucoup pour votre rapidité et votre gentillesse
Cordialement