Enregistrer par macro 1 Fcd avec nom changé.

Bonjour à tous,
Je cherche à enregistrer la feuille de calcul présente à l'écran, avec un nom différent sur le bureau en utilisant la macro ci-dessous:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

Sub ENREGISTRER() ' ' ENREGISTRER Macro ' 'On copie le nom du fichier composé situé X32:Y32   Range("X32:Y32").Select Selection.Copy   'On en fait un collage spécial en B1   Range("B1").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False   'On dimensionne les variables utilisées pour la sauvegarde   Dim extension As String, nonfichier As String Dim chemin As String extension = ".xlsm" chemin = "C:\bureau\" nomfichier = Range("B1").Value   'On construit la formule de sauvegarde et on l'exécute   ActiveWorkbook.SaveAs Filename:=chemin & nomfichier & extension   End Sub

---

J'obtiens le message suivant:

Erreur d'exécution 1004
Microsoft ne peut pas accéder au fichier
"C:\bureau\A........

Qui pourra me dire ce qui ne va pas dans mon code?
Ayez de la patience, DÉBUTANT. Merci

Bonjour,

Pour commencer, apprends à mettre tes codes entre balises "#"

ensuite, reduis ton code, le début par exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub ENREGISTRER() Dim extension As String, nomfichier As String Dim chemin As String 'On copie le nom du fichier composé situé X32:Y32   Range("X32:Y32").Copy   'On en fait un collage spécial en B1   Range("B1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False .......

---

ensuite, tu dis ne vouloir enregistrer que la feuille active dans un nouveau classeur, si le classeur actif n'a qu'une feuille, pas de problème en vérifiant ta syntaxe :

Code:

---

chemin = "C:\bureau\"

---

'je ne suis pas sur que ça soit ça, chez moi, ça serait :

Code:

---

chemin = "C:\Users\Dominique\Desktop"

---

enfin regardes si B1 ne comporte pas de signes interdits dans le nom à donner au fichier tel que "\".

Regardes déjà tout ça

A l'attention de Casefayer.
Bonjour et merci pour ta réponse.
J'ai bien suivi tes conseils et tout fonctionne comme je le souhaite. C'était le chemin indiqué qui posait problème: j'ai adapté à mon besoin C:\Utilisateurs\Claude\Bureau.
Par contre il me reste une question concernant les balises (#) : C'est quoi? comment faire?
Y a t-il sur le site un article traitant le sujet?
Merci encore pour ton aide.

Bonjour le forum, Clavereli,
Quand tu rédiges un message et que tu veux intégrer un code, mets le entre balises, regardes juste au-dessus de ton message le signe "#", selectionnes ton code et cliques sur "#", sinon avant d'intégrer ton code cliques sur "#" et colles ton code si bien sur tu l'as copié.

Bonne journée et bon courage