|
|
|
|
L'objet Workbooks s'applique à l'objet Application. Une aide sur le mot Workbooks doit t'apporter pas mal de réponses
Dim lWorkbook As Workbook Dim lFound As Boolean lFound = False For Each lWorkbook In Workbooks If lWorkbook.Name = "FichierX" Then lFound = True Exit For End If Next If lFound Then <Cas ou le fichier "FichierX" existe> End If DaNot |