Microsoft 365 Explorateur d'objets vba ouverture intempestive (pour moi)

[Usine à gaz]

Bonjour à toutes et à tous 🙂

Je suis en face d'un souci que je ne sais encore pas résoudre et je fais appels à nos ténors.
J'ai un code, juste pour le test, dans le fichier test joint :

Private Sub Worksheet_SelectionChange(ByVal R As Range)
'clic D1 entrer pour mise à jour
CreateObject("wscript.shell").SendKeys "{F2}"
CreateObject("wscript.shell").SendKeys "{ENTER}"

If Not Intersect(R, Range("g2:j20")) Is Nothing Then
ActiveSheet.Unprotect Password:=""
    CreateObject("wscript.shell").SendKeys "{ENTER}"
ActiveSheet.Protect Password:="", DrawingObjects:=True, Contents:=True, Scenarios:=True
End If
End Sub

Ce code ouvre l'explorateur d'objets.
Je voudrais que ce ne code n'ouvre pas l'explorateur mais je n'ai pas trouvé comment faire.

Auriez-vous la solution ?
Merci à toutes et à tous,
Amicalement,
lionel 🙂

 

[fanch55]

Salut Lionel,
cela n'ouvre l'explorateur VBE que si tu est en mode debugging, cad si tu as mis un point d'arrêt dans le code .
Que veux-tu faire exactement, ?

 

[Usine à gaz]

Bonjour fanch55 🙂
Je ne veux rien faire c'est juste un code test.

"si tu as mis un point d'arrêt dans le code"
Si tu as ouvert le fichier joint (sinon ça sert à koi de mettre des fichiers lol). Tu as vu qu'il n'y a
aucun point d'arrêt (qui se met d'ailleurs en ouvrant vba pour exécuter pas à pas).

Si tu exécutes le code en pas à pas, l'explorateur s'ouvre 😡

Ce que je souhaite est que l'explorateur d'objet ne s'ouvre pas,
lionel 🙂

 

[TooFatBoy]

Bonjour,

Je clique dans le tableau, mais ça n'ouvre pas l'explorateur d'objet chez moi.

Ce que tu montres en capture d'écran est ce qui apparait quand on appuie sur la touche <F2> dans VBE.
Donc, comme l'a dit fanch55, si tu exécutes en pas à pas, forcément, ça ouvre l'explorateur d'objets. 😉

 

[Usine à gaz]

Bonjour,

Je clique dans le tableau, mais ça n'ouvre pas l'explorateur d'objet chez moi.

Ce que tu montres en capture d'écran est ce qui apparait quand on appuie sur la touche <F2> dans VBE.

Bonjour Marcel 🙂
Alors c'est "CreateObject("wscript.shell").SendKeys "{F2}"" qui ouvre l'explorateur ?
Merci déjà pour cette info importante 🙂

Pendant que j'y suis, il y a un moyen, tout en gardant le code "CreateObject("wscript.shell").SendKeys " dont j'ai besoin, d'éviter l'ouverture de l'explorateur ?
🙂

 

[TooFatBoy]

Oui, c'est le SendKeys "{F2} qui t'ouvre l'explorateur d'objets quand tu exécutes ton code en pas à pas.

Est-ce bien ça : tu as ce problème d'ouverture de l'explorateur d'objets uniquement quand tu exécutes ton code en pas à pas ???

 

[Usine à gaz]

Oui, c'est le SendKeys "{F2} qui t'ouvre l'explorateur d'objets quand tu exécutes ton code en pas à pas.

Est-ce bien ça : tu as ce problème d'ouverture de l'explorateur d'objets uniquement quand tu exécutes ton code en pas à pas ???

OUI uniquement sur "CreateObject("wscript.shell").SendKeys "{F2}"" 😡

 

[TooFatBoy]

OUI uniquement sur "CreateObject("wscript.shell").SendKeys "{F2}"" 😡

Ma question n'est pas de savoir si c'est uniquement sur cette instruction, mais si c'est uniquement lors de l'exécution en mode "debug" (<F5> ou <F8>). Ce qui semble à peu près évident, mais je demande quand même. 😁

 

[Usine à gaz]

Ma question n'est pas de savoir si c'est uniquement sur cette instruction, mais si c'est uniquement lors de l'exécution en mode "debug" (<F5> ou <F8>). Ce qui semble à peu près évident, mais je demande quand même. 😁

NON, je n'exécute pas en mode "debug"

 

[TooFatBoy]

Juste une remarque (mais...) tu crois vraiment que les PROTECT et UNPROTECT sont indispensables ?

 

[Usine à gaz]

Juste une remarque (mais...) tu crois vraiment que les PROTECT et UNPROTECT sont indispensables ?

on peut les enlever pour le test lol ... mais j'ai tellement l'habitude de les mettre car dans mes fichiers, ils sont importants 🙂

 

[TooFatBoy]

NON, je n'exécute pas en mode "debug"

D'abord OUI...
Puis NON...
Et après ??? PEUT-ËTRE...
😁😅😂🤣😇😇😇

Franchement, je ne vois pas pourquoi ça t'ouvre l'explorateur d'objets si tu n'es pas dans VBE.
Désolé de ne pouvoir te renseigner. 🙁

 

[Usine à gaz]

D'abord OUI...
Puis NON...
Et après ??? PEUT-ËTRE...
😁😅😂🤣😇😇😇

Franchement, je ne vois pas pourquoi ça t'ouvre l'explorateur d'objets si tu n'es pas dans VBE.
Désolé de ne pouvoir te renseigner. 🙁

 

[TooFatBoy]

on peut les enlever pour le test lol ... mais j'ai tellement l'habitude de les mettre car dans mes fichiers, ils sont importants 🙂

C'est surtout que ça ne sert absolument à rien...
Enfin, je veux dire par là que tout le monde sait comment faire sauter les protections d'Excel. 😉

 

[Usine à gaz]

Merci d'avoir bien voulu m'aider 🙂
Moi non plus, je ne vois pas pkoi 😡