Voir si un fichier Excel est ouvert

Stéphane · 30 Septembre 2005

Bonjour le forum,

Y-a-t-il un moyen de savoir via une code VBA si un fichier Excel est ouvert sur notre ordinateur.

Merci à vous tous

Stéphane

PascalXLD · 30 Septembre 2005

Bonjour

Peut-être comme ceci

Sub cherche()

Dim wb As Workbook

For Each wb In Workbooks
If wb.Name = 'toto.xls' Then
MsgBox 'fichier ouvert'
Exit Sub
End If
Next
MsgBox 'fichier non ouvert'

End Sub

Bon courage

Voir si un fichier Excel est ouvert

Stéphane

Guest

PascalXLD

XLDnaute Barbatruc

Discussions similaires