OVH Cloud OVH Cloud

Macro Enregistrer sous

16 réponses
Avatar
Phil221178
Bonjour à tous,

Je réalise une feuille sous Excel 2000.
Je souhaiterai créer une macro me permettant d'enregistrer le fichier
suivant ces points :

- Nom de fichier en fonction d'une valeur du tableau
- dans un dossier qui porte le même nom que l'une des valeurs du tableau.

Par exemple : si dans mon tableau, j'ai A1='Barcelone ; A2='360, je souhaite
que mom fichier soit enregistrer ainsi :

C:\mes documents\Barcelone\360.xls
En sachant que le dossier Barcelone est déjà créé...

Merci d'avance!

Un saludo

Philippe

6 réponses

1 2
Avatar
twinley
Hey, t'es pas manchot quand tu utilises la langue de Cervantès...

--
à+twinley
a écrit dans le message de
news:05dd01c4b77b$202e4460$
-----Mensaje de origen ;o)))-----
pobrecito papou...
Supuse en efecto que esto debía ser lo que dijiste,

pascual, porque, Aunque la lengua de cervantès no es
demasiado extraña para mí, soy Jamás ofrecido por eso
Windows en español si FS lee esta cuerda fina, Esto
debería recordarle ciertas memorias que mi nobleza de
corazón y mi Grandor de ame me prohiben moverme aquí...
jps


Recordatorio NON ????
je ne signe pas c'est entre-nous
;-))))

Avatar
® © ¿
® © ¿
j'y suis pour rien c'est REVERSO !!!
Modeste avec çà !!!

-----Message d'origine-----
Hey, t'es pas manchot quand tu utilises la langue de
Cervantès...


--
à+twinley
a écrit dans le
message de

news:05dd01c4b77b$202e4460$
-----Mensaje de origen ;o)))-----
pobrecito papou...
Supuse en efecto que esto debía ser lo que dijiste,

pascual, porque, Aunque la lengua de cervantès no es
demasiado extraña para mí, soy Jamás ofrecido por eso
Windows en español si FS lee esta cuerda fina, Esto
debería recordarle ciertas memorias que mi nobleza de
corazón y mi Grandor de ame me prohiben moverme aquí...
jps


Recordatorio NON ????
je ne signe pas c'est entre-nous
;-))))


.




Avatar
jps
quel charlot! (en espagnol : qué charlot!...en faisant tcheu pour le "ch" et
en prononçant le "t" à la fin)
jps (qui commence à comprendre pourquoi la france tombe en panne...et pas
seulement chez le créateur d'automobiles)

a écrit dans le message de
news:05dd01c4b77b$202e4460$
-----Mensaje de origen ;o)))-----
pobrecito papou...
Supuse en efecto que esto debía ser lo que dijiste,

pascual, porque, Aunque la lengua de cervantès no es
demasiado extraña para mí, soy Jamás ofrecido por eso
Windows en español si FS lee esta cuerda fina, Esto
debería recordarle ciertas memorias que mi nobleza de
corazón y mi Grandor de ame me prohiben moverme aquí...
jps


Recordatorio NON ????
je ne signe pas c'est entre-nous
;-))))

Avatar
twinley
:o)

--
à+twinley
"jps" a écrit dans le message de
news:
quel charlot! (en espagnol : qué charlot!...en faisant tcheu pour le "ch"
et

en prononçant le "t" à la fin)
jps (qui commence à comprendre pourquoi la france tombe en panne...et pas
seulement chez le créateur d'automobiles)

a écrit dans le message de
news:05dd01c4b77b$202e4460$
-----Mensaje de origen ;o)))-----
pobrecito papou...
Supuse en efecto que esto debía ser lo que dijiste,

pascual, porque, Aunque la lengua de cervantès no es
demasiado extraña para mí, soy Jamás ofrecido por eso
Windows en español si FS lee esta cuerda fina, Esto
debería recordarle ciertas memorias que mi nobleza de
corazón y mi Grandor de ame me prohiben moverme aquí...
jps


Recordatorio NON ????
je ne signe pas c'est entre-nous
;-))))





Avatar
jps
et moi je suis le chef des cons, phil?
et ce papou, tu crois qu'il aurait eu una palabrita pa mi? penses-tu...quel
égoïste!
jps

"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:
Re
De rien, ça fait toujours plaisir !
T'es un chef
Bof !


Cordialement
Pascal

"Phil221178" a écrit dans le
message

de news:
Merci Papoou.....

C'etait ce qu'il fallait faire!!

T'es un chef

"papou" escribió:

Re
Comme l'indique notre ami Jean-Paul, il est possible que le nom de ta
feuille ne soit pas Feuil1 (regarde ma remarque en début de mon
message).



Sinon, ma (petite) connaissance de l'espagnol, me ferait penser à un
message
du type "Indice en dehors de la plage" mais Jean-Paul serait
probablement



confirmer cela ;-)
Donc pour avancer, il faut modifier les lignes comportant la mention
"Feuil1" par le nom de l'onglet qui contient les éléments servant à
enregistrer ton classeur.
A voir...
Saludos
Cordialement
Pascal

"Phil221178" a écrit dans le
message
de news:
Re-bonjour,

Merci pour cette réponse.
Quand je lance la macro, Excel me dit :

"Subindice fuera del intervalo" (Packoffice en espagnol)

Que veut dire ce message, et que dois-e modifier

"papou" escribió:

Bonjour
Modifier éventuellement avec le nom de la feuille :
Sub EnregistrerAvecParam()
Const Rp As String = "C:Mes documents"
Dim SousRp As String
Dim NomFic As String
SousRp = Worksheets("Feuil1").Range("A1").Value
NomFic = Worksheets("Feuil1").Range("A1").Value
If Rp = "" Or NomFic = "" Then MsgBox "Un paramètre est manquant" _
, vbInformation, "Impossible": Exit Sub
ThisWorkbook.SaveAs Rp & SousRp & Application.PathSeparator _
& NomFic & ".xls"
End Sub

Cordialement
Pascal

"Phil221178" a écrit dans le
message
de news:
Bonjour à tous,

Je réalise une feuille sous Excel 2000.
Je souhaiterai créer une macro me permettant d'enregistrer le
fichier
suivant ces points :

- Nom de fichier en fonction d'une valeur du tableau
- dans un dossier qui porte le même nom que l'une des valeurs du
tableau.

Par exemple : si dans mon tableau, j'ai A1='Barcelone ; A2='360,
je






souhaite
que mom fichier soit enregistrer ainsi :

C:mes documentsBarcelone360.xls
En sachant que le dossier Barcelone est déjà créé...

Merci d'avance!

Un saludo

Philippe





















Avatar
papou
Eres el mejor Juan Pablo, lo sabes no?
Cordialmente
Pascal

"jps" a écrit dans le message de
news:
et moi je suis le chef des cons, phil?
et ce papou, tu crois qu'il aurait eu una palabrita pa mi?
penses-tu...quel
égoïste!
jps

"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:
Re
De rien, ça fait toujours plaisir !
T'es un chef
Bof !


Cordialement
Pascal

"Phil221178" a écrit dans le
message

de news:
Merci Papoou.....

C'etait ce qu'il fallait faire!!

T'es un chef

"papou" escribió:

Re
Comme l'indique notre ami Jean-Paul, il est possible que le nom de ta
feuille ne soit pas Feuil1 (regarde ma remarque en début de mon
message).



Sinon, ma (petite) connaissance de l'espagnol, me ferait penser à un
message
du type "Indice en dehors de la plage" mais Jean-Paul serait
probablement



confirmer cela ;-)
Donc pour avancer, il faut modifier les lignes comportant la mention
"Feuil1" par le nom de l'onglet qui contient les éléments servant à
enregistrer ton classeur.
A voir...
Saludos
Cordialement
Pascal

"Phil221178" a écrit dans le
message
de news:
Re-bonjour,

Merci pour cette réponse.
Quand je lance la macro, Excel me dit :

"Subindice fuera del intervalo" (Packoffice en espagnol)

Que veut dire ce message, et que dois-e modifier

"papou" escribió:

Bonjour
Modifier éventuellement avec le nom de la feuille :
Sub EnregistrerAvecParam()
Const Rp As String = "C:Mes documents"
Dim SousRp As String
Dim NomFic As String
SousRp = Worksheets("Feuil1").Range("A1").Value
NomFic = Worksheets("Feuil1").Range("A1").Value
If Rp = "" Or NomFic = "" Then MsgBox "Un paramètre est manquant" _
, vbInformation, "Impossible": Exit Sub
ThisWorkbook.SaveAs Rp & SousRp & Application.PathSeparator _
& NomFic & ".xls"
End Sub

Cordialement
Pascal

"Phil221178" a écrit dans le
message
de news:
Bonjour à tous,

Je réalise une feuille sous Excel 2000.
Je souhaiterai créer une macro me permettant d'enregistrer le
fichier
suivant ces points :

- Nom de fichier en fonction d'une valeur du tableau
- dans un dossier qui porte le même nom que l'une des valeurs du
tableau.

Par exemple : si dans mon tableau, j'ai A1='Barcelone ; A2='360,
je






souhaite
que mom fichier soit enregistrer ainsi :

C:mes documentsBarcelone360.xls
En sachant que le dossier Barcelone est déjà créé...

Merci d'avance!

Un saludo

Philippe

























1 2