[[20090402151812]]　『ブックを開かないでコメントを取得』（shut）　ページの最後に飛ぶ

『ブックを開かないでコメントを取得』（shut）

 ブックを開かないでセルの値を取得するのは、
    MsgBox ExecuteExcel4Macro("'C:\[Book1.xls]Sheet1'!R1C1")
 ですが、そのセルのコメントって取得出来ませんか？

 ExecuteExcel4Macroをどうしても使いたいということですか？
開いたブックなら、次の構文で取得できます。
MsgBox Application.ExecuteExcel4Macro("GET.NOTE(""'[Book1.xls]Sheet1'!R1C1"")")
　
閉じていると、フルパスでも取得できないかもしれません。
少なくとも、できる、という記述は見つかりませんでした。
　
ScreenUpdatingで画面表示をコントロールして、
開いても開いていないかのように見せかけた方が扱いやすいコーディングになる
ような気はします。
　
Application.ScreenUpdating = False
Workbooks.Open "C:\Book1.xls"
MsgBox Workbooks("book1.xls").Worksheets("Sheet1").Cells(1, 1).Comment.Text
Workbooks("Book1.xls").Close SaveChanges:=False
Application.ScreenUpdating = True
　
(みやほりん)(-_∂)b

 みやほりんさん有り難う御座います。(shut)
 ScreenUpdating使った事がありませんので、試してみます。

コメント返信：

[ 一覧(最新更新順) ]

[[20090402151812]] 『ブックを開かないでコメントを取得』（shut） ページの最後に飛ぶ

[[20090402151812]]　『ブックを開かないでコメントを取得』（shut）　ページの最後に飛ぶ