Bouton et matrice identité

Bonjour,

J'aimerais insérer dans mon travail un bouton qui permette lors du clic d'initialiser une matrice identité 19x19 dans le carré de cases définis par B2:U2,B2:B20.

Merci.

Bonjour

Ta question n'est pas assez précise

Donne un exemple sur un fichier xls

Pour cela, regarde joindre un fichier, en haut de cette page.

Cordialement

Bonjour,

Merci pour la réponse et désolé pour la clareté, j'ai réussi en tâtonnant, en fait je débute vraiment en VB donc j'ai un peu de mal voilà la solution de mon problème

Sub Bouton1_QuandClic()

Dim i As Integer

Range("b2:u20") = 0

For i = 18 To 36: Cells(i, i - 10) = 1: Next i

End Sub

G.

Je réctifie.

Sub Bouton1_QuandClic()

Dim i As Integer

Range("b2:u20") = 0

For ]i = 2 To 20: Cells(i, i) = 1: Next i

End Sub