VBAのこれってどうだったっけ?集
お世話になっております、スログラミングです。
※本記事にパチンコ・スロットは一切関係ありませんので、ご容赦ください。
本記事は、VBAのこれってどうだったっけ?集を作っていきます。
ただそれだけです。
目次はこちら
Cellsはどっちが列でどっちが行?
Cells(行, 列)
例えば、A2セルはCells(2, 1)
Cells(行, 列)
ブックの指定、シートの指定
ブックは、Workbooks("ブック名")
シートは、Sheets("シート名")で指定。
Workbooks("ブック名").Sheets("シート名").Cells(行, 列)
'もしくは
Workbooks("ブック名").Worksheets("シート名").Cells(行, 列)
新規ブックの作成
新しいブックは、Workbooks.Addで作成できる
Workbooks.Add
シートのコピー
別のブックからシートをコピー。
先頭に追加するケースと、一番後ろに追加するケース。
' 先頭に追加
Workbooks("コピー元").Sheets("シート名").Copy After:=Workbooks("コピー先").Sheets(1)
' 最後に追加
Workbooks("コピー元").Sheets("シート名").Copy After:=Workbooks("コピー先").Sheets(Workbooks("コピー先").Sheets.count)
for文を抜ける
Exit forでfor文を抜けることができる。
For i = 1 To MaxRow
If "条件式" then
Exit For
End If
Next i
最終行、最終列
最終行(最下行)、最終列(再右列)
MaxRow = Workbooks("ブック名").Worksheets("シート名").Range("A1048576").End(xlUp).Row
MaxCol = Workbooks("ブック名").Worksheets("シート名").Range("XFD1").End(xlToLeft).Column
シートの削除
※アラート(警告)を切っているので、取り扱い注意。
Application.DisplayAlerts = False
Workbooks("ブック名").Worksheets("シート名").Delete
Application.DisplayAlerts = True
画面更新OFF(ちょっと高速化)
マクロ実行中に画面更新しなくなるので、ちょっと早くなる。
Application.ScreenUpdating = False
'元に戻す時
Application.ScreenUpdating = True
コメント
コメントを投稿