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
コメント
コメントを投稿