J'ai créer un USF avec une textbox1 je voudrais que la valeur de cette textbox1 s'inscrive dans la cellule ligne 6 de la première colonne vide.
Sheets("lenomdetafeuille").cells(6,Sheets("lenomdetafeuille").cells(6,columns.count).end(xltoleft).column)+1) = textbox1
La valeur saisie dans cette textbox1 doit être identique a la valeur d'une cellule données.
Par exemple A1 ?
1 2 3 4 5 6
| If textbox1 = Sheets("lenomdetafeuille").range("A1") then
textbox2.visible = true
msgbox("veuillez insérer une valeur dans la deuxième textbox")
else
textbox1=""
end if |
Si la valeur est identique l'utilisateur doit saisir une seconde valeur dans une textbox2.
Si la valeur est différente la saisi s'arrête et la valeur de la textbox1 s'efface.
Partager