Nom de fichier = Combobox1.value

[Marco60]

Bonsoir à Tous,

Voilà, je suis en train de terminer une application dans laquelle j'ai un bouton qui me permet d'enregistrer le fichier.

Seulement voilà, j'aimerais que le nom du fichier soit égal à la valeur de ma combobox1.

J'ai essayé ça :

Private Sub Valider_Click()
Worksheets(ComboBox1.Text).Select
Worksheets(ComboBox1.Text).Copy
ChDir 'C:\\'
ActiveWorkbook.SaveAs Filename:='C:\\Nom du dossier\\ComboBox1.value', FileFormat:=xlNormal _
, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close
End Sub

Mais ça marche pas !!!

Et vu l'heure qu'il est, j'ai plus les yeux en face des trous.

Merci de votre aide et A+

Bonne nuit

Marc

PS : Bonne nuit, je vais me coucher !!!

 

[Hervé]

bonjour

peut etre comme ceci :

ActiveWorkbook.SaveAs Filename:='C:\\\\\\\\Nom du dossier\\\\\\\\'&ComboBox1.text, FileFormat:=xlNormal _
, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False, _
CreateBackup:=False

bonne nuit 🙂

salut

 

[Marco60]

Salut Hervé, le forum,
C'est exactement ce que je cherchais.

J'avais essayé avec le '&' mais dans cette configuration là :
ActiveWorkbook.SaveAs Filename:='C:\\\\Nom du dossier\\\\ & 'ComboBox1.text'.........

et cela ne marchait pas.

Encore merci pour ta réponse à 03h00 du mat car franchement je ne m'attendais pas à avoir une réponse avant ce matin..

A+

Marc