Bonsoir,

J'essai d'utiliser la fonction sendkey. J'ai trouvé des réponses sur le forum qui fonctionnent pour les utilisateurs mais pas chez moi.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub Validation_num_PDV()
 
    Dim cell As Range
 
    Range(Range("L13"), Range("L13").End(xlDown)).Select
 
    For Each cell In Selection
 
        SendKeys "{F2}"
        Application.SendKeys "{ENTER}", True
        DoEvents
 
    Next
 
End Sub
Ce que cela fait chez moi, c'est activer F2 dans la fenêtre VBA. J'ai essayé avec et sans "Application." devant, et avec true / false / omis derrière.
Mais c'est toujours dans VBA et non dans Excel que le F2 est exécuté.

Que faire ? (accessoirement j'ai écrit Doevents car je l'ai lu dans un post, mais je ne sais pas si c'est vraiment utile.)

Merci !