Bonjour le Forum,
Mon but est de permettre à l'utilisateur d'identifier le control actif en lui appliquant une couleur de fond.
L'utilisation de la MFC par le menu access fonctionne très bien. Mais mon formulaire comportant un certain nombre de control, j'ai voulu passer par vba.
Le code utilisé est le suivant :
Le message d'erreur est le suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Form_Current() Dim Lecontrol As Control Set Lecontrol = Screen.ActiveForm.ActiveControl Lecontrol.BackColor = RGB(255, 255, 0) 'RGB(255, 255, 0) = exemple de l'aide en ligne F1 End Sub
Pourriez-vous me dire ce qui ne va pas dans ce code ?Erreur d'exécution '2474'
L'expression entrée requiert que le contrôle se trouve dans la fenêtre active.
Merci
Doncamelo
Partager