|
お世話になります。
シートのA列に画像ファイルのフルパス、B列にコメントを書いて写真をシートに貼り、別マクロを写真に登録して、写真を押すとコメントを表示するようにしています。これを名前とコメント、ふたつの文章を写真に設定したいのですが
Nameの他に文章設定する方法があるのかが分かりません。
HELPをインストールしていない(持っていない)ため、本やNetでPictureのプロパティを調べたのですが目的のものが検索できませんでした。
思いつくままにMemo,Comment、Caption、TextなどをWithの中に入れてみましたがやっぱり無駄でした。
写真にふたつの文書を設定する方法、可能でしたら教授願います。
ちなみにコードは下記の通りです。
For i = 1 To 5
Cells(i * 15, 1).Activate
myFile = Cells(i, 1).Value
With ActiveSheet.Pictures.Insert(myFile)
.ShapeRange.LockAspectRatio = msoTrue
.ShapeRange.Height = 200#
.Name = Cells(i, 2).Value
End With
Next
|
|