Innehållsförteckning
Även om det inte används särskilt ofta på den här webbplatsen kan du hamna i en situation där du vill använda Gör tills slingan i Excel VBA. Kod som placeras mellan Gör tills och Loop kommer att upprepas tills delen efter Gör till är sann.
Placera en kommandoknapp på ditt kalkylblad och lägg till följande kodrader:
Dim i As Integer
jag = 1
Gör tills jag> 6
Celler (i, 1). Värde = 20
i = i + 1
Slinga
Resultat när du klickar på kommandoknappen på arket:
Förklaring: tills i är högre än 6, placerar Excel VBA värdet 20 i cellen i skärningspunkten mellan rad i och kolumn 1 och ökar i med 1. Som ett resultat placeras värdet 20 i kolumn A sex gånger (inte sju eftersom Excel VBA stannar när i är lika med 7).
