Bonjour,
Lors de l'execution de ma Macro, Microsoft Visual Basic me donne une erreur d'executon ('9'), il me dit que l'indice n'appartient pas à la selection !!
Je ne trouve pas d'ou vient l'erreur.
Voici le programme ...
L'erreur parvient au niveau de :
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 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Row = (N2°line + 1) Then Taille = Taille + 1 Compteur = Compteur + 1 Ss_programme_enregistrement_tab N2°line = N2°line + 1 MsgBox Tab_designation(Compteur) MsgBox Tab_prix_uni(Compteur) MsgBox Tab_temps_uni(Compteur) End If End Sub Sub Ss_programme_enregistrement_tab() Tab_designation(Compteur) = Worksheets("Donnèes").Cells(N2°line, 2).Value Tab_prix_uni(Compteur) = Worksheets("Donnèes").Cells(N2°line, 7).Value Tab_temps_uni(Compteur) = Worksheets("Donnèes").Cells(N2°line, 10).Value End Sub
Merci par avance !!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Tab_designation(Compteur) = Worksheets("Donnèes").Cells(N2°line, 2).Value
Partager