Bonjour @ tous
Je voudrais créer un UserForm qui affiche simplement le contenu de la cellule B8 puis, lorsque je clique sur un bouton, il m'affiche les informations de la cellule B9, B10...
J'ai écrit ça pour l'instant mais ça ne fonctionne pas. Je dois avouer ne pas etre très calé sur VB...
Private Sub UserForm_Initialize()
Dim cpt As Integer
cpt = 8
Label1 = Sheets('feuil2').Range('B' & cpt).Value
CommandButton1.Caption = 'VRAI'
CommandButton2.Caption = 'FAUX'
End Sub
Private Sub CommandButton1_Click()
cpt = cpt + 1
Label1 = Sheets('feuil2').Range('B' & cpt).Value
End Sub
Il ne me donne aucune erreur mais ne m'affiche rien non plus...
Toute aide sera la bienvenue...
Message édité par: tom59, à: 19/01/2006 23:48
Je voudrais créer un UserForm qui affiche simplement le contenu de la cellule B8 puis, lorsque je clique sur un bouton, il m'affiche les informations de la cellule B9, B10...
J'ai écrit ça pour l'instant mais ça ne fonctionne pas. Je dois avouer ne pas etre très calé sur VB...
Private Sub UserForm_Initialize()
Dim cpt As Integer
cpt = 8
Label1 = Sheets('feuil2').Range('B' & cpt).Value
CommandButton1.Caption = 'VRAI'
CommandButton2.Caption = 'FAUX'
End Sub
Private Sub CommandButton1_Click()
cpt = cpt + 1
Label1 = Sheets('feuil2').Range('B' & cpt).Value
End Sub
Il ne me donne aucune erreur mais ne m'affiche rien non plus...
Toute aide sera la bienvenue...
Message édité par: tom59, à: 19/01/2006 23:48