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 ;-))))
Hey, t'es pas manchot quand tu utilises la langue de Cervantès...
--
à+twinley
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:05dd01c4b77b$202e4460$a301280a@phx.gbl...
-----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
;-))))
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 ;-))))
-----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 ;-))))
-----Message d'origine-----
Hey, t'es pas manchot quand tu utilises la langue de
Cervantès...
--
à+twinley
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:05dd01c4b77b$202e4460$a301280a@phx.gbl...
-----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
;-))))
-----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 ;-))))
.
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 ;-))))
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)
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:05dd01c4b77b$202e4460$a301280a@phx.gbl...
-----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
;-))))
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 ;-))))
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 ;-))))
:o)
--
à+twinley
"jps" <NoAddressNoPhoneNoMoney@NoWorries.bjl> a écrit dans le message de
news:ukehZa4tEHA.2804@TK2MSFTNGP14.phx.gbl...
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)
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:05dd01c4b77b$202e4460$a301280a@phx.gbl...
-----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
;-))))
-- à+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 ;-))))
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
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:uINPQF3tEHA.2800@tk2msftngp13.phx.gbl...
Re
De rien, ça fait toujours plaisir !
T'es un chef
Bof !
Cordialement
Pascal
"Phil221178" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: DC8F1CAE-81F9-4D8E-A459-949E890405DA@microsoft.com...
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" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: B6AEAF16-8483-457B-A6AC-AFD645F1423F@microsoft.com...
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" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: 07205670-E137-4CA7-9252-1EEDA039D599@microsoft.com...
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éé...
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
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
Eres el mejor Juan Pablo, lo sabes no?
Cordialmente
Pascal
"jps" <NoAddressNoPhoneNoMoney@NoWorries.bjl> a écrit dans le message de
news: OsfLcg4tEHA.820@TK2MSFTNGP12.phx.gbl...
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:uINPQF3tEHA.2800@tk2msftngp13.phx.gbl...
Re
De rien, ça fait toujours plaisir !
T'es un chef
Bof !
Cordialement
Pascal
"Phil221178" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: DC8F1CAE-81F9-4D8E-A459-949E890405DA@microsoft.com...
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" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: B6AEAF16-8483-457B-A6AC-AFD645F1423F@microsoft.com...
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" <Phil221178@discussions.microsoft.com> a écrit dans le
message
de news: 07205670-E137-4CA7-9252-1EEDA039D599@microsoft.com...
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éé...
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éé...