ワークシートを移動する
練習シートを先頭へ移動します。
実行前に確認
- まずコピーした練習用ブックで試してください。VBAの変更は通常の[元に戻す]で戻せません。
1サンプルコード
Sub Sample3018()
If ThisWorkbook.Worksheets("練習").Index > 1 Then ThisWorkbook.Worksheets("練習").Move Before:=ThisWorkbook.Sheets(1)
End Sub図で見る操作の流れ
イメージ図概念図:練習シートの内容を保ち、タブの位置だけ変えます。
対象
マクロ格納ブックの「練習」シート
マクロ:位置確認
先頭でなければ、最初のシートより前へ移動
結果
練習 → ほかのシート…
すでに先頭なら何も移動しません。
コードの処理を説明する模式図です。実際の画面や実行結果を撮影したものではありません。
使い方・実行手順を確認する3つの手順で、コードの使い方を確認できます
- 1
練習用のブックをExcelマクロ有効ブック(.xlsm)で保存します。シート名を「練習」に変更します。
- 2
Alt+F11でVBEを開き、[挿入]→[標準モジュール]にコードを貼り付けます。
- 3
Sample3018内にカーソルを置いてF5で実行します。練習シートを先頭へ移動します。