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

Fermé
ihsane - 23 déc. 2014 à 01:53
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 23 déc. 2014 à 10:47
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

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
Modifié par pijaku le 23/12/2014 à 18:42
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