目的 | コマンド |
シートを選択 | Sheets(“Input”).Select |
名前/名前の変更 | ActiveSheet.Name = “NewName” |
シートの追加 | Sheets.Add |
新しい名前でシートを追加 | Sheets.Add.Name = “NewSheet” |
シートのコピー | Sheets(“Sheet1”).Copy |
シートのコピー | Sheets(“Sheet1”).Delete |
シートのクリア | Sheets(“Sheet1”).Cells.Clear |
ワークブック追加 | Workbooks.Add |
ブックを閉じる | Workbooks(“Book1”).Close SaveChanges:=False Workbooks(“Book1”).Close SaveChanges:=True |
保存する | Workbooks(“Book1”).Save |
名前をつけて保存する | Workbooks(“Book1”).SaveAs strFileName |
最初に開いたブックを表示 | Workbooks(1).Activate |
セルをアクティブ化 | Range(“A1”).Activate Cells(3,2).Activate |
セルをコピー | Range(“A1:B2”).Copy |
セルをカット | Range(“A1:B2”).Cut |
マージ/アンマージ | Range(“A1:A2”).Merge Range(“A1:A2”).UnMerge |
セルをカウント | Range(“A1:A2”).Count |
セルをクリア | Range(“A1:A2”).Clear Range(“A1:A2”).ClearContents Range(“A1:A2”).ClearFormat |
セルを削除 | Range(“A1:B2”).Delete |
行をアクティブ化 | Rows(1).Activate |
最後の行 | Dim lRow as long lRow = Cells(Rows.Count, 1).End(xlUp).Row |
コードを停止してエラーを表示 | On Error Goto 0 |
エラーをスキップして実行を継続 | On Error Resume Next |
エラーをクリア(リセット) | On Error GoTo -1 |
テキスト比較 | Opetion Compare Text |
目的 | コマンド |
文字列を検索し位置を返す | InStr(対象, “検索したい文字列”) |
文字列から文字列を抜き出す | Mid(対象文字列, 抜き出す開始,抜き出す長さ) |
Dim 変数 As データ型
コメント