プログラムは１行づつ上から下に向かって実行されます。この「Ｄｏ～Ｌｏｏｐ」とは、この上から下への流れを変える手段です。具体的には「Ｄｏ」から「Ｌｏｏｐ」の間をグルグル回転しろという命令です。次の構文を参照してください。この時点で意味は理解しなくても結構です。
Dim i1 As Integer
Dim i2 As Integer
Dim i3 As Long
i1 = 3
i2 = 3
i3 = 0
Do Until Cells(i1, i2) = ""
i3 = i3 + Cells(i1, i2)
i1 = i1 + 1
Loop
上記の構文の７行目以降に「Ｄｏ」で始まり「Ｌｏｏｐ」で終わる部分があります。これがグルグル回れの命令の例になります。
グルグル回すのですが、いつまでも回すわけにはいかないので、終わらせる条件も指定してあります。分かりずらいかと思いますので、１行目から訳してみます。
１行目 整数-32,768 ～ +32,767の値を入れることのできる「i1」という入れ物を準備しろ。
２行目 整数-32,768 ～ +32,767の値を入れることのできる「i2」という入れ物を準備しろ。
３行目 整数-2,147,483,648～2,147,483,647の範囲の値を入れることのできる「i3」という入れ物を準備しろ。
４行目 「i1」という入れ物に整数の３を入れろ
５行目 「i2」という入れ物に整数の３を入れろ
６行目 「i3」という入れ物に整数の０を入れろ
７行目 セルの上から「i1」に指定する行＆セルの左から「i2」に指定する列（ここではi1に３が入っているので上から３行目、i2にも３が入っているのでＣ列→つまりＣ３のセル）が空欄（→""のこと）になるまで、「Ｌｏｏｐ」までの間にある命令を実行しろ。
８行目 セルの「i1」番目の縦の行＆「i2」番目の列にあるセルの値を、「i3」に加えろ。
９行目 i1に１を加えろ。
１０行目 「Ｄｏ」に戻れ
７行目 セルの上から「i1」番目の行＆セルの左から「i2」番目の列（ここではi1に４が入っている（９行目により）ので上から４行目、i2にも３が入っているのでＣ列→つまりＣ４の列）が空欄でなければ以下を実行。
プログラムの意味が分かったところで、このＶＢＡがどのようなワークシートで使われるのかを見ていただくために、下にある「練習用．ｘｌｓｍ」ダウンロードして表を開いてください。
会社の設定する要件やセキュリティの厳しさによりダウンロードできない場合は、ダウンロードできる環境に整えてください（管理者に相談等）。
大変申し訳ありませんが、どうしてもダウンロードできない場合は「表の見本．ｊｐｇ」を、別窓等で参照できるようにして、次にお進みください。
Ｄｏ～Ｌｏｏｐとは２へ続きます。