KutoolsforOffice— 1 つのソリューション、5 つの強力なツール。少ない労力で大きな成果。

Excel で開いているワークブック、または現在のワークブックの名前を変更するにはどうすればよいですか?

著者Sun変更日

特定の状況下では、現在開いているExcel ワークブックの名前を変更する必要が生じることがあります。しかし、Excel では標準的なファイルシステム操作を通じて開いているファイルを直接リネームすることはできません。そのため、通常はワークブックを一度閉じて、ファイルエクスプローラーで該当ファイルを探し、その後で名前を変更する必要があります。この手順は煩雑であり、特に複数のファイルを扱っている場合やファイル名を頻繁に変更する必要がある際には、作業フローを中断させてしまいます。本チュートリアルでは、アクティブなワークブックの名前をExcel 内から直接変更できる実用的な方法をいくつかご紹介し、リネーム作業をシンプルかつスムーズに行えるようにサポートします。

「名前を付けて保存」コマンドで開いているワークブックの名前を変更する

開いているワークブックの名前を Office Tab で変更する

VBA コードで開いているワークブックの名前を変更する


「名前を付けて保存」コマンドで開いているワークブックの名前を変更する

現在開いているワークブックの名前を変更したいけれど、ファイルを閉じたり再び開いたりするのは避けたいという方には、名前を付けて保存コマンドが簡単な解決策になります。この方法は、作業中にワークブックのファイル名を手軽に変更したい場合に最適で、すべてのExcel バージョンでご利用いただけます。

1。リボンのファイルタブ(またはExcel 2007 の)Office ボタン)をクリックし、表示されるオプションから名前を付けて保存を選択すると、「名前を付けて保存」ダイアログボックスが下図のように開きます。

「名前を付けて保存」オプションを選択しているスクリーンショット

2。「名前を付けて保存」ダイアログで、ファイル名テキストボックスにワークブックの新しい希望の名前を入力します。たとえば、現在のプロジェクトやバージョンを反映するように名前を調整できます。下のスクリーンショットをご参照ください。

ファイル名を入力しているスクリーンショット

ヒント:Excel 2013 またはExcel 2016 では、「ファイル > 名前を付けて保存」をクリックした後、従来の「名前を付けて保存」ダイアログを開いてファイル名フィールドにアクセスするには、参照をクリックする必要があります。

Excel 2013 および 2016 で「名前を付けて保存」ダイアログボックスを開く方法を示すスクリーンショット

3。「保存」をクリックすると、ワークブックは指定した新しい名前で保存されます。現在のExcel インスタンスはその新しい名前でワークブックを参照するようになりますが、元のファイルは元の場所に変更されずに残ります(後で削除しない限り)。

注意点と実用的なヒント:古いファイルは自動的には削除されません。不要になった場合は、手動で削除することをおすすめします。また、ファイル共有やバージョン管理システムをご利用の際は、ファイル名を変更すると共同作業や既存の参照が途切れる可能性があるため、ご注意ください。

他のファイル内の数式、リンク、または VBA コードが古いファイル名を参照している場合、これらは自動的に更新されません。エラーを防ぐため、依存関係を必ずご確認ください。


開いているワークブックの名前を Office Tab で変更する

複数のワークブックを頻繁に開いて管理し、さらにスピーディーな操作を求めるユーザーにぴったり!Office Tabアドインが、使いやすさを大幅に向上させたソリューションをご提供します。Office Tab を使えば、Web ブラウザーのようにタブ形式のインターフェースでワークブックを快適に操作でき、ファイル名の変更など、さらに便利なファイル管理機能もご利用いただけます。

Office Tab をインストールした後、以下の手順に従ってください。

1。名前を変更したいワークブックに移動します。Excel ウィンドウ上部のワークブックタブを右クリックし、下図のようにコンテキストメニューから名前の変更を選択してください。

ファイルタブを右クリックして「名前の変更」を選択しているスクリーンショット

2。Office Tabダイアログのテキストフィールドに、ワークブックの新しい名前を入力してください。ファイル名に使用できない文字()/ \ : * ? " |など)は入力しないようご注意ください。下のスクリーンショットをご参照ください。

新しい名前を入力しているスクリーンショット

3。「OK」をクリックすると、ワークブックの名前が即座に変更され、閉じたり再び開いたりする必要はありません。この変更はタブとコンピューター上の実際のファイル名の両方に反映されます(下図参照)。

ワークブックの新しい名前を示すスクリーンショット

メリット:この方法は、多数のファイルを同時に管理し、頻繁かつ素早く名前変更する必要があるユーザーに特に役立ちます。直感的なタブ形式のワークフローで、作業を中断することなく効率がアップします。

注意事項:Office Tab は外部アドインのため、別途インストールが必要です。お使いのExcel バージョンとの互換性を事前にご確認ください(Office Tab は最新のほとんどのバージョンで動作します)。最適なパフォーマンスを維持するには、Excel のアップデートによる互換性の問題を避けるため、アドインを定期的に更新してください。


