VBA - TabIndex pour sélectionner des contrôles

Résolu
kiwish Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -

Bonjour,

Je bloque depuis un certain temps sur l'utilisation de la propriété TabIndex des contrôles afin d'effectuer une action seulement sur certains contrôles.

Dans mon cas, je cherche à remettre à zéro certains contrôles et ce, grâce à la propriété Tabindex :

Dim CTRL As Control

For Each CTRL In Me.Controls
    If TypeOf CTRL Is MSForms.TextBox Or TypeOf CTRIL Is MSForms.ComboBox And CTRL.TabIndex <= 4 Then
       CTRL.Value = ""
    End If
Next CTRL

Cependant, j'obtiens une erreur "Membre introuvable" à cause de l'utilisation de TabIndex.

Avez-vous une solution alternative ou est-ce que je m'y prend mal pour faire cela ?

Merci par avance.

Kiwish

2 réponses

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     

    Bonjour,

    essai ceci:

    Option Explicit
    Private Sub CommandButton1_Click()
    Dim CTRL As Control
    For Each CTRL In Me.Controls
        If TypeOf CTRL Is MSForms.TextBox Then
           If CTRL.TabIndex <= 4 Then
           CTRL.Value = ""
           End If
        End If
    Next CTRL
    End Sub
    

    Voilà


    1
    1. kiwish Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
       

      Merci beaucoup Le Pivert, 

      Un peu bête de ma part de ne pas avoir pensé à cette solution simple plus tôt.

      Pour ma culture, pourrais-tu m'expliquer l'intérêt ici de la première ligne ?

      Merci encore.

      Kiwish

      0
  2. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     

    Obliger a declarer les variables


    0