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
LeSteph
A adapter au contexte, et surtout ATTention au contenu des cellules (caractères spéciaux) à l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe() Dim mynam As String mynam = [b4] & Format([a1], "ddmmyyyy") & [d3] Application.DisplayAlerts = False MsgBox mynam ActiveWorkbook.SaveAs mynam Application.DisplayAlerts = True End Sub
Bonne journée.
LeSteph
"yoyo" a écrit dans le message de news:412d7f38$0$19232$
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu dans
trois celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé FIC-DATE-CLIENT.xls
Pouvez vous m'aider Merci par avance
A adapter au contexte,
et surtout ATTention au contenu des cellules (caractères spéciaux) à
l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe()
Dim mynam As String
mynam = [b4] & Format([a1], "ddmmyyyy") & [d3]
Application.DisplayAlerts = False
MsgBox mynam
ActiveWorkbook.SaveAs mynam
Application.DisplayAlerts = True
End Sub
Bonne journée.
LeSteph
"yoyo" <yorrickb@free.fr> a écrit dans le message de
news:412d7f38$0$19232$626a14ce@news.free.fr...
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu
dans
trois
celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé
FIC-DATE-CLIENT.xls
A adapter au contexte, et surtout ATTention au contenu des cellules (caractères spéciaux) à l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe() Dim mynam As String mynam = [b4] & Format([a1], "ddmmyyyy") & [d3] Application.DisplayAlerts = False MsgBox mynam ActiveWorkbook.SaveAs mynam Application.DisplayAlerts = True End Sub
Bonne journée.
LeSteph
"yoyo" a écrit dans le message de news:412d7f38$0$19232$
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu dans
trois celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé FIC-DATE-CLIENT.xls
Pouvez vous m'aider Merci par avance
yoyo
Merci LeSteph
Je vais testé cela dés midi.
Mais j'avais oublié de stipulé que je voudrai que les fichiers créer via ta macro s'enregistre dans un repertoire prédéfini.
Y'a t'il un moyen de faire cela
"LeSteph" wrote in news:412d876f$0$23213 $:
A adapter au contexte, et surtout ATTention au contenu des cellules (caractères spéciaux) à l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe() Dim mynam As String mynam = [b4] & Format([a1], "ddmmyyyy") & [d3] Application.DisplayAlerts = False MsgBox mynam ActiveWorkbook.SaveAs mynam Application.DisplayAlerts = True End Sub
Bonne journée.
LeSteph
"yoyo" a écrit dans le message de news:412d7f38$0$19232$
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu dans
trois celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé FIC-DATE-CLIENT.xls
Pouvez vous m'aider Merci par avance
Merci LeSteph
Je vais testé cela dés midi.
Mais j'avais oublié de stipulé que je voudrai
que les fichiers créer via ta macro s'enregistre dans un repertoire
prédéfini.
Y'a t'il un moyen de faire cela
"LeSteph" <lecocosteph@frite.fr> wrote in news:412d876f$0$23213
$636a15ce@news.free.fr:
A adapter au contexte,
et surtout ATTention au contenu des cellules (caractères spéciaux) à
l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe()
Dim mynam As String
mynam = [b4] & Format([a1], "ddmmyyyy") & [d3]
Application.DisplayAlerts = False
MsgBox mynam
ActiveWorkbook.SaveAs mynam
Application.DisplayAlerts = True
End Sub
Bonne journée.
LeSteph
"yoyo" <yorrickb@free.fr> a écrit dans le message de
news:412d7f38$0$19232$626a14ce@news.free.fr...
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu
dans
trois
celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé
FIC-DATE-CLIENT.xls
Mais j'avais oublié de stipulé que je voudrai que les fichiers créer via ta macro s'enregistre dans un repertoire prédéfini.
Y'a t'il un moyen de faire cela
"LeSteph" wrote in news:412d876f$0$23213 $:
A adapter au contexte, et surtout ATTention au contenu des cellules (caractères spéciaux) à l'exemple du choix de format pour la date ici prévu sans les Slashs/:
Sub EnregistreSpe() Dim mynam As String mynam = [b4] & Format([a1], "ddmmyyyy") & [d3] Application.DisplayAlerts = False MsgBox mynam ActiveWorkbook.SaveAs mynam Application.DisplayAlerts = True End Sub
Bonne journée.
LeSteph
"yoyo" a écrit dans le message de news:412d7f38$0$19232$
Bonjour,
J'aimerais pouvoir enregistre un fichier excel selon la valeur contenu dans
trois celulle.
Exemple : A1= DATE B4=FIC D3=Client mon fichier devra s'appelé FIC-DATE-CLIENT.xls
