← コード一覧へ戻る
実務シート

ワークシートを移動する

練習シートを先頭へ移動します。

実行前に確認

  • まずコピーした練習用ブックで試してください。VBAの変更は通常の[元に戻す]で戻せません。

1サンプルコード

Sub Sample3018()
    If ThisWorkbook.Worksheets("練習").Index > 1 Then ThisWorkbook.Worksheets("練習").Move Before:=ThisWorkbook.Sheets(1)
End Sub

図で見る操作の流れ

イメージ図

概念図:練習シートの内容を保ち、タブの位置だけ変えます。

  1. 対象

    マクロ格納ブックの「練習」シート

  2. マクロ:位置確認

    先頭でなければ、最初のシートより前へ移動

  3. 結果

    練習 → ほかのシート…

すでに先頭なら何も移動しません。

コードの処理を説明する模式図です。実際の画面や実行結果を撮影したものではありません。

使い方・実行手順を確認する3つの手順で、コードの使い方を確認できます
  1. 1

    練習用のブックをExcelマクロ有効ブック(.xlsm)で保存します。シート名を「練習」に変更します。

  2. 2

    Alt+F11でVBEを開き、[挿入]→[標準モジュール]にコードを貼り付けます。

  3. 3

    Sample3018内にカーソルを置いてF5で実行します。練習シートを先頭へ移動します。

使っている機能の公式ドキュメント(Microsoft Learn)