Comment utiliser un compteur comme argument dans les fonctions?

Question

une boucle standard dans Excel VBA va comme ceci:

dim i as integer 
for i = 1 to 100 
<do program> 
next 
end sub 

Maintenant, ma question est: comment puis-je utiliser le compteur, je, comme un argument dans le programme?

exemple:

dim i as integer 
for i = 1 to 100 

If Range("Ci") = 0 Then 
Rows("i:i").Select 
Rows.Delete 

next 
end sub 

Answer 1

Vous devriez être en mesure de faire quelque chose comme ceci:

dim i as integer 
for i = 1 to 100 

     If Range("C" & i) = 0 Then 
      Rows(i & ":" & i).Select 
      Rows.Delete 
     end if 
next 
end sub 

Le & est l'opérateur de concaténation qui est utilisé pour ajouter une chaîne sur une autre chaîne.

maintenant i est évidemment un certain nombre dans l'exemple ci-dessus, mais VBScript est assez intelligent pour savoir ce que vous faites et, par exemple, il suffit de coller "C" et la valeur actuelle de i ensemble.