'Exemple schématique
Dim v1 As Long, v2 As Long, ..., v10 As Long
Dim Nombre_de_variables_nécessaires As Long
'Calcul Nombre_de_variables_nécessaires
Nombre_de_variables_nécessaires = [Code pour le calcul]
'Affectation des variables
For i = 1 To Nombre_de_variables_nécessaires
"v" & i = [La valeur] 'Ma question porte sur cette ligne
Next