ユーザーフォームのImage(画像)を操作する : Excel(エクセル)

Excel VBAでユーザーフォームのImageコントロールに、画像ファイルをロードし、画像のサイズを取得します。

Excel Tipsメニューに戻る

スポンサーリンク






準備

Excelユーザーフォームの適当な位置にImageコントロールを置いてください。

ExcelユーザーフォームのVBAコード

Private Sub CommandButton2_Click()
    '画像をロードする
    UserForm1.Image1.Picture = LoadPicture("c:\cn小.jpg")

    'Imageサイズを自動的に画像に合わせる
    UserForm1.Image1.AutoSize = True
    
    '画像サイズを取得し表示する
    UserForm1.Caption = "幅:" & UserForm1.Image1.Width & "  高さ:" & UserForm1.Image1.Height

End Sub

スポンサーリンク






Excel Tipsメニューに戻る

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved