Excel VBA ユーザーフォームの画像の位置を設定する-Top、Left

Excelで、ユーザーフォーム画像をフォームの上や左から位置を設定する記録です。

VBAで設定するには、上からの設定を「Top」プロパティ、左からの位置を「Left」プロパティを使います。

< スポンサーリンク >





画像の位置をVBAで設定

Initializeイベントを使って画像の位置を設定してみます。

ユーザーフォームをダブルクリックします。

Excelユーザーフォーム画像位置

 

右側のプロシージャボックスで「Initialize」を選択します。

Excelユーザーフォーム画像位置

 

画像を上から20ポイント、左から20ポイントに設定するコードです。

Private Sub UserForm_Initialize()
    With Image1
        .Top = 20
        .Left = 20
    End With
End Sub

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

画像の位置をプロパティで設定

VBE上で画像枠をアクティブにし、プロパティウィンドウのボタンをクリックします。

Excelユーザーフォーム画像位置

 

上位置を設定する

プロパティウィンドウの[Top]欄を50ポイントに設定してみます。

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

左位置を設定する

プロパティウィンドウの[Left]欄を50ポイントに設定してみます。

Excelユーザーフォーム画像位置

Excelユーザーフォーム画像位置

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします