ต้องการ คัดลอก คอลัม B:G ครับ

[yodpao.b]

ต้องการ คัดลอก คอลัม B:G ครับ
จากตัวอย่างต้องการ คัดลอกเซล B2:G14 โดยใช้ VBA
ข้อแม้ จุดสุดท้ายอาจไม่ใช่ G14 เสมอไป ครับ (จึงไม่สามารถ กำหนดค่า เซลใน code ได้)
code ที่ทำ มันคัดลอกคอลัม A ด้วยครับ จึงผิด แก้ไข code อย่างไรดีครับ

Code: Select all

Sub Macro6()
    Range("G2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Range(Selection, Selection.End(xlToLeft)).Select
    Selection.Copy
    Sheets("Sheet2").Select
    Range("A1").Select
    ActiveSheet.Paste
End Sub

[Bo_ry]

Code: Select all

Sub Macro6()
        Sheets("Sheet2").Range("A1").Resize(Range("B2", Range("G2").End(xlDown)).Rows.Count, 5).value = Range("B2", Range("G2").End(xlDown)).Value
End Sub

[yodpao.b]

ขอบคุณมากครับ

[yodpao.b]

ชอบ code ที่ได้นี้ครับ
รอกวนอีกสักอย่างครับ
ที่ปุ่ม คัดลอกข้อมูล 2
ให้ copy ข้อมูลหน้า " แยกวันเวลา " ไปไว้ในหน้า sheet1
ให้เหมือนกันทุกอย่าง โดยให้เริ่มไว้ในเซล c10 ใน sheet1 ครับ

0.JPG

ขอบคุณมาก

(ชอบ code ที่ได้มาครับ มันไม่มี .Select)

[snasui]

กรุณาเขียนมาเองก่อน ติดแล้วค่อยถามกันครับ