Comment creer un fichier par concatenation?

Xavier · 21 Février 2006

y a -t-il moyen de creer un fichier en concatenant?

Donc voici la commande que j'aurais dans une cellule... en A3 se trouverait le nom du fichier que je veux creer

CONCATENER('C:\\Documents and Settings\\Xa\\Bureau\\xxx\\Dossier\\';A3;'.xls')

Est ce possible?

Jacques87 · 21 Février 2006

Bonsoir Xavier

Il me semble que tu expliques mal ta question
Si je comprends bien tu veux créer un chemin par concaténation, alors la aucun problème ta formule doit convenir
Maintenant si tu veux utiliser ce chemin pour sauvegarder ou ouvrir le fichier concerné, alors c'est autre chose

Bonne soirée

_Thierry · 21 Février 2006

Bonsoir Xavier, le Forum

Oui c'est possible, mais uniquement par un Code VBA (Macro)

Voici un exemple à mettre dans un Module Standard (Module1 par exemple) et ensuite créer un bouton et y affecter cette Macro :

Const Chemin As String = 'C:\\\\\\\\Documents and Settings\\\\\\\\Thierry\\\\\\\\My Documents\\\\\\\\'

Sub FileGenerator()
Dim NomDuFichier As String

If Sheets('TaFeuille').Range('A3') = Empty Then
MsgBox 'Pas Glop Pas Glop !!!, La Cellule A3 est Vide !!!', vbCritical
Exit Sub
End If

NomDuFichier = Sheets('TaFeuille').Range('A3')

ThisWorkbook.SaveAs Chemin & NomDuFichier & '.xls'

End Sub

Bonne Soirée
[ol]@+Thierry[/ol]

EDITION !!!

Bonsoir Jacques, pas vu (pas pris lol)

Message édité par: _Thierry, à: 21/02/2006 19:12

Jacques87 · 21 Février 2006

Bonsoir Thierry

Comment cela : 'Pas Glop Pas Glop !!!, '
je comprends qu'avec de tels propos c'est 'vbCritical' et que tu t'empresses de 'Exit Sub'

salut Thierry et bonne soirée

Comment creer un fichier par concatenation?

Xavier

Guest

Jacques87

XLDnaute Accro

_Thierry

XLDnaute Barbatruc

Jacques87

XLDnaute Accro

Discussions similaires