1-18 背景画像を敷き詰めるユーザーフォーム 2021.11.16
次の書籍の第1章~5章を公開しています。
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」
PictureTilingプロパティは、背景画像がフォームより小さな場合、画像を連続して敷き詰めます。
※ 画像のサイズモード設定がストレッチだと表示に変化は見られません
プロパティウィンドウでの設定
PictureTilingプロパティの設定は「True」か「False」です。
「True」にすると、画像が敷き詰められます。
※ 敷き詰める基準位置を変更する場合はPictureAlignmentプロパティを用います
サンプルコード
PictureAlignmentプロパティで画像の位置基準を左上隅にし、PictureTilingプロパティで敷き詰めます。
【UserForm1】
Private Sub UserForm_Click() 'クリックすると画像を敷き詰める '画像の位置基準を左上隅にする Me.PictureAlignment = fmPictureAlignmentTopLeft '画像を敷き詰める Me.PictureTiling = True End Sub
書籍紹介140以上のサンプルファイル付き!
知りたいがすぐわかる! やりたいがすぐできる!
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」(Kindle版)
ユーザーフォームを扱えると、VBAでできることが大きく広がります!
本書では、知りたいこと、やりたいことから、逆引きで学びを深められます。
■ 購入:amazon