comment récupérer le nom d'un fichier

Cousinhub

XLDnaute Barbatruc

• 28 Décembre 2008

• #2

Re : comment récupérer le nom d'un fichier

Bonjour,

si c'est vraiment le classeur actif, tu peux mettre ainsi :

Code:

ActiveWorkbook.Close False

Le False, si tu ne veux pas enregistrer les modifications, sinon, tu mets True

 

Vote positif 0 Vote négatif

P

paul87

XLDnaute Impliqué

• 28 Décembre 2008

• #3

Re : comment récupérer le nom d'un fichier

rebonjour et merci à toi, bhbh
ça marche, mais pas complètement,...
le fichier se ferme bien, mais pas complètement, il reste en bas dans la barre des taches...
je ne veux pas utiliser

Code:

application.quit

qui fermerai tous les fichiers.xls..
je veux juste fermer définitivement le fichier en cours
c'est pour cela que je voulais essayer avec

Code:

Workbooks("[COLOR="Blue"]nom du fichier[/COLOR].xls").Close

mais je ne saispas comment faire pour récupérer dans le code ce nom

Encore Merci

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 28 Décembre 2008

• #4

Re : comment récupérer le nom d'un fichier

Re-,

essaie :

Code:

Sub fermer()
Dim x As String
x = ActiveWorkbook.Name
Workbooks(x).Close False
End Sub

 

Vote positif 0 Vote négatif

P

paul87

XLDnaute Impliqué

• 28 Décembre 2008

• #5

Re : comment récupérer le nom d'un fichier

Oui,
Grand MERCI à toi bhbh...
ce coup ci ça marche,...
c'est bien le nom du fichier qu'il fallait
Encore merci,
bonne soirée

 

Vote positif 0 Vote négatif