Copier cellule pour mettre en nom de fichier

Résolu/Fermé
dakine12 Messages postés 2 Date d'inscription mardi 30 octobre 2007 Statut Membre Dernière intervention 14 août 2008 - 14 août 2008 à 08:26
dakine12 Messages postés 2 Date d'inscription mardi 30 octobre 2007 Statut Membre Dernière intervention 14 août 2008 - 14 août 2008 à 12:50
Bonjour,
Donc voilà se que j'aimerai faire sous excel .

J'aimerai faire une macro qui copie le texte qu'il y a dans une cellule pour la coller en nom de fichier. Enfin en gros c'est que ce text qu'il y a dans cette cellule soit le nom du fichier à enregistrer... J'ai essayer mais euu.... sa a rien donner -_-

Pouvez vous m'aider?

Merci D'avance! ^^

Nn*

2 réponses

tu peux essayer ca à coller dans une macro ou un bouton

Dim Chemin As String
Dim Fichier As String

chemin="C:\Documents and Settings\Admin\EXCEL\" 'chemin ou copier le fichier
fichier=range("A1").Value 'cellule ou se trouve le nom à donner au fichier

ActiveWorkbook.SaveAs Filename:= _
chemin & fichier, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
0
dakine12 Messages postés 2 Date d'inscription mardi 30 octobre 2007 Statut Membre Dernière intervention 14 août 2008
14 août 2008 à 12:50
Oo merci c'est nikel^^

++
0