ExcelＶＢＡで商品一覧を作っています。

GetOpenFilenameで商品画像（ＪＰＧファイル）のパスを取得し
それをフォームのimageオブジェクトに表示させるまではできたんですが
imageのサイズに合わせて画像を縮小表示する(サムネイル)方法が
わかりません。
やりかたをご存知の方がいましたらご教授ください。
よろしくお願いいたします。

No.1 ベストアンサー 回答者： pauNed 回答日時： 2007/07/05 20:24

こんにちは。

PictureSizeModeについて調べてみてください。

Private Sub UserForm_Initialize()
　　Me.Image1.PictureSizeMode = fmPictureSizeModeZoom
End Sub
こんな感じ。プロパティでも設定できます。

この回答へのお礼

ありがとうございます。
設定できました♪

お礼日時：2007/07/06 07:25