• ベストアンサー

エクセルのプロパティの「タイトル」欄

「タイトル」欄は、本来は手入力する部分ですが、「名前を付けて保存」したときのファイル名が自動的にセットされる方法はありますか? 例えば「2001年4月売上明細.xls」ならば「2001年4月売上明細」となってほしいです。 WORD及びPPTはそうなりますが、EXCELは空白となってしまいます。 また、登録済みファイルを呼び出したあと、名前を変えて保存するときは、タイトルもその新しいファイル名に塗り変わってほしいです。WORD、PPTも前のままとなります。

  • jorge
  • お礼率60% (3/5)

質問者が選んだベストアンサー

  • ベストアンサー
  • s-mariko
  • ベストアンサー率64% (33/51)
回答No.1

回答ないようなので、作ってみました。 以下のマクロを個人マクロブックに登録して使ってみてください。 #Excelの名前を付けて保存と同じような機能で、プロパティを埋める というマクロです。 Sub savewithTitleProperty() Dim fname, prpTitle As String fname = Application.GetSaveAsFilename(initialfilename:=fname, _ fileFilter:="Microsoft Excel ブック (*.xls), *.xls", _ Title:="ファイル名を付けて保存") prpTitle = fname While InStr(prpTitle, "\") <> 0 prpTitle = Right(prpTitle, Len(prpTitle) - InStr(prpTitle, "\")) Wend prpTitle = Left(prpTitle, Len(prpTitle) - 4) ActiveWorkbook.BuiltinDocumentProperties(1) = prpTitle ActiveWorkbook.SaveAs FileName:=fname End Sub

関連するQ&A

  • Wordのプロパティのタイトル

    WordやExcelなどのプロパティにタイトルというものがあります。使いようによっては便利なのかもしれませんが、非常に邪魔です。 特にWordでは、文章の最初の文字列をファイル名にしようとしますが、普通は保存の時に変更しますよね。 ところが、「タイトル」なるものにも書き込まれているのですが、通常はそこまで変更する人はいないでしょう。 後になって、日付やら宛先やらがタイトルになっているのに気付くのではないでしょうか。 Excelではタイトルの自動入力はされないようなのですが、Wordでもそのような設定はできないのでしょうか? または、保存時に入力したファイル名と同じにすることはできませんか? ご存知の方、よろしくお願いします。

  • Excelブックのプロパティについて。

    Excelブックのプロパティについて。 ○詳細プロパティ<ファイルの概要<タイトル ○詳細プロパティ<ユーザ設定<プロパティ名 ○名前をつけて保存 この、上3つのタイトル、プロパティ名、名前をつけて保存の違いはなんでしょうか? どれも文書の名前に思えるのですが(^_^;) タイトルとプロパティ名は、ファイル名を忘れた時のキーワード検索するためのものでしょうか? 初歩的な質問で申し訳ありません。ご回答よろしくお願いしますm(_ _)m

  • ワードやエクセルなどデータのプロパティ概要のタイトルや作成者を消したい

    ワードやエクセルなどデータのプロパティ概要のタイトルや作成者名を消したいのですが、毎回プロパティを開いて消しては適用してOKを押すのですが、再び作業して保存すると消したはずのタイトルや作成者名が復活しています。ワードエクセルともバージョンは2007です。他の方も同じ質問をされてましたので、回答を読み、そのとおりやってみましたが消えませんでした。古いデータを元に数字や文字を入れ替えて新しい名称で保存したときに古いデータのタイトルや作業した者の名前がでます。データを客先へ渡すときに情報がでるので困っています。完全に消す方法を教えてください。よろしくお願いします。

  • エクセルのマクロでこんな風に設定したい。

    保存するときに、指定したフォルダで「ファイル名をつけて保存」の画面のままで、ファイル名の欄は常に「calus.xls」のままで表示させておくことはできるでしょうか? ファイル名の最初の「calus_」は常に同じなので 後の「***」部分を替えて保存できればいいだけなのですが。  calus_***.xls  calus_***.xls よろしくお願いします。

  • Excelの変更があった時タイトルに目印があった

    表題の件で質問です。 検索しても同様の内容が出て来なかったため、既出の場合はご容赦下さい。 どのバージョンだったか忘れてしまったのですが Excelを開いてなにか変更を行った時、タイトルバーのファイル名に *がつく機能があったような気がするのですが出し方がわかりません。 20120725売上管理.xls を開いて編集し、まだ保存していない状態だと 20120725売上管理.xls*←*の位置は定かではないのですが… のように表示されたようなきがします。 いま使っているExcelは2003です。 どこでその機能を使っていたのか、すっかり忘れてしまったのですが とても便利だったので出し方をご存知の方がいらっしゃいましたら 教えていただけると大変助かります。

  • エクセルについて

    エクセル2000ですが、ワークブックのプロパティで、タイトルやサブタイトルを付けたら、ファイルの検索などで探せるようなことを聞きました。 例えば、ファイル名を「売上表」としたらファイル検索で「売上表」で探せると思うのですが、「ファイル」「プロパティ」の「ファイルの概要」タブでタイトルに「大阪支店」といれて、サブタイトルに「月間売上」といれて保存したとします。「スタート」「検索」「ファイルやフォルダ」で「名前」や「含まれる文字」で上記のタイトルやサブタイトルを入れると探せますか? ちょっとやってみたんですが、探してくれなかったように思います。やり方が違うのか。 検索方法が違うのか?それとも、それは出来ないのか・・・教えてください。

  • ワードなど、プロパティの作成欄の変更方法を教えて下さい

    ワードやエクセルファイルなどで、「プロパティ」を開くと「作成」の欄に既に名前が記されています。 この名前を、変更するにはどうすればいいのでしょうか?(新規ファイルを開いた時点、つまり最初からという意味です。)

  • エクセル VBA についてご教授願います。

    ActiveWorkbook.SaveAs Filename:= "C:\Documents and Settings\ユーザー名\材料明細\" & Range("A1").Value & ".xls" このコマンドで、材料明細に("A1")の値のファイル名で保存しています。 材料明細にいくつかのフォルダがあります。そのフォルダを選択して、("A1")の値のファイル名で保存する方法を教えて下さい。

  • エクセルのファイルの種類について

    エクセルについて質問させてください。 .xlsxではなく.xlsで保存するように指示されたのですが、 使っているパソコンで名前をつけて保存にすると、 ファイルの種類の欄に単一WEBページとかテキストとか、 日本語でファイルの種類が出てきてしまって、 どれが.xlsに該当するのかがわかりません・・・ ご存知の方、教えてください。

  • エクセルの保存マクロで、保存先固定、メッセージなし・・・

    どなたかお願いします。 エクセルの保存マクロで下記の条件を満たすものを教えていただきたいのですが。 1、保存先はデスクトップ固定 2、ファイル名は、名前を付けて保存で 年間売上.xls(上書きモードは不適です) 3、確認メッセージは出さない よろしくお願いいたします(ponta_024)

専門家に質問してみよう