ワークシートタブの順序を逆にするにはどうすればよいですか？

ワークブックに多くのワークシートがある場合、次のスクリーンショットに示すように、すべてのワークシートの順序を一度に逆にしたことはありますか？今日は、このタスクに対処するためのいくつかの簡単な方法をご紹介します。

VBAコードを使用してすべてのワークシートタブの順序を逆にする

Kutools for Excelを使用してすべてのワークシートタブの順序を逆にする

VBAコードを使用してすべてのワークシートタブの順序を逆にする

VBAコードに精通している場合、次のコードがあなたの役に立つでしょう。以下の手順で行ってください：

1. ALT + F11キーを押しながら押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. 「挿入」＞「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBAコード：ワークシートの順序を逆にする

Sub ReverseSheets()
'Update 20140526
Dim xCount As Integer
xCount = Application.ActiveWorkbook.Worksheets.Count
For i = 1 To xCount - 1
    Application.Worksheets(1).Move After:=Application.Worksheets(xCount - i + 1)
Next
End Sub

3. そして F5キーを押してこのコードを実行すると、すべてのワークシートタブの順序がすぐに逆になります。

ヒント：もう一度 F5キーを押すと、すべてのワークシートは元の順序に戻ります。

Kutools for Excelを使用してすべてのワークシートタブの順序を逆にする

上記のコードを適用するのは少し難しいかもしれません。ここで便利なツールであるKutools for Excelがあります。その「すべてのシートを並べ替える」機能を使えば、ワークシートタブの順序を素早く簡単に逆にすることができます。

Kutools for Excelには300以上の便利なExcelツールが含まれています。30日間無制限で無料試用できます。今すぐ入手してください。

Kutools for Excelをインストールしたら、次の手順を行ってください：

1. 「Kutools Plus」＞「ワークシート」＞「すべてのシートを並べ替える」をクリックします。

2. そして、「すべてのシートを並べ替える」ダイアログボックスで、右下隅にある「逆順に並べ替える」ボタンをクリックするだけです。スクリーンショットをご覧ください：

3. その後、「OK」ボタンをクリックすると、アクティブなワークブック内のすべてのシートタブが目的通りに逆になります。スクリーンショットをご覧ください：

ヒント：Kutools for Excelの「すべてのシートを並べ替える」機能を使用すると、色やアルファベットなどでタブを並べ替えることもできます。

この「すべてのシートを並べ替える」機能についてさらに詳しく知るにはクリックしてください。

関連記事：

Excelでワークシートをアルファベット順/英数字順に並べ替えるにはどうすればよいですか？

Excelでワークシートタブを色で並べ替えるにはどうすればよいですか？