bonsoir

comment reduire mon code de 15x15 boutons qui et tres lourd et tres long a ouvrir

un extrait des 255 codes

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub CommandButton1_Click()
Application.Goto Reference:=Range("c4"), Scroll:=True
End Sub
Private Sub CommandButton2_Click()
Application.Goto Reference:=Range("c39 "), Scroll:=True
End Sub
Private Sub CommandButton3_Click()
Application.Goto Reference:=Range("c74 "), Scroll:=True
End Sub
Private Sub CommandButton4_Click()
Application.Goto Reference:=Range("c109 "), Scroll:=True
End Sub
Private Sub CommandButton5_Click()
Application.Goto Reference:=Range("c144 "), Scroll:=True
End Sub
Private Sub CommandButton6_Click()
Application.Goto Reference:=Range("c179 "), Scroll:=True
End Sub
Private Sub CommandButton7_Click()
Application.Goto Reference:=Range("c214 "), Scroll:=True
End Sub
Private Sub CommandButton8_Click()
Application.Goto Reference:=Range("c249 "), Scroll:=True
End Sub
Private Sub CommandButton9_Click()
Application.Goto Reference:=Range("c284 "), Scroll:=True
End Sub
Private Sub CommandButton10_Click()
Application.Goto Reference:=Range("c319 "), Scroll:=True
End Sub
Private Sub CommandButton11_Click()
Application.Goto Reference:=Range("c354 "), Scroll:=True
End Sub
pour être plus clair j ai 15 tableaux avec 15 boutons
ex:les boutons 3,18,33,48 ect ect correspondent au tableau 3 donc j ai 15 bouton qui vont au tableau 3
j espère être clair

merci d avance