Quote Originariamente inviata da renygade Visualizza il messaggio
Certo che si può.. é la condizione più banale.
codice:
Dim contatore as Integer 'variabile contatore
Contatore = 0
Do
   .... Le tue istruzioni
   contatore = contatore+1

Loop Until contatore >9
In questo caso il blocco istruzioni tra do e loop viene eseguito 10 volte (da 0 a 9).
La variabile contatore viene infatti incrementata di 1 a ogni ciclo. La condizione >9 è vera finché contatore è inferiore a 9. Quando viene incrementato fino a 10 la condizione specifica da until si verifica e il ciclo termina. Facile no?
quindi nel mio caso diverrà
codice:
Dim contatore as Integer 
Contatore = 0
Do
   
    Selection.TypeText Text:="', '"

    Selection.MoveLeft Unit:=wdCharacter, Count:=4

    Selection.MoveDown Unit:=wdLine, Count:=1

    Selection.TypeText Text:="', '"

    Selection.MoveLeft Unit:=wdCharacter, Count:=4

    Selection.MoveDown Unit:=wdLine, Count:=1

    contatore = contatore+1

Loop Until contatore >279892
End sub
giusto?