つらつら Excel VBA

私の備忘録です。

フォームに画像ファイル表示

Dim gazou As String
gazou = ThisWorkbook.Path & "\gif\gazou.gif"
Image1.Picture = LoadPicture(gazou)