Discussion :

[jpma75]

Bonjour,

Je me suis rendu compte que l'exécution de certaines de mes macros pouvaient désactiver le "verrouillage numérique" (cf. clavier).

Normalement, aucune instruction dans le code, en ce sens.

Je ne sais pas par où chercher !
Merci d'avance pour vos lumières.
Cdt

[78chris]

Bonjour

Sans plus de détail sur le code... Sans doute de sendkey...

[jpma75]

Bonjour,

Ah oui, ça me paraît être une bonne piste !

Le seul que j'utilise est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendKeys "%{Down}"

Je ne vois pas pourquoi il désactiverait le "verrouillage numérique" mais je pense néanmoins que tu as raison.
Peut-être y a-t-il quelque chose à ajouter après ce SendKeys pour réinitialiser le pavé numérique ?!

[unparia]

.. Sans doute de sendkey...

C'est même certain.
(l'utilisation de Sendkeys est toujours la marque de la pauvreté).

[jpma75]

Beati pauperes spiritu

[unparia]

Bien plus heureux sont les sages, jpma ...
Quel est la finaliuté de ton

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SendKeys "%{Down}"

???
Ta réponse te permettra peut-être de t'enrichir

Sauf si tu "pilotes" AINSI (fortement déconseillé) une autre application (laquelle, d'ailleurs ?)

[jpma75]

Les sages, je viens les chercher sur le forum... Je suis une brebis égarée dans l'environnement d'Excel...

(Je tiens à ce SendKeys et "mes" utilisateurs ne me démentiront pas)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
If [p2] = "-" And ActiveSheet.Name <> "réf." Then
        With Range("k2") 
            .MergeArea.ClearContents 
            .Select
            SendKeys "%{Down}"
        End With
    End If