Excelで(リストから)セルの値に基づいてシートの名前を変更するにはどうすればよいですか?
Excelで単一のワークシートの名前を変更するには、通常、シートのタブを右クリックしてコンテキストメニューから「名前変更」を選択します。ただし、指定されたセルの値を使用して複数のワークシートの名前を変更したり、特定のセルの値に基づいてワークシートを動的に名前付けたりする必要がある場合は、いくつかの方法があります。この記事では、これらの手法について説明し、プロセスを簡単かつ効率的にします。
VBAを使用してセルの値からシートを動的に名前変更する
ExcelでVBAを使用して特定のセルの値に基づいてワークシートを動的に名前変更することができます。以下の手順に従ってください:
ステップ 1: セルの値によって動的に名前を付けるワークシートのシート名を右クリックし、「コードの表示」を選択します。 コードの表示 を右クリックメニューから選択します。
ステップ 2: 開いたMicrosoft Visual Basic for Applicationsウィンドウで、次のVBAコードをモジュールウィンドウに貼り付けます。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set Target = Range("A1")
If Target = "" Then Exit Sub
Application.ActiveSheet.Name = VBA.Left(Target, 31)
Exit Sub
End Sub
ヒント: このVBAは、セルA1の値に基づいてワークシートの名前を動的に変更します。「A1」を他のセルに変更できます。
ステップ 3: VBAコードを保存し、Microsoft Visual Basic for Applicationsウィンドウを閉じます。
これで、シート名が指定されたセルの値に基づいて動的に変更されます。
注意:
- 指定されたセルが空白の場合、ワークシートは名前変更されません。
- 指定されたセルの値を変更するたびに、ワークシートの名前が変更されます。
- 指定されたセルに特殊文字(例:*)を入力すると、エラー警告が表示されます。
対応するシート内のセルの値に基づいて複数のシートの名前を変更する
前述の方法では、一度に1つのシートの名前を変更できます。しかし、Kutools for Excelの「複数のワークシートの名前変更」機能を使用することで、各対応するシート内の指定されたセルの値に基づいてすべてまたは複数のシートを迅速に名前変更できます。例えば、各シートをそのシートのセルA1の値に一致するように名前変更できます。
- クリックしてください Kutools Plus > Worksheet > Rename Worksheets。スクリーンショットをご覧ください:
- 開かれた Rename Multiple Worksheets ダイアログボックスで、以下のように設定してください:
- ワークシートリストで、名前を変更するワークシートをチェックします。
- 名前のスタイルセクションで、「元のシート名を置き換える」オプションをチェックします。
- 新しいワークシート名セクションで、「対応するワークシートのセルから」オプションをチェックし、名前を変更する対象となるセルを指定します。
- 「OK」ボタンをクリックします。
これで、すべてのチェックされたシートが各シートの指定されたセルに基づいて名前変更されました。スクリーンショットをご覧ください:
注: 「複数のワークシートの名前変更」機能を利用したいですか?今すぐKutools for Excelをダウンロードしてください!さらに、Kutoolsには300以上の機能があり、30日間の無料トライアルを提供しています。待たずに、ぜひお試しください!
指定されたリストから複数のシートの名前を変更する
Kutools for Excelの「複数のワークシートの名前変更」機能は、指定されたリスト内のセルの値に基づいて複数のシートの名前を変更することもサポートしています。
- クリックしてください Kutools Plus > Worksheet > Rename Worksheets.
- 開かれた Rename Multiple Worksheets ダイアログボックスで、次のように設定します:
これで、すべてのチェックされたワークシートの名前が指定されたリスト内のセルの値に置き換えられます。下のスクリーンショットをご覧ください:
注: 「複数のワークシートの名前変更」機能を利用したいですか?今すぐKutools for Excelをダウンロードしてください!さらに、Kutoolsには300以上の機能があり、30日間の無料トライアルを提供しています。待たずに、ぜひお試しください!
デモ:Excelで(リストから)セルの値に基づいてシートに名前を付ける
関連記事:
最高のオフィス生産性ツール
🤖 | Kutools AI アシスタント: データ分析を革命化する: インテリジェント実行 | コード生成 | カスタム数式の作成 | データを分析しグラフを生成 | 拡張機能を呼び出す… |
人気の機能: 重複を見つけてハイライトまたはマーキング | 空白行を削除 | データを失わずに列またはセルを統合 | 丸める ... | |
スーパーLOOKUP: 複数条件のVLookup | 複数値のVLookup | 複数シートの検索 | ファジーマッチ .... | |
高度なドロップダウンリスト: ドロップダウンリストを迅速に作成 | 依存ドロップダウンリスト | マルチセレクトドロップダウンリスト .... | |
列管理: 特定の数の列を追加 | 列を移動 | 非表示列の可視ステータスを切り替え | 範囲と列を比較 ... | |
注目の機能: グリッドフォーカス | デザインビュー | 強化された数式バー | ワークブック & ワークシート管理 | オートテキスト ライブラリ (Auto Text) | 日付ピッカー | データの統合 | セルの暗号化/復号化 | リストで電子メールを送信 | スーパーフィルター | 特殊フィルタ (太字/斜体/取り消し線をフィルタリング...) ... | |
トップ15のツールセット: 12 のテキストツール (テキストの追加, 特定の文字を削除, ...) | 50以上 のグラフ の種類 (ガントチャート, ...) | 40以上の実用的な 数式 (誕生日に基づいて年齢を計算する, ...) | 19 の挿入ツール (QRコードの挿入, パスから画像を挿入, ...) | 12 の変換ツール (単語に変換する, 通貨変換, ...) | 7 の統合 & セルの分割ツール (高度な行のマージ, セルの分割, ...) | ...さらに多く |
Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、300以上の高度な機能を提供し、生産性を向上させ、保存時間を節約します。 最も必要な機能を入手するにはここをクリック...
Office TabはOfficeにタブインターフェイスをもたらし、作業を非常に簡単にします
- Word、Excel、PowerPoint、Publisher、Access、Visio、Projectでタブ付きの編集と読み取りを有効にします。
- 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
- 生産性を50%向上させ、毎日数百回のマウスクリックを減らします!