ทำใบสั่งซื้อ แล้วบันทึกประวัติการซื้อโดยใช้Macro

[macnoparat]

สวัสดีครับ อยากสอบถามพี่ๆหน่อยครับ คือผมสร้างใบสั่งซื้อขึ้นมาครับ และผมก็สร้างตารางMacroขึ้นมาเพื่อบันทึกประวัติการซื้อของลูกค้า

แต่มีปัญหาอยู่ที่ผมยังทำไม่ได้ครับ คือ
1.ผมจะอ้างอิง หรือจะเอาข้อมูลคือ Order ID, Date และCustom ID ซึ่งอยู่ใแผ่นงาน"Purchase Order" มาใส่ในแผ่นงาน"Historical" ได้ยังไงครับ

รบกวนพี่ๆ บอกสูตรหน่อยครับ

ขอขอบคุณครับ

ทั้งนี้ผมได้แนบไฟล์งานมาด้วยครับ

[snasui]

เพื่อให้ง่ายต่อการจัดการให้เพิ่มชีท Temp เข้ามาแล้ว Link ข้อมูลจากชีท Purchase Order มาวาง แล้วทำการเขียน Code ให้นำข้อมูลจากชีท Temp ไปวางในชีท Historical อีกที

ตัวอย่าง Code

Code: Select all

Sub PasteData()
Dim rs As Range, rt As Range
 'กำหนดข้อมูลต้นทาง และ resize เพื่อเปลี่ยนขนาดความสูงของข้อมูลให้เท่ากับค่าใน I1
Set rs = Worksheets("Temp").Range("A2:H11") _
    .Resize(Worksheets("Temp").Range("I1"))
'กำหนดข้อมูลปลายทางที่จะนำค่ามาวาง
 Set rt = Worksheets("Historical").Range("B" & Rows.Count) _
    .End(xlUp).Offset(1, 0)
 rs.Copy
 rt.PasteSpecial xlPasteValues
 Application.CutCopyMode = False
 MsgBox "Finish."
End Sub

ดูไฟล์แนบประกอบครับ

[macnoparat]

ขอบคุณมากๆเลยครับ

คือผมยังเขียนcodeไม่ค่อยเป็นครับ พี่ยังพอมีวิธีที่ง่ายกว่านี้อีกไหมครับ

ขอขอบคุณครับ

[yodpao.b]

ขอบคุณมากๆเลยครับ

คือผมยังเขียนcodeไม่ค่อยเป็นครับ พี่ยังพอมีวิธีที่ง่ายกว่านี้อีกไหมครับ

ขอขอบคุณครับ

ผมได้เข้ามาอ่านเพื่อทำการ copy เก็บไว้ใช้ในคราวหน้า ก็ลองทำดู
ได้แนบไว้ให้แล้ว ผมก็เพิ่มเร่มเขียน VBA มาได้ประมาณหนึ่งลองผิดลองถูกไปเรื่อย
มาเจอ อาจารย์คนนี้แจ๋วจริง