Snasui Excel Forum

ใช้ Excel 2003
ตอนแรกมันขึ้น error นี้ ตอน hide คอลัมภ์ก่อน อ่านใน Net เค้าให้ใส่ที่ visusl basic ตามด้านล่างแล้วก็หายค่ะ

Sub Test()
Dim s As Shape
On Error Resume Next
For Each s In ActiveSheet.Shapes
s.Placement = xlMoveAndSize
Next
End Sub

แต่ตอนนี้ error นี้ขึ้นตอน insert column แทนค่ะ

ไม่ทราบว่า Error ขึ้นว่าอะไร ช่วยจับภาพมาให้ดูหน่อยครับ

อ้อ เขียนมาเป็นชื่อกระทู้แล้ว ปกติการฟ้องแบบนี้เกิดจากมี comment จำนวนมากหรืออยู่ในตำแหน่งท้ายๆ ของ worksheet เมื่อต้องการแทรกคอลัมน์โปรแกรมจึงแจ้งว่าไม่สามารถแทรกได้ เพื่อป้องกันข้อมูลเสียหาย ให้ลองแก้ไขด้วยการลบ comment ออกไปก่อนแล้วลองแทรกคอลัมน์ดูใหม่ครับ

ขอบคุณค๊า