VBA コードで開いているワークブックの名前を変更する

上級ユーザー向けに、VBA(Visual Basic for Applications)では、現在開いているワークブックをプログラムで新しい名前で保存し、必要に応じて元のファイルを削除することで、柔軟に名前変更が可能です。これは、一括リネーム処理を自動化したい場合や、より複雑なマクロワークフローにリネーム手順を組み込みたい場合に特に役立ちます。

この方法を使用する前に、Excel では開いているファイルの名前を直接変更できないことをご理解ください。代わりに、マクロは現在のワークブックを新しいファイル名で保存し、オプションで元のファイルを削除して、新しく生成されたファイルにコンテキストを切り替えます。

1。開発 > Visual Basic」をクリックして、「Microsoft Visual Basic for Applications」ウィンドウを開きます。ウィンドウ内で「挿入 > 標準モジュール」をクリックし、新規モジュールに以下のコードを貼り付けてください。

Sub RenameActiveWorkbook()
    Dim newFullName As String
    Dim oldFullName As String
    Dim fDialog As FileDialog
    Dim response As VbMsgBoxResult
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    oldFullName = ThisWorkbook.FullName
    
    ' Prompt for new file name and location
    Set fDialog = Application.FileDialog(msoFileDialogSaveAs)
    
    With fDialog
        .Title = "Select new file name for the active workbook"
        .InitialFileName = ThisWorkbook.FullName
        
        If .Show = -1 Then
            newFullName = .SelectedItems(1)
        Else
            Exit Sub
        End If
    End With
    
    ' Save the workbook with the new name
    ThisWorkbook.SaveAs Filename:=newFullName, FileFormat:=xlOpenXMLWorkbook
    
    ' Ask if the old file should be deleted
    response = MsgBox("Do you want to delete the old file?" & vbCrLf & oldFullName, vbYesNo + vbQuestion, xTitleId)
    
    If response = vbYes Then
        Kill oldFullName
    End If
    
    MsgBox "Workbook renamed successfully.", vbInformation, xTitleId
End Sub

2。マクロを実行するには、F5キーを押すか、VBA エディターの実行ボタン実行ボタンをクリックします。「名前を付けて保存」ダイアログが表示され、新しいファイル名と現在のワークブックの保存場所を入力できます(特殊文字を含まない有効なファイル名をご使用ください)。

保存後、元のファイルを削除するかどうか確認メッセージが表示されます。「はい」を選択すると、古いファイルは完全に削除(元に戻せません)。「いいえ」を選択すると、元のファイルは変更されずに残ります。現在のセッションは、その新しい名前でワークブックを参照するようになります。

ヒントと注意点:データの誤った損失を防ぐため、このマクロを実行する前に必ずバックアップを作成してください。名前変更後は、ファイル間のリンク、数式、参照がすべて正常に機能していることを確認してください。ファイル名を変更すると、外部参照に影響が出る可能性があります。エラーが発生した場合は、ファイルパスとファイル名を再度確認し、フォルダー内のファイル操作に十分な権限があることをご確認ください。

この方法は、VBA およびファイル管理の自動化に慣れている経験豊富なユーザーに最も適しています。このマクロで問題が発生した場合は、マクロが有効になっていることを確認し、権限関連のエラーが発生する場合はExcel を管理者として実行してみてください。


関連記事:


最高の Office 業務効率化ツール

🤖KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行     コード生成  カスタム数式作成    データ分析とチャート生成  拡張機能呼び出し
人気の機能検索・ハイライト、または重複をマーキング     空白行を削除する     データを失うことなく列の結合またはセルを     数式を使用しない四捨五入...
スーパー LOOKUP複数条件 VLookup    複数値 VLookup     複数シート間 VLookup      ファジーマッチ....
高度なドロップダウンリストドロップダウンリストをすばやく作成     連動型ドロップダウンリスト     複数選択可能なドロップダウンリスト....
列マネージャー指定した数の列を追加列の移動非表示列の表示状態を切り替え範囲および列の比較...
注目の機能グリッドフォーカス     デザインビュー   強化された数式バー    ワークブックとシートマネージャー     リソースライブラリ(オートテキスト)  日付ピッカー     ワークシートの統合    暗号化/セルの復号化    リストからメール送信     スーパーフィルター      特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。
トップ15 ツールセット12 テキストツールテキストの追加特定の文字を削除、...)   50+チャートタイプガントチャート、...)   40+実用的関数誕生日に基づいて年齢を計算します、...)   19 挿入ツールQR コードを挿入パスから画像を挿入、...)   12 変換ツール単語に変換する為替レートの変換、...)   7 結合と分割ツール高度な行のマージセルの分割、...)さらに多数
Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています!

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。


Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

  • Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
  • 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
  • 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

ExcelWordOutlookTabsPowerPoint
  • オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
  • インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
  • 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
  • 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
  • 最高のお得感— 個別アドイン購入よりお得