Bonjour,
Je suis actuellement en train de créer un jeu de solitaire (billes) sur excel via VBA.
J'ai fais mon solitaire sur un userform1 (les cases étant des carrés images) que j'affiche lorsqu'on clique sur le bouton "solitaire" sur excel.
Aperçu de mon userform1:
Ensuite, le solitaire apparaît donc et deux boutons avec: "jouer" et "abandonner".
Mon problème est que j'aimerai que mon bouton "jouer" initialise la partie en remplaçant les carrés image vide par mon image de bille.
Notez que j'ai importé l'image de ma bille (faites sur paint) dans le userform1 dans un carré image à part (en le mettant invisible lorsque l'on joue)
J'ai donc essayé ceci (qui ne fonctionne pas ^^):
Private Sub CommandButton2_Click()
For i=1 to 32
Imagei = image34
Next
End Sub
L'image 34 étant ma bille!
Votre aide est la bienvenue..
Je suis actuellement en train de créer un jeu de solitaire (billes) sur excel via VBA.
J'ai fais mon solitaire sur un userform1 (les cases étant des carrés images) que j'affiche lorsqu'on clique sur le bouton "solitaire" sur excel.
Aperçu de mon userform1:
Ensuite, le solitaire apparaît donc et deux boutons avec: "jouer" et "abandonner".
Mon problème est que j'aimerai que mon bouton "jouer" initialise la partie en remplaçant les carrés image vide par mon image de bille.
Notez que j'ai importé l'image de ma bille (faites sur paint) dans le userform1 dans un carré image à part (en le mettant invisible lorsque l'on joue)
J'ai donc essayé ceci (qui ne fonctionne pas ^^):
Private Sub CommandButton2_Click()
For i=1 to 32
Imagei = image34
Next
End Sub
L'image 34 étant ma bille!
Votre aide est la bienvenue..