エクセルのVBAでセルのコメントの一部を参照したい

エクセル２０１３でセルについているコメントが数行に改行して記入してあります。このコメントの一部（例えば2行目だけや3行目だけ等）をVBAで参照する方法をどなたか教えてもらえますでしょうか。

No.1 ベストアンサー 回答者： cj_mover 回答日時： 2015/03/31 09:39

こんにちは。

例えば、
まずセルＡ１のコメントテキストを取得して、
改行（Lf）区切りでSplit関数に掛けて配列にしてから、
行を指定して、各行の文字列を取得するやり方。

Sub test()
Dim sCmnt, arrS
　　sCmnt = Range("A1").NoteText
　　arrS = Split(sCmnt, vbLf)
　　MsgBox arrS(0)　'　１行め
　　MsgBox arrS(1)　'　２行め
　　MsgBox arrS(2)　'　３行め
　　MsgBox arrS(3)　'　４行め
End Sub

例えば、バッサリ省略して、１行で
　　MsgBox Split(Range("A1").NoteText, vbLf)(1)　'　２行め
のように書けなくもないです。

この回答へのお礼

早速の回答ありがとうございます。
無事に動きました。
大変勉強になりました。
本当にありがとうございました。

お礼日時：2015/03/31 21:31