Snasui Excel Forum

แก้ไขปัญหาได้แล้วครับ
เผื่อใครเจอปัญหาแบบนี้อีก
เนื่องจากชื่อตัวมาโครเป็นภาษาไทยแล้วทีนี้ในอีกเครื่องมันเป็นภาษาต่างดาวแล้วมันไม่เจอชื่อ
จริงแก้วิธีตามคลิปนี้ครับ https://www.youtube.com/watch?v=KtYiz2f ... P&index=10
ทำให้ปัญหาถูกแก้ไขแล้ว

ไฟล์นี้คือไฟล์ที่ใช้คอมหลายเครื่องครับทีนี้ลองไป 2 เครื่องแล้วรันมาโครได้แบบไม่มีปัญหาอะไรแล้วทีนี้ลองเปิดอีกเครื่องนึกไม่สามารถรันได้ขึ้นตามรูปเลยครับ เปิดศูนย์ความเชื่อถือเป็นแบบเปิดใช้งานมาโคร VBA แล้วด้วยครับแต่ก็ยังไม่ได้
ปล.ไฟล์นี้คือแชร์มาแบบ onedrive แล้วไม่ได้มีไฟล์ในเครื่อง

ขอบคุณมากครับอาจารย์

ตอนนี้ผมเขียนโค้ดเพื่อเก็บข้อมูลจาก excel เป็นรูปภาพซึ่งส่วนที่มีปัญหาคือตรงนี้ครับ

Dim str As String
Dim rgExp As Range
Set rgExp = Range("B3:H29")

rgExp.CopyPicture Appearance:=xlScreen, Format:=xlPicture

With ActiveSheet.ChartObjects.Add(Left:=rgExp.Left, Top:=rgExp.Top, _
Width:=rgExp ...