Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Bonjour Pascal,
Il n'y a rien de grave à cela, simplement, comme perso.xls est déjà ouvert
dans une première session tu as ce message tout à fait normal!
Tu t'en sors , en cliquant simplement sur annuler puis fermer
l'application.
Cordialement.
lSteph
"Pascal ETIENNE" a écrit dans le
message
de news:Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Bonjour Pascal,
Il n'y a rien de grave à cela, simplement, comme perso.xls est déjà ouvert
dans une première session tu as ce message tout à fait normal!
Tu t'en sors , en cliquant simplement sur annuler puis fermer
l'application.
Cordialement.
lSteph
"Pascal ETIENNE" <nospam-pascaletienne@laposte.net> a écrit dans le
message
de news: eqyo1eyLGHA.3936@TK2MSFTNGP12.phx.gbl...
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Bonjour Pascal,
Il n'y a rien de grave à cela, simplement, comme perso.xls est déjà ouvert
dans une première session tu as ce message tout à fait normal!
Tu t'en sors , en cliquant simplement sur annuler puis fermer
l'application.
Cordialement.
lSteph
"Pascal ETIENNE" a écrit dans le
message
de news:Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" a écrit dans le message de
news:uAUnxN$Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
uneinstance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" <nospam@nospam> a écrit dans le message de
news:uAUnxN$LGHA.2528@TK2MSFTNGP12.phx.gbl...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" a écrit dans le message de
news:uAUnxN$Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel si
uneinstance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Modifie l'instruction de lancement d'Excel (j'ai supposé un espace entre
Fichiers et travail dans ton chemin mais c'est peut-être mon lecteur de
news qui
m'a joué un tour) :
wsh.Run "Excel.exe c:Fichiers travailClients.xls",1
----------
Ange Ounis
----------Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" a écrit dans le message de
news:uAUnxN$Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel
si
uneinstance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec
une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir
en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Modifie l'instruction de lancement d'Excel (j'ai supposé un espace entre
Fichiers et travail dans ton chemin mais c'est peut-être mon lecteur de
news qui
m'a joué un tour) :
wsh.Run "Excel.exe c:Fichiers travailClients.xls",1
----------
Ange Ounis
----------
Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" <nospam@nospam> a écrit dans le message de
news:uAUnxN$LGHA.2528@TK2MSFTNGP12.phx.gbl...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel
si
une
instance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec
une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------
Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir
en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouverte
pour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal
Modifie l'instruction de lancement d'Excel (j'ai supposé un espace entre
Fichiers et travail dans ton chemin mais c'est peut-être mon lecteur de
news qui
m'a joué un tour) :
wsh.Run "Excel.exe c:Fichiers travailClients.xls",1
----------
Ange Ounis
----------Encore un petit détail,
la syntaxe pour ouvrir non pas excel, mais le fichier "c:Fichiers
travailClients.xls"???
alors là, j'abuse ;o))))
Merci b'coup.
Pascal
"Ange Ounis" a écrit dans le message de
news:uAUnxN$Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Tu peux passer par un fichier .vbs qui vérifiera avant d'ouvrir Excel
si
uneinstance n'est pas déjà active :
(code à copier dans le bloc-notes et à enregistrer sur le bureau avec
une
extension .vbs, par exemple : OuvrirExcel.vbs) :
''''''''''''''''''
Dim wsh
Set wsh = WScript.CreateObject("WScript.Shell")
If NbProcess("Excel.exe")=0 Then
wsh.Run "Excel.exe",1
Else
MsgBox "Attention : Excel est déjà ouvert"
End If
'Compter NbProcessus
Function NbProcess(LeProcess)
Dim LesProcess, UnProcess, i
NbProcess = 0
Set LesProcess = _
GetObject("winmgmts:").ExecQuery("select * from Win32_Process ")
For Each UnProcess In LesProcess
If UCase(UnProcess.Caption) = UCase(LeProcess) Then _
NbProcess = NbProcess + 1
Next
End Function
''''''''''''''''''
----------
Ange Ounis
----------Salut le Forum.
SVP, Help.
si j'ouvre excel une deuxieme fois par erreur, une boite de dialogue
apparait:
"perso.xls est déja utilisé. voulez-vous réserver, annuler ou ouvrir
en
lecture seule?"
c'est grave car alors, le fichier "propriétaire8.xlb" du repertoire
"windows" disparait, et ce fichier contient toutes les barres d'outils
personalisées...
Je voudrais tester avant l'ouverture d'excel si une session est déja
ouvertepour empècher toute double ouverture.
yatil-un-moyen???
Merci bcoup
Pascal