Excelは、会社のデータと会計を維持するための単なるツールではありません。その力は、ほとんどすべてのものを簡単かつ迅速に分類および管理するのに役立つという点にあります。議題、作業領域、アドレス帳、請求書テンプレート、出席記録などを作成できます。ただし、Excelでは、ワークブックシートを整理できません。これは、長い本を扱う場合に非常に便利です。ただし、Visual Basicコードのマクロを使用して、Excelのタブを自動的に並べ替えることができます。その方法を段階的に説明します。
「Visual Basicコードでのマクロ」という言葉は威圧的かもしれませんが、すべてが思ったより簡単です。マクロは、Excelで一連のアクションを実行する小さなプログラムであり、反復的なタスクを自動化します。マクロは、Visual Basic for Applications(またはVBA)コードで書かれています。これは、Excelの機能にアクセスして拡張できるプログラミング言語です。
Visual Basicエディター
マクロを作成するには、Excelでブックを開く必要があり、タブの数が多いほど良いです。
VBAエディターを開くには、キーボードショートカットAlt + F11を使用します。エディターウィンドウが表示されたら、Personal.xlsという特定のExcelブックを検索します。この本には、その中で行うことはすべてのワークブックに影響するという特性があります。つまり、マクロを作成すれば、いつでもそれを使用できます。
個人の本が見つからなくても心配はいりません。エディターを終了し、[ Excelの表示 ]タブを開いて[ マクロ ]メニューをプルダウンし、[ マクロの記録 ] を選択します。マクロをパーソナルマクロブックに保存し、記録を開始します。次に、マクロメニューを再度表示して、記録を停止します。あなたはすでに「特別な」本を持っています。
これで、新しいモジュールを作成する準備がすべて整いました。Alt + F11でVBAエディターを開き、Personal.xlsブックを選択して、[ 挿入 ] > [モジュール ]をクリックします。カーソルをモジュールウィンドウに置き、次のコードを記述します。
Sub SortSheets_Ascendant()
a = 1 To Sheets.Countの場合
For s = a + 1 To Sheets.Count
UCase(シート(a).Name)> UCase(シート(s).Name)の場合
Sheets(s).Move Before:= Sheets(a)
終了する場合
次の
の隣に
End Sub
ウィンドウを閉じると、マクロが自動的に保存されます。それが機能することを確認するだけです。タブを並べ替える本を開くか、表示に移動してマクロをクリックするか、キーボードショートカットAlt + F8を押します。SortSheets_Ascendantをダブルクリックすると、ブックのタブがアルファベット順に配置されます。
Excelを閉じると、マクロに加えた変更を保存するかどうかをプログラムから尋ねられます。承諾すると、マクロが保存され、必要な本で使用できるようになります。
シートを降順に並べ替え
いくつかの小さなコード変更で、逆の効果を実現できます。つまり、タブをアルファベットの降順で並べ替えます。マクロを作成するプロセスを繰り返し、今度は次のコードを挿入します。
Sub SortSheets_Descending()
a = 1 To Sheets.Countの場合
For s = a + 1 To Sheets.Count
UCase(シート(a).Name)<UCase(シート(s).Name)の場合
Sheets(s).Move Before:= Sheets(a)
終了する場合
次の
の隣に
End Sub
バリエーションは2つだけです。もちろん、最初はマクロの名前です。2番目は、コードの4行目の>から<への変更です。これは、本のシートの順序が方向を変えることを意味します。表示>マクロ(またはAlt + F8ショートカット)をクリックすると、新しく作成された2つのマクロが表示されます。SortSheets_Descendingをダブルクリックし、その効果を満足して確認します。
Excelの終了時に変更を保存すると、いつでもこれら2つのマクロを使用できるようになります。特にかさばるExcelブックのタブを処理するときに、多くの時間と労力を節約できます。