explication du code

Bonjour

J'apprend le VBA et j'essai de comprendre les lignes de code.
qui peut m'expliquer les 4 lignes ci dessous

je comprend que plage et plage_a ainsi que c sont des variables
sheets("Feuil1") que cela ce passe sur la feuille1

Code:

---

1 2 3 4 5 6

Set plage = Sheets("Feuil1").Range("A2:A" & Sheets("Feuil1").Range("A65536").End(xlUp).Row) Set plage_a = Sheets("Feuil1").Range("A2:b" & Sheets("Feuil1").Range("B65536").End(xlUp).Row)   NbCol = plage.Columns.Count   Set c = plage_a.Find(Me.TextBox1, , , xlWhole)

---

Merci d'avance

Affecte dans "plage" le range A2 à A dernière ligne non vide de ta feuille 1

Code:

---

Set plage = Sheets("Feuil1").Range("A2:A" & Sheets("Feuil1").Range("A65536").End(xlUp).Row)

---

Affecte dans "plage_a" le range A2 à B dernière ligne non vide de ta feuille 1

Code:

---

Set plage_a = Sheets("Feuil1").Range("A2:B" & Sheets("Feuil1").Range("B65536").End(xlUp).Row)

---

Compte le nombre de colonne dans "plage" et l'affecte dans "NbCol" (ici il devrait être égale à 1 vu que dans "plage" tu n'as que la colonne A)

Code:

---

NbCol = plage.Columns.Count

---

Recherche la valeur/texte/etc du TextBox1 de ton Userform dans la "plage_a" et l'affecte à c

Code:

---

Set c = plage_a.Find(Me.TextBox1, , , xlWhole)

---

En gros tu défini deux tableaux de données plage et plage_a, tu compte le nombre de colonne de plage et tu cherche quelque chose dans plage_a :mrgreen: