Bonjour

J'ai deux macros, Sub macro_Combs() appelle Combin_6N()


Dans macro_Combs je dois récupérer les valeurs de la ligne en cours 500 step 28 pour les
mettre dans vN(J) tableau de 10 élements.

la ligne en cours peut aller de 4 a 10 chiffres

si je fais vN(J) = Sheets("feuil3").Cells(J).Value fonctionne pour 500 step 28
mais avec les même renseignements de la ligne 1 de feuil3


si je fais vN(j)=cells(lig,col).value cela ne fonctionne pas

merci


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Public lig As Integer
Public Col As Integer
>>>>1 ère macro

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub macro_Combs()
 
For Lig = 1 To 100 Step 28
For Col = 1 To 1
 
 
Next
 
Cells(Lig, 17).Select
Call Combin_6N
 
Next
End Sub
>>> 2 ème macro

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Sub Combin_6N()
For J = 1 To 8
 
vN(J) = Sheets("feuil3").Cells(J).Value 
 
Next
End sub