OVH Cloud OVH Cloud

FOR j = ????

5 réponses
Avatar
AlbatroZ
Salut tout le monde,

J'ai une boucle:

For J = 9 To 10

For i = 8 To Cells(65000, 5).End(xlUp).Row
Cells(i, J).Value = Cells(i, J).Value * 2200
Next i
Next J

Je veux en fait que J prenne successivement les valeurs 2 puis 4 , 6
7 9 et 10

Comment dois je faire, je ne trouve pas la bonne syntaxe

MERCI D'AVANCE DE VOTRE AIDE

5 réponses

Avatar
Garette
Bonsoir,

Je propose ceci :

Sub test()
For J = 2 To 10 Step 2
If J = 8 Then J = 7

'Mettre ici le code à executer
MsgBox J 'Pour voir

If J = 9 Then J = 8
Next
End Sub


"AlbatroZ" a écrit dans le message de news:

Salut tout le monde,

J'ai une boucle:

For J = 9 To 10

For i = 8 To Cells(65000, 5).End(xlUp).Row
Cells(i, J).Value = Cells(i, J).Value * 2200
Next i
Next J

Je veux en fait que J prenne successivement les valeurs 2 puis 4 , 6
7 9 et 10

Comment dois je faire, je ne trouve pas la bonne syntaxe

MERCI D'AVANCE DE VOTRE AIDE



Avatar
JB
Bonsoir,

For Each j In Array(2, 4, 6, 7,9,10)
MsgBox j
Next j

JB

On 15 fév, 20:32, "AlbatroZ" wrote:
Salut tout le monde,

J'ai une boucle:

For J = 9 To 10

For i = 8 To Cells(65000, 5).End(xlUp).Row
Cells(i, J).Value = Cells(i, J).Value * 2200
Next i
Next J

Je veux en fait que J prenne successivement les valeurs 2 puis 4 , 6
7 9 et 10

Comment dois je faire, je ne trouve pas la bonne syntaxe

MERCI D'AVANCE DE VOTRE AIDE


Avatar
AlbatroZ
Encore une fois, tres fin et efficace, merci Garette.

N'y a t'il pas moyen d'ecrire un truc du genre
for J= [2,4,6,7,9,10]

???

Bien entendu la syntaxe est fausse mais l'idee est la.

Juste par curiosite pour la prochaine fois

MErci encore
Avatar
AlbatroZ
Ben voila j'ai ma reponse,
merci JB
Avatar
Garette
La solution de JB, c'est nettement mieux ...


"AlbatroZ" a écrit dans le message de news:

Encore une fois, tres fin et efficace, merci Garette.

N'y a t'il pas moyen d'ecrire un truc du genre
for J= [2,4,6,7,9,10]

???

Bien entendu la syntaxe est fausse mais l'idee est la.

Juste par curiosite pour la prochaine fois

MErci encore