Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


12410 / 13644 ツリー ←次へ | 前へ→

【10626】ファイルのプロパティー取得方法 ken 04/2/3(火) 22:57 質問
【10635】Re:ファイルのプロパティー取得方法 INA 04/2/4(水) 14:08 回答

【10626】ファイルのプロパティー取得方法
質問  ken  - 04/2/3(火) 22:57 -

引用なし
パスワード
   ファイルのプロパティー取得方法

-----------------------------------
Sub Get_WorkbookProperties()
  With ThisWorkbook
    ' タイトル
    Cells(i, 4).Value = .BuiltinDocumentProperties("Title").Value
    ' サブタイトル
    Cells(i, 5).Value = .BuiltinDocumentProperties("Subject").Value
    ' 作成者
    Cells(i, 6).Value = .BuiltinDocumentProperties("Author").Value
  End With
End Sub
-----------------------------------
でプロパティー取得ができることがわかったのですが、
fileネーム(tempfilename)をdir関数で取得しておいて、
  With tempfilename
    ' タイトル
    Cells(i, 4).Value = .BuiltinDocumentProperties("Title").Value
  End With
とか

 Cells(i, 4).Value = tempfilename.BuiltinDocumentProperties("Title").Value
という具合にはできないのでしょうか?


ご教授よろしくお願いします。

【10635】Re:ファイルのプロパティー取得方法
回答  INA  - 04/2/4(水) 14:08 -

引用なし
パスワード
   ブックを開く。→プロパティを取得。→ブックを閉じる。

とするしかないんじゃないかな?

12410 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free