controle fichiers ouverts

[nanor]

re- le forum!

J'ai une autre question, par contre je ne sais pas du tout comment faire...

J'ai un fichier principal avec un UserForm dans lequel je peux ouvrir des fichiers secondaires. Je voudrais faire un test qui permette de dire si les fichiers secondaire sont déjà ouverts.

genre:

si "fichier secondaire" = ouvert
alors message "le fichier est déjà ouvert"
sinon ouvrir "Fichier secondaire"

Merci d'avance

nanor

nb: Comment on insère des images?
test
<img src="http://imagesdeti.free.fr/ImagePourForum/Merci.gif">

 

[Cathy]

Hello nanor

un exemple de code qui teste les fichiers déjà ouverts :

Public Sub ClasseurOuvert(c, Ok)
Ok = False
For Each x In Workbooks
If StrComp(x.Name, c, 1) = 0 Then
Ok = True
Exit For
End If
Next x
End Sub

pour les gifs va dansl'accueil du site et clique sul XLD Goodies pour télécharger PostVL.

@+

 

[nanor]

Re Cathy

Je suis pas trop expert en VBA et je comprends pas comment faire fonctionner ce code.

Peux-tu m'expliquer un peu stp?

nanor