Macro Runtime error 1004
Posted: Sun Mar 18, 2018 3:42 pm
มือใหม่ค่ะ รบกวนผู้รู้ใจดี ช่วยทีค่ะ
ต้องการโค้ด ให้รันดังนี้ค่ะ
1) Copy Column (F:F) from sheet "VND"
2) Paste in Last empty Column (โดยเริ่มที่ Column8 เป็นต้นไป
แต่หลังรันมาโครเกิดปัญหา เมสเสจบ๊อกซ์ MACRO User defined Error 1004 โดยเกิดที่ บรรทัด LastCol_VND รบกวนช่วยอธิบายทีค่ะ เสิชกุเกิ้ลก็ไม่เจอ อ่านไม่เข้าใจเท่าไหร่ จนต้องRegister userเลยค่ะ
Sub VND()
Dim LastCol_VND As Long
sheets("VND").Range("F:F").Copy
LastCol_VND = sheets("VND").Range(Cells(5, 8), Cells(5, sheets("VND").Columns.Count)).End(xlToLeft).Column
sheets("VND").Columns(LastCol_VND).PasteSpecial Paste:=xlPasteValues
End Sub
ขอบคุณล่วงหน้าค่ะ
ต้องการโค้ด ให้รันดังนี้ค่ะ
1) Copy Column (F:F) from sheet "VND"
2) Paste in Last empty Column (โดยเริ่มที่ Column8 เป็นต้นไป
แต่หลังรันมาโครเกิดปัญหา เมสเสจบ๊อกซ์ MACRO User defined Error 1004 โดยเกิดที่ บรรทัด LastCol_VND รบกวนช่วยอธิบายทีค่ะ เสิชกุเกิ้ลก็ไม่เจอ อ่านไม่เข้าใจเท่าไหร่ จนต้องRegister userเลยค่ะ
Sub VND()
Dim LastCol_VND As Long
sheets("VND").Range("F:F").Copy
LastCol_VND = sheets("VND").Range(Cells(5, 8), Cells(5, sheets("VND").Columns.Count)).End(xlToLeft).Column
sheets("VND").Columns(LastCol_VND).PasteSpecial Paste:=xlPasteValues
End Sub
ขอบคุณล่วงหน้าค่ะ