Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel VBA - sauver en renommant un classeur dans Mes documents

VBA - sauver en renommant un classeur dans Mes documents

4 réponses
Avatar
twinley
Bonsoir,

Je veux sauver en renommant un classeur.
J'ai la mauvaise idée (et l'impératif) de vouloir le placer dans Mes
documents.
XL ne semble pas aimer l'espace après Mes.
La même sub vers c:\2004Carole.xls roule sans erreur 1004.

B1 = 2004
A1 = Carole

Sub saveas()
Path = "C:\Mes documents\"
myFilename = Path & Sheets("feuil1").[B1] & Sheets("feuil1").[A1] &
".XLS"
ActiveWorkbook.saveas Filename:=myFilename
End Sub

Existe-il une ruse pour le forcer à aller dans le sous rep C:\Mes documents
?

Merci pour l'aide

--
à+twinley
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
twinley
oups, j'ai trouvé

C:Documents and SettingsMapomMes documents

j'ai fait mon intéressant top tôt, désolé pour le dérangement.

--
à+twinley
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:

Bonsoir,

Je veux sauver en renommant un classeur.
J'ai la mauvaise idée (et l'impératif) de vouloir le placer dans Mes
documents.
XL ne semble pas aimer l'espace après Mes.
La même sub vers c:2004Carole.xls roule sans erreur 1004.

B1 = 2004
A1 = Carole

Sub saveas()
Path = "C:Mes documents"
myFilename = Path & Sheets("feuil1").[B1] & Sheets("feuil1").[A1] &
".XLS"
ActiveWorkbook.saveas Filename:=myFilename
End Sub

Existe-il une ruse pour le forcer à aller dans le sous rep C:Mes
documents

?

Merci pour l'aide

--
à+twinley




Avatar
sabatier
bonsoir twinley
peut-être parce qu'il y a un intervalle entre Mes et Documents...
essaie en mettant "Mes Documents"...
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:

Bonsoir,

Je veux sauver en renommant un classeur.
J'ai la mauvaise idée (et l'impératif) de vouloir le placer dans Mes
documents.
XL ne semble pas aimer l'espace après Mes.
La même sub vers c:2004Carole.xls roule sans erreur 1004.

B1 = 2004
A1 = Carole

Sub saveas()
Path = "C:Mes documents"
myFilename = Path & Sheets("feuil1").[B1] & Sheets("feuil1").[A1] &
".XLS"
ActiveWorkbook.saveas Filename:=myFilename
End Sub

Existe-il une ruse pour le forcer à aller dans le sous rep C:Mes
documents

?

Merci pour l'aide

--
à+twinley




Avatar
twinley
Bonsoir jps,

Exact, on contourne en mettant le chemin complet.
J'ai dégainé ma question trop vite. Y a des soirs comme ça...

--
à+twinley
"sabatier" a écrit dans le message
de news:
bonsoir twinley
peut-être parce qu'il y a un intervalle entre Mes et Documents...
essaie en mettant "Mes Documents"...
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:

Bonsoir,

Je veux sauver en renommant un classeur.
J'ai la mauvaise idée (et l'impératif) de vouloir le placer dans Mes
documents.
XL ne semble pas aimer l'espace après Mes.
La même sub vers c:2004Carole.xls roule sans erreur 1004.

B1 = 2004
A1 = Carole

Sub saveas()
Path = "C:Mes documents"
myFilename = Path & Sheets("feuil1").[B1] & Sheets("feuil1").[A1] &
".XLS"
ActiveWorkbook.saveas Filename:=myFilename
End Sub

Existe-il une ruse pour le forcer à aller dans le sous rep C:Mes
documents

?

Merci pour l'aide

--
à+twinley








Avatar
sabatier
merdum et moi qui croyais t'avoir aidé...faut dire que depuis que daniel J
m'a appris à parler le DOS couramment, je ne vis que pour ça, même qu'un
bon copain voisin et informaticien à la fois m'a dit "il était temps car
bientôt, le DOS disparaîtra"....je crois que le prieur de l'abbaye de taizé
aurait appelé cela "la dynamique du provisoire"...un coup à en avoir foi
dans le DOS...
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:
oups, j'ai trouvé

C:Documents and SettingsMapomMes documents

j'ai fait mon intéressant top tôt, désolé pour le dérangement.

--
à+twinley
"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:

Bonsoir,

Je veux sauver en renommant un classeur.
J'ai la mauvaise idée (et l'impératif) de vouloir le placer dans Mes
documents.
XL ne semble pas aimer l'espace après Mes.
La même sub vers c:2004Carole.xls roule sans erreur 1004.

B1 = 2004
A1 = Carole

Sub saveas()
Path = "C:Mes documents"
myFilename = Path & Sheets("feuil1").[B1] & Sheets("feuil1").[A1] &
".XLS"
ActiveWorkbook.saveas Filename:=myFilename
End Sub

Existe-il une ruse pour le forcer à aller dans le sous rep C:Mes
documents

?

Merci pour l'aide

--
à+twinley