Bonjour,
Quelqu'un peut-il m'aider à résoudre mon problème?
Je souhaiterais simplement afficher dans la barre de titre d'Excel et de VBA
le
message suivant:
jmc budget marketing 11/09/2004
J'ai procédé comme suit:
Déclaration de variables
MyDate = Date
MyDay = Day(MyDate)
MyMonth = Month(MyDate)
MyYear = Year(MyDate)
Init = InputBox(«Saisissez vos initiales»)
NomFich = InputBox(«Saisissez le nom du fichier»)
ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_
MyDay & «/»& «MyMonth» & «/» & «MyYear»
Je ne comprends pas que cela fonctionne bien si l'on remplace les / par des
espaces
vides.
Quelqu'un a t-il une idée?
D'avance merci,
Jean-michel
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
gilbert
Bonjour
il me semble que Les noms de fichiers ne peuvent pas contenir les caractères suivants : / : * ? " < > |.
essaies ceci
Sub essai() MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox("Saisissez vos initiales") NomFich = InputBox("Saisissez le nom du fichier") ActiveWorkbook.SaveAs Filename:=Init & " " & NomFich & " " _ & MyDay & "_" & MyMonth & "_" & MyYear & ".xls" End Sub
salut
Gilbert "imej-clavier" a écrit dans le message de news:chv7uh$gjb$
Bonjour, Quelqu'un peut-il m'aider à résoudre mon problème? Je souhaiterais simplement afficher dans la barre de titre d'Excel et de VBA
le message suivant: jmc budget marketing 11/09/2004 J'ai procédé comme suit: Déclaration de variables MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox(«Saisissez vos initiales») NomFich = InputBox(«Saisissez le nom du fichier») ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_ MyDay & «/»& «MyMonth» & «/» & «MyYear» Je ne comprends pas que cela fonctionne bien si l'on remplace les / par des
espaces vides. Quelqu'un a t-il une idée? D'avance merci, Jean-michel
Bonjour
il me semble que
Les noms de fichiers ne peuvent pas contenir les caractères suivants :
/ : * ? " < > |.
essaies ceci
Sub essai()
MyDate = Date
MyDay = Day(MyDate)
MyMonth = Month(MyDate)
MyYear = Year(MyDate)
Init = InputBox("Saisissez vos initiales")
NomFich = InputBox("Saisissez le nom du fichier")
ActiveWorkbook.SaveAs Filename:=Init & " " & NomFich & " " _
& MyDay & "_" & MyMonth & "_" & MyYear & ".xls"
End Sub
salut
Gilbert
"imej-clavier" <imej-clavier@wanadoo.fr> a écrit dans le message de
news:chv7uh$gjb$1@news-reader1.wanadoo.fr...
Bonjour,
Quelqu'un peut-il m'aider à résoudre mon problème?
Je souhaiterais simplement afficher dans la barre de titre d'Excel et de
VBA
le
message suivant:
jmc budget marketing 11/09/2004
J'ai procédé comme suit:
Déclaration de variables
MyDate = Date
MyDay = Day(MyDate)
MyMonth = Month(MyDate)
MyYear = Year(MyDate)
Init = InputBox(«Saisissez vos initiales»)
NomFich = InputBox(«Saisissez le nom du fichier»)
ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_
MyDay & «/»& «MyMonth» & «/» & «MyYear»
Je ne comprends pas que cela fonctionne bien si l'on remplace les / par
des
espaces
vides.
Quelqu'un a t-il une idée?
D'avance merci,
Jean-michel
il me semble que Les noms de fichiers ne peuvent pas contenir les caractères suivants : / : * ? " < > |.
essaies ceci
Sub essai() MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox("Saisissez vos initiales") NomFich = InputBox("Saisissez le nom du fichier") ActiveWorkbook.SaveAs Filename:=Init & " " & NomFich & " " _ & MyDay & "_" & MyMonth & "_" & MyYear & ".xls" End Sub
salut
Gilbert "imej-clavier" a écrit dans le message de news:chv7uh$gjb$
Bonjour, Quelqu'un peut-il m'aider à résoudre mon problème? Je souhaiterais simplement afficher dans la barre de titre d'Excel et de VBA
le message suivant: jmc budget marketing 11/09/2004 J'ai procédé comme suit: Déclaration de variables MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox(«Saisissez vos initiales») NomFich = InputBox(«Saisissez le nom du fichier») ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_ MyDay & «/»& «MyMonth» & «/» & «MyYear» Je ne comprends pas que cela fonctionne bien si l'on remplace les / par des
espaces vides. Quelqu'un a t-il une idée? D'avance merci, Jean-michel
...Patrick
Salut, les "/" ,l s'agit tout simplement de caractères interdits ds les noms de fichiers... comme @]#{ et d'autres
-- ...Patrick Quoi que vous fassiez, faites le bien . Mail: http://cerbermail.com/?KPW0tTCjFw Connectez vous sur ce forum par : news://msnews.microsoft.com/microsoft.public.fr.excel
"imej-clavier" a écrit dans le message de news:chv7uh$gjb$
Bonjour, Quelqu'un peut-il m'aider à résoudre mon problème? Je souhaiterais simplement afficher dans la barre de titre d'Excel et de VBA
le message suivant: jmc budget marketing 11/09/2004 J'ai procédé comme suit: Déclaration de variables MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox(«Saisissez vos initiales») NomFich = InputBox(«Saisissez le nom du fichier») ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_ MyDay & «/»& «MyMonth» & «/» & «MyYear» Je ne comprends pas que cela fonctionne bien si l'on remplace les / par des
espaces vides. Quelqu'un a t-il une idée? D'avance merci, Jean-michel
Salut,
les "/" ,l s'agit tout simplement de caractères interdits ds les noms de
fichiers...
comme @]#{ et d'autres
--
...Patrick
Quoi que vous fassiez, faites le bien .
Mail: http://cerbermail.com/?KPW0tTCjFw
Connectez vous sur ce forum par :
news://msnews.microsoft.com/microsoft.public.fr.excel
"imej-clavier" <imej-clavier@wanadoo.fr> a écrit dans le message de
news:chv7uh$gjb$1@news-reader1.wanadoo.fr...
Bonjour,
Quelqu'un peut-il m'aider à résoudre mon problème?
Je souhaiterais simplement afficher dans la barre de titre d'Excel et de
VBA
le
message suivant:
jmc budget marketing 11/09/2004
J'ai procédé comme suit:
Déclaration de variables
MyDate = Date
MyDay = Day(MyDate)
MyMonth = Month(MyDate)
MyYear = Year(MyDate)
Init = InputBox(«Saisissez vos initiales»)
NomFich = InputBox(«Saisissez le nom du fichier»)
ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_
MyDay & «/»& «MyMonth» & «/» & «MyYear»
Je ne comprends pas que cela fonctionne bien si l'on remplace les / par
des
espaces
vides.
Quelqu'un a t-il une idée?
D'avance merci,
Jean-michel
Salut, les "/" ,l s'agit tout simplement de caractères interdits ds les noms de fichiers... comme @]#{ et d'autres
-- ...Patrick Quoi que vous fassiez, faites le bien . Mail: http://cerbermail.com/?KPW0tTCjFw Connectez vous sur ce forum par : news://msnews.microsoft.com/microsoft.public.fr.excel
"imej-clavier" a écrit dans le message de news:chv7uh$gjb$
Bonjour, Quelqu'un peut-il m'aider à résoudre mon problème? Je souhaiterais simplement afficher dans la barre de titre d'Excel et de VBA
le message suivant: jmc budget marketing 11/09/2004 J'ai procédé comme suit: Déclaration de variables MyDate = Date MyDay = Day(MyDate) MyMonth = Month(MyDate) MyYear = Year(MyDate) Init = InputBox(«Saisissez vos initiales») NomFich = InputBox(«Saisissez le nom du fichier») ActiveWorkbook.SaveAs Filename:=Init & « » & «NomFich» & « »_ MyDay & «/»& «MyMonth» & «/» & «MyYear» Je ne comprends pas que cela fonctionne bien si l'on remplace les / par des
espaces vides. Quelqu'un a t-il une idée? D'avance merci, Jean-michel
