[ホーム] ＞ [VBScript FAQ 一覧] ＞ [列のすべてのセルをループして処理するサンプルプログラム]

列のすべてのセルをループして処理するサンプルプログラム | VBScript / VBA FAQ

ExcelのVBAにおいて、列のすべてのセルをループして処理するサンプルプログラムです。

サンプル========================================
1列目(A列)の1行目から入力済の最後の行まで処理を行う。
　 (値を代入している)　

i = 1
maxrow = Cells(Rows.Count, 1).End(xlUp).Row
Do While i <> maxrow + 1
Cells(i, 1).Value = CStr(i)
i = i + 1
Loop

================================================

[ホーム] ＞ [VBScript FAQ 一覧]