エクセルのシート名について。。。

質問

エクセルで、sheet1となっているのを2005/06/06と修正したときにＡ１のセルにも日付が入るようにシートとセルを反映したいのですが、どのようにしたらなるのか教えて下さい。

回答No.3

ta123

EXCEL2002での検証です。

1.まず。シート名に"/"は使えません。

2.シート名取得にはCELL関数を使います。
　=CELL("filename")
これで、以下の形式で情報が表示されると思います。

　　パス[ファイル名]シート名

3.シート名を例えば2005.06.06のように長さが固定長の場合
　以下の関数でシート名だけを取り出すことができます。

　=RIGHT(CELL("filename"),10)

お礼

ありがとうございました。助かりました。

回答No.2

mu2011

以下の方法で如何でしょうか。

シート名では、「／」は使用できませんので別のセパレータ（例えば「．」）でお願いします。

セル側は以下の通りです。
=MID(CELL("filename"),FIND("]",CELL("filename"))+1,31)

お礼

ありがとうございました。助かりました。

回答No.1

Protel99

シート右クリック　→　コードの表示
以下を記述すればよいです。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Range("A1").Value = ActiveSheet.Name
End Sub

お礼

ありがとうございました。助かりました。