XL 2021 incrementation de variable dans une boucle for next

[Utilisateur222.222]

Bonjour à tous,

Je recherche de l'aide car je crée une macro, dans laquelle j'ai des facteurs a0; a1; . . . ; a10

Ces facteurs sont tous différents en fonction du cas rencontré ( 5 cas au total pour lesquels j'ai utilisé un case).

Mais à l'intérieur de chaque case,je souhaite créer une boucle for Next ( avec les bons numeros de lignes à aller chercher en fonction du cas).

Par exemple j'ai essayé :

For i =3 To 10
a = a + i
a = Range("B" + i) (ici, si on est au 1er tour de la boucle dans mon fichier par exemple, je souhaiterais avoir : a1 =2,0003
Next i

Pourriez vous m'aider svp?

 

[patty58]

Bonjour,
Je n'ai pas vraiment compris ce que tu veux.
Vois si cela peut te mettre sur une voie.

Sub trait()
Dim TabFac(8, 1) As Variant
numa = 0
For i = 3 To 10
    numa = numa + 1
    TabFac(numa, 1) = "a" & numa & "/" & Range("B" & i)
Next i
For i = 1 To 8
    Resultat = Split(TabFac(i, 1), "/")
    MsgBox Resultat(0) & " égal " & Resultat(1)
Next i
End Sub

Sinon, sois plus précis.
Bonne fin de journée

 

[Nairolf]

Salut tout le monde,

Je rejoins patty58, sans fichier précis, il va être difficile de répondre précisément.

Donc en imaginant à ma manière, je te propose ceci :

Dim a(8)
...
For i =1 To 8
a(i) = Range("B" & (3+(k-1)*11+i-1))
'k = numéro du cas traité
Next i

A noter qu'il y a des valeurs de a1 à a8 selon ton fichier exemple et que la structure des valeurs doit toujours être identiques d'un cas à l'autre (nombre de ligne entre en-tête de cas).

 

[Gégé-45550]

Bonjour à tous,

Je recherche de l'aide car je crée une macro, dans laquelle j'ai des facteurs a0; a1; . . . ; a10

Ces facteurs sont tous différents en fonction du cas rencontré ( 5 cas au total pour lesquels j'ai utilisé un case).

Mais à l'intérieur de chaque case,je souhaite créer une boucle for Next ( avec les bons numeros de lignes à aller chercher en fonction du cas).

Par exemple j'ai essayé :

For i =3 To 10
a = a + i
a = Range("B" + i) (ici, si on est au 1er tour de la boucle dans mon fichier par exemple, je souhaiterais avoir : a1 =2,0003
Next i

Pourriez vous m'aider svp?

Bonsoir,
Comme les amis précédents, je vois mal la finalité de la chose.
En attache, un exemple de ce qu'on peut faire.
Cordialement,