Comparaison d'une valeur dans un TextBox1 avec une colonne Vba

ihsane -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Stp je suis débutante sur Excel et j'ai un prb , j'arrive pas à comparer entre une valeur d'un TextBox1 et une colonne du tableau Excel existant sur la feuille data , si la valeur du textBox1 existe dans les colonnes de M5_M30, il faut afficher la valeur correspondante de la colonne entre A5_A30 dans un TextBox2

1 réponse

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,

    Ce code devrait faire l'affaire :

    Dim Trouve As Range
    
    Set Trouve = Sheets("data").Range("M5:M30").Find(TextBox1)
    If Not Trouve Is Nothing Then 
        TextBox2 = Trouve.Offset(0, -12)
    Else
        MsgBox "Valeur : " & TextBox1 & " non trouvée. Vérifiez la saisie."
    End If

    🎼 Cordialement,
    Franck 🎶
    0