ผมสร้างไฟล์ Excel ที่มี VBA ที่เป็นการแปลง Link รูปจาก Internet มาแสดงผลเป็นรูปใน Excel (ในรูปแบบ Object รูป) โดยไฟล์นี้สร้างจาก Excel 2007 และใช้งานได้ปกติในเครื่องคอมเครื่องที่สร้างไฟล์ Excel นี้ (เครื่องที่ 1)
Code ที่ใช้คือ
Dim url_column As Range
Dim image_column As Range
Dim myPicture As Object
Set myPicture = Range("d12").Worksheet.Pictures.Insert(Range("f10").Value) '----- ติด Error ที่บรรทัดนี้ (D12=ตำแหน่งรูป, F10=URLรูป)
With myPicture
.ShapeRange.LockAspectRatio = msoTrue
.Height = 200
.Width = 200
.Top = Rows("12").Top
.Left = Columns("D").Left
End With
End Sub
แต่พอย้ายมาใช้งานในเครื่องคอม Excel 2007 อีกเครื่องหนึ่ง (เครื่องที่ 2) พบว่าไม่สามารถ Run VBA ได้ โดยขึ้นเตือนว่า
Run Time-Error 1004 Unable to get the Insert property of the Picture class
โดยในเครื่องที่ขึ้น Error นี้ได้ทำการ Enable All Macro และ Trust access to VBA แล้ว
ผมลองเอาไฟล์เดียวกันนี้ไปเปิดในเครื่องคอมอีกเครื่อง (เครื่องที่ 3) เป็น Excel 2013 ก็ใช้ได้ตามปกติ ซึ่งผมคาดว่า Code ไม่ได้มีปัญหาเพราะใช้งานได้กับเครื่องอื่นแต่ไม่รู้ว่าเครื่องที่ 2 ติดอะไร
รบกวนช่วยผู้รู้ช่วยแนะนำวิธีแก้ไขหน่อยครับ
ขอบคุณครับ
ช่วยด้วย!!! ติด Run Time-Error 1004 Unable to get the Insert property of the Picture class
Code ที่ใช้คือ
Dim url_column As Range
Dim image_column As Range
Dim myPicture As Object
Set myPicture = Range("d12").Worksheet.Pictures.Insert(Range("f10").Value) '----- ติด Error ที่บรรทัดนี้ (D12=ตำแหน่งรูป, F10=URLรูป)
With myPicture
.ShapeRange.LockAspectRatio = msoTrue
.Height = 200
.Width = 200
.Top = Rows("12").Top
.Left = Columns("D").Left
End With
End Sub
แต่พอย้ายมาใช้งานในเครื่องคอม Excel 2007 อีกเครื่องหนึ่ง (เครื่องที่ 2) พบว่าไม่สามารถ Run VBA ได้ โดยขึ้นเตือนว่า
Run Time-Error 1004 Unable to get the Insert property of the Picture class
โดยในเครื่องที่ขึ้น Error นี้ได้ทำการ Enable All Macro และ Trust access to VBA แล้ว
ผมลองเอาไฟล์เดียวกันนี้ไปเปิดในเครื่องคอมอีกเครื่อง (เครื่องที่ 3) เป็น Excel 2013 ก็ใช้ได้ตามปกติ ซึ่งผมคาดว่า Code ไม่ได้มีปัญหาเพราะใช้งานได้กับเครื่องอื่นแต่ไม่รู้ว่าเครื่องที่ 2 ติดอะไร
รบกวนช่วยผู้รู้ช่วยแนะนำวิธีแก้ไขหน่อยครับ
ขอบคุณครับ