petit probleme d'ecriture

fenec · 21 Février 2012

Bonjour le forum
Je rencontre un petit souci, j’utilise ceci dans ma macro

fermer = Application.GetSaveAsFilename(ActiveSheet.Range("E13").Value & Range("I14"), "Fichiers Excel,*.xls")

J’obtiens ceci

toto02 2012 003

Et j’aimerais obtenir ceci

toto 02 2012 003

Ce doit être simple mais je bloque
Merci de vos lumieres
Cordialement
Fenec

Gdal · 21 Février 2012

Re : petit probleme d'ecriture

Bonjour,

Effectivement c'est assez simple.
Il faut juste insérer un espace & " " &

Code:

fermer = Application.GetSaveAsFilename(ActiveSheet.Range("E13").Value & " " & Range("I14"), "Fichiers Excel,*.xls")

Pour aller un plus loin, l'espace peut-être remplacé par un autre symbole:
Tiret: & "-" &
Underscore: & "_" &
Espace Tiret Espace & " - " &

Attention, certains caractères sont interdit dans les noms de fichier: / . \ etc

Bonne continuation.

Gdal

PS: Pensez aux balises

Code:

fenec · 21 Février 2012

Re : petit probleme d'ecriture

Re et merci Gdal
Merci pour votre réponse si rapide

Une petite question encore si vous permettez débutant qu'entendez vous par :
PS: Pensez aux balises

Code:

Merci de m'éclairer si pas trop abuser
Cordialement
Fenec

Gdal · 22 Février 2012

Re : petit probleme d'ecriture

Bonjour,

Pour les balises CODE:

Cliquer sur l'image

Gdal

petit probleme d'ecriture

fenec

XLDnaute Impliqué

Gdal

XLDnaute Nouveau

fenec

XLDnaute Impliqué

Gdal

XLDnaute Nouveau

Pièces jointes

Discussions similaires