Comment utiliser mon programme VBA

Salut
J'ai ecrit ce programme pour tester !
Maintenant j'aimerais l'appliquer....mais comment ?

Merci pour ta reponse j vais essyaer !
si il y'a d'autres solutions Merci !

je me demandais si tu avais reussi a programmé ton truc

si non voila un code

Private Sub essais()


Dim val1 As String
Dim val As String
Dim ref As String
Dim count As String

ref = 2

count = 1
val = 1

GoTo first:

boucle:

count = val + 1



first:


val1 = ""

Do While val1 = ""
val1 = InputBox("quel est cette valeur", "hep toi" )
Loop

val = count

If val1 = ref Then

MsgBox "si ca c'est pas du bol", vbInformation, "moi je telephonerais a ma femme"

Else

MsgBox "ben non c'est pas ca, essaye encore une fois", vbCritical, "pas de bol"

End If

If val1 = ref Then GoTo fin:

If count = 4 Then GoTo niquer:


GoTo boucle:


niquer:

MsgBox "il y a plus débile que moi", vbCritical, "pleure pas"





fin:



End Sub




il est non commenté
c'est voulu. c'est pas trop compliqué et tu saisiras mieux ce que c'esty que de programmé si tu te casse un peu la tête (nb:y'a des tas d'autres facon de faire)


pour faire marcher cet exemple tu ouvre un doc xls

editeur macro
insert module
nomme le essais

tu fais un copier coller

et tu le lance depuis le menu macro


bye