Margoは、Excelワークシートにファイルパスとファイル名を挿入したいと考えています。

彼女は、セルまたはヘッダー/フッターのいずれかに情報を挿入できるようにしたいと考えています。これはExcelで行うのはかなり簡単です。

ファイルパスとファイル名をセルに挿入するには、次の方法でCELLワークシート関数を使用します。

=CELL("filename")

この数式は、次のように、現在のワークシートのパス全体、ファイル名、およびタブ名を返します。

E:\My Data\Excel\[Budget.xls]Sheet1

角かっことシート名を削除する場合は、数式で次のバリエーションを使用できます。

=SUBSTITUTE(LEFT(CELL("filename"),FIND("]",CELL("filename"))-1),"[","")

LEFT関数は右角かっこから文字列の終わりまですべてを取り除き、SUBSTITUTE関数は左角かっこを取り除きます。

パスとファイル名をヘッダーまたはフッターに入れるのは簡単です：

。ヘッダーまたはフッターを変更するワークシートを選択します。

。 [ファイル]メニューから[ページ設定]オプションを選択します。 Excelに[ページ設定]ダイアログボックスが表示されます。

。必要に応じて、[カスタムヘッダー]または[カスタムフッター]ボタンをクリックします。 Wordは、[ヘッダー]または[フッター]ダイアログボックスを表示します。 （図1を参照）

。必要に応じて、挿入ポイントを[左セクション]、[中央セクション]、または[右セクション]ボックスに配置します。

。 [ファイル]ボタンをクリックします。 （一枚の紙が突き出たファイルフォルダのように見えます。）Excelは挿入ポイントに次のコードを挿入します：

。 [OK]を2回クリックして、両方のダイアログボックスを閉じます。

ワークシートを印刷すると、Excelは手順5のコードをそれぞれワークブックのパス名とファイル名に置き換えます。

Excel97またはExcel2000を使用している場合、上記の手順は機能しません。代わりに、マクロを使用してパスとファイル名を挿入する必要があります：

Sub DoFullPath()

ActiveSheet.PageSetup.CenterFooter = _       ActiveWorkbook.FullName End Sub

このマクロは、以降のバージョンのExcelでも機能します。パスとファイル名に別の場所を指定するには、CenterFooterを別の場所（LeftFooter、RightFooter、LeftHeader、CenterHeader、RightHeaderなど）に変更するだけです。マクロアプローチを使用する場合は、ワークブックのファイル名を変更する（[名前を付けて保存]を使用する）か、ワークブックがディスクに保存される場所を変更するたびに、必ず実行する必要があります。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link：/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（2875）は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link：/ excelribbon-Adding_a_File_Path_and_Filename [ファイルパスとファイル名の追加]。