nom de fichier

Esox · 15 Janvier 2010

Bonjour le forum,
Y aurait il moyen de mettre dans des cellules le nom de tous les fichiers Excel ouvert ?
merci à vous,
Stef.

Pierrot93 · 15 Janvier 2010

Re : nom de fichier

Bonjour,

essaye peut être le code ci-dessous, est valorisé dans la feuille active du classeur actif :

Code:

Option Explicit
Sub test()
Dim wb As Workbook, i As Byte
For Each wb In Workbooks
    i = i + 1
    Cells(i, 1).Value = wb.Name
Next wb
End Sub

bon après midi
@+

Esox · 15 Janvier 2010

Re : nom de fichier

Re
Je te remercie, ca devrait le faire...
Heureusement que vous etes là sans déconner...
Stef.

Privacy & Transparency