Bonjour,
Je cherche à modifier mon pointeur de la souris au survol des onglets (page1, page 2 et tab1, tab2) sur un multipage ou un TabStrip1. Dans les propriétés, ça n'apparaît pas.
Ma question : est ce possible de modifier le pointeur au survol d'un multipage ou un TabStrip1 avec la souris ?
Pour les boutons et combobox c'est l'option "MousePointer" et j'ai trouvé le code avec une boucle pour modifier le pointer de la souris de chaque contrôl dans un userform.
Dans l'usf activate
Private Sub UserForm_Activate()
Dim control_CB As Control
'definit le type de curseur au survol avec la souris
For Each control_CB In Controls
If TypeOf control_CB Is MSForms.CommandButton Or TypeOf control_CB Is MSForms.ComboBox Then
control_CB.MousePointer = fmMousePointerCustom
control_CB.MouseIcon = LoadPicture(ThisWorkbook.Path & "\49562.ico")
End If
Next control_CB
End Sub
Je met un fichier créé avec excel 2019 64 bit :
Le fichier icône à télécharger à mettre dans le même dossier que le fichier Excel pour tester, lien : https://www.icone-png.com/ico/50/49562.ico