ต้องการเปิดไฟล์มา แล้วให้รูปขึ้นมาครับ
Posted: Thu Jun 11, 2020 8:58 am
ต้องการเปิดไฟล์มา แล้วให้รูปแสดงขึ้นมาเลยครับ
รูป แสดงใน Sheets("Home")
code
code อยู่ใน ThisWorkbook ครับ
รูป แสดงใน Sheets("Home")
code
Code: Select all
Private Sub Workbook_Open()
Sheets("Home").Select
Sheets("Home").Image1.Picture = LoadPicture("D:\Store\image\icono1.png")
Sheets("Home").Image2.Picture = LoadPicture("D:\Store\image\Tool.jpg")
Sheets("Home").Image3.Picture = LoadPicture("D:\Store\image\calibrate.png")
End Sub