il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve
avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance
"cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de
tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour John,
Ouvre NotePad Copie ce qui suit enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour t'assurer qu'aucune instance d'excel n'est ouverte en mémoire vive. (un outil bien pratique pour les développeurs !)
'----------------------------- on error resume next set WshShell = CreateObject("WScript.Shell") do GetObject(,"excel.Application").Quit select case err.number case 429 a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly) exit do case else end select loop '-----------------------------
Salutations!
"JohnFuss" a écrit dans le message de news: djl1f3$og1$ Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance "cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Merci d'avance.
John
Bonjour John,
Ouvre NotePad
Copie ce qui suit
enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour t'assurer qu'aucune instance d'excel n'est ouverte en mémoire
vive. (un outil bien pratique pour les développeurs !)
'-----------------------------
on error resume next
set WshShell = CreateObject("WScript.Shell")
do
GetObject(,"excel.Application").Quit
select case err.number
case 429
a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly)
exit do
case else
end select
loop
'-----------------------------
Salutations!
"JohnFuss" <john@fuss.fr> a écrit dans le message de news: djl1f3$og1$1@s1.news.oleane.net...
Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve
avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance
"cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de
tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Ouvre NotePad Copie ce qui suit enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour t'assurer qu'aucune instance d'excel n'est ouverte en mémoire vive. (un outil bien pratique pour les développeurs !)
'----------------------------- on error resume next set WshShell = CreateObject("WScript.Shell") do GetObject(,"excel.Application").Quit select case err.number case 429 a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly) exit do case else end select loop '-----------------------------
Salutations!
"JohnFuss" a écrit dans le message de news: djl1f3$og1$ Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance "cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Merci d'avance.
John
JohnFuss
Merci bien, ça tourne très bien, un peu dangereux :-) mais fonctionne très bien.
John
"michdenis" a écrit dans le message de news:
Bonjour John,
Ouvre NotePad Copie ce qui suit enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour t'assurer qu'aucune instance d'excel n'est ouverte en mémoire
vive. (un outil bien pratique pour les développeurs !)
'----------------------------- on error resume next set WshShell = CreateObject("WScript.Shell") do GetObject(,"excel.Application").Quit select case err.number case 429 a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly) exit do case else end select loop '-----------------------------
Salutations!
"JohnFuss" a écrit dans le message de news: djl1f3$og1$
Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance "cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Merci d'avance.
John
Merci bien, ça tourne très bien, un peu dangereux :-) mais fonctionne très
bien.
John
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:eKs1FgV2FHA.620@TK2MSFTNGP10.phx.gbl...
Bonjour John,
Ouvre NotePad
Copie ce qui suit
enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour
t'assurer qu'aucune instance d'excel n'est ouverte en mémoire
vive. (un outil bien pratique pour les développeurs !)
'-----------------------------
on error resume next
set WshShell = CreateObject("WScript.Shell")
do
GetObject(,"excel.Application").Quit
select case err.number
case 429
a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly)
exit do
case else
end select
loop
'-----------------------------
Salutations!
"JohnFuss" <john@fuss.fr> a écrit dans le message de news:
djl1f3$og1$1@s1.news.oleane.net...
Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve
avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance
"cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de
tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?
Merci bien, ça tourne très bien, un peu dangereux :-) mais fonctionne très bien.
John
"michdenis" a écrit dans le message de news:
Bonjour John,
Ouvre NotePad Copie ce qui suit enregistre sur le bureau le fichier avec une extension de fichier .VBS
Tu n'auras qu'à double-cliquer sur le fichier sur le bureau, pour t'assurer qu'aucune instance d'excel n'est ouverte en mémoire
vive. (un outil bien pratique pour les développeurs !)
'----------------------------- on error resume next set WshShell = CreateObject("WScript.Shell") do GetObject(,"excel.Application").Quit select case err.number case 429 a = msgbox("Il n'y a plus d'instance active d'Excel", vbokonly) exit do case else end select loop '-----------------------------
Salutations!
"JohnFuss" a écrit dans le message de news: djl1f3$og1$
Bonjour à tous,
il arrive "des fois" qu'Excel plante et reste en mémoire, on se retrouve avec les macros complémentaires en lecture seule.
Est-il possible à l'ouverture d'Excel de tester si une autre instance "cassée" est ouverte ? et si c'est le cas est-ce qu'on peut la "fin de tacher" et quitter et relance Excel (pour ne plus être en lecture seule) ?