1-17 背景画像の位置を設定するユーザーフォーム 2021.11.16
次の書籍の第1章~5章を公開しています。
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」
PictureAlignmentプロパティは、フォームの背景画像の位置を取得・設定します。
※ 画像のサイズモード設定がストレッチだと表示に変化は見られません
プロパティウィンドウでの設定
PictureAlignmentプロパティには5つの設定があります。
・0-fmPictureAlignmentTopLeft:フォームの左上隅に合わせる
・1-fmPictureAlignmentTopRight:フォームの右上隅に合わせる
・2-fmPictureAlignmentCenter:フォームの中央に合わせる
・3-fmPictureAlignmentBottomLeft:フォームの左下隅に合わせる
・4-fmPictureAlignmentBottomRight:フォームの右下隅に合わせる
【例】左から「0,1,2,3,4」の順番
サンプルコード
PictureAlignmentプロパティは、背景画像の有り無しに関わらず設定できます。
次のプログラムは、フォームをクリックすると、画像の位置設定が0~4のサイクルで変わります。
【UserForm1】
Private Sub UserForm_Click() 'クリックすると画像の位置が変更 0→1→2→3→4→0・・・ Dim n As Long n = Me.PictureAlignment If n = 4 Then n = 0 Else n = n + 1 Me.PictureAlignment = n End Sub
書籍紹介140以上のサンプルファイル付き!
知りたいがすぐわかる! やりたいがすぐできる!
「Excel VBA 逆引きで学ぶ ユーザーフォーム&コントロール」(Kindle版)
ユーザーフォームを扱えると、VBAでできることが大きく広がります!
本書では、知りたいこと、やりたいことから、逆引きで学びを深められます。
■ 購入:amazon