OVH Cloud OVH Cloud

Classeur ouvert

3 réponses
Avatar
John
Bonjour,

Comment détecter si un classeur est ouvert dans Excel ?

Si j'ouvre un fichier xls (mon fichier) par un double-click, j'aimerai
détecter à l'ouverture de mon fichier, si un autre fichier est déjà ouvert
et pouvoir le fermer avant d'ouvrir le mien. Je ne connais pas le nom du
fichier déjà ouvert. Cela pourrait être n'importe quel fichier ouvert par
l'utilisateur.

Merci de vos réponses

3 réponses

Avatar
anonymousA
bonjour,

par principe pour savoir si un fichier est ouvert la procédure suivante pour
tester l'existence d'un fichier ouvert . On peut mettre cette procédure dans
le workbook_open d'un fichier sur lequel on double clique. Ceci dit, il faut
connaitre le nom du fichier dont on veut tester s'il est ouvert( ici
toto.xls).
Je ne vois pas comment savoir qu'un fichier est déjà ouvert sans connaitre
son nom à moins qu'on fasse le test en imposant qu'un unique fichier excel
soit ouvert à l'instant T, auquel cas il faut se servir de workbooks.count
dans le workbook_open.

on error resume next
set wbk=workbooks("toto.xls")
if err.number<>0 then
err.clear
'le fichier n'est pas ouvert
else
'le fichier est ouvert. Le fermer
end if

A+


Bonjour,

Comment détecter si un classeur est ouvert dans Excel ?

Si j'ouvre un fichier xls (mon fichier) par un double-click, j'aimerai
détecter à l'ouverture de mon fichier, si un autre fichier est déjà ouvert
et pouvoir le fermer avant d'ouvrir le mien. Je ne connais pas le nom du
fichier déjà ouvert. Cela pourrait être n'importe quel fichier ouvert par
l'utilisateur.

Merci de vos réponses





Avatar
Jacques
Bonjour,

Merci pour la réponse.
Cette façon de faire sous-entends que l'on connaisse le nom du fichier !
Comment faire pour savoir si un classeur , peu importe le nom , est ouvert ?


"anonymousA" a écrit dans le message
de news:
bonjour,

par principe pour savoir si un fichier est ouvert la procédure suivante
pour

tester l'existence d'un fichier ouvert . On peut mettre cette procédure
dans

le workbook_open d'un fichier sur lequel on double clique. Ceci dit, il
faut

connaitre le nom du fichier dont on veut tester s'il est ouvert( ici
toto.xls).
Je ne vois pas comment savoir qu'un fichier est déjà ouvert sans connaitre
son nom à moins qu'on fasse le test en imposant qu'un unique fichier excel
soit ouvert à l'instant T, auquel cas il faut se servir de workbooks.count
dans le workbook_open.

on error resume next
set wbk=workbooks("toto.xls")
if err.number<>0 then
err.clear
'le fichier n'est pas ouvert
else
'le fichier est ouvert. Le fermer
end if

A+


Bonjour,

Comment détecter si un classeur est ouvert dans Excel ?

Si j'ouvre un fichier xls (mon fichier) par un double-click, j'aimerai
détecter à l'ouverture de mon fichier, si un autre fichier est déjà
ouvert


et pouvoir le fermer avant d'ouvrir le mien. Je ne connais pas le nom du
fichier déjà ouvert. Cela pourrait être n'importe quel fichier ouvert
par


l'utilisateur.

Merci de vos réponses







Avatar
Alain CROS
Bonjour.

Comme ça :

Private Sub Workbook_Open()
Dim I&
For I = Workbooks.Count - 1& To 1& Step -1&
Workbooks(I).Close
Next I
End Sub

Mais il est préférable AMHA d'utiliser la méthode de ce classeur disponible sur excelabo.
mp-xlprivatesession

Alain CROS

"Jacques" a écrit dans le message de news:
Bonjour,

Merci pour la réponse.
Cette façon de faire sous-entends que l'on connaisse le nom du fichier !
Comment faire pour savoir si un classeur , peu importe le nom , est ouvert ?