ิvba คำนวน row แรกถึง Row สุดท้าย หากข้อมูลแต่ละรอบไม่เท่ากัน

[pkhardman]

รบกวนทุกท่านครับ ผม record macro มาหากต้องการให้มันเริ่มคำนวนถึง row สุดท้ายทีมีข้อมูลแก้ยังไงได้ครับ

Sub Macro1()
Worksheets("BO_DE_OUTS(INDX_LNBR)").Select


Range("Z8").End(xlDown).Select
ActiveCell.FormulaR1C1 = "=XLOOKUP(@C[-23],CUST!C[-8],CUST!C[-15])"


End Sub
ถ้าผมต้องการให้มัน auto ไม่ใช่จำนวนแค่ 359 แต่อาจเป็น 400 หรือ 500 แก้ไขยังไงครับ

[snasui]

ตัวอย่าง Code ครับ

Code: Select all

Sub Macro1()
    With Worksheets("BO_DE_OUTS(INDX_LNBR)") '.Select
'     Range("Z8").End(xlDown).Select
'    ActiveCell.FormulaR1C1 = "=XLOOKUP(@C[-23],CUST!C[-8],CUST!C[-15])"
    .Range("y8", .Range("x" & .Rows.Count).End(xlUp)).Offset(0, 1).Formula = _
        "=XLOOKUP(@C:C,CUST!R:R,CUST!K:K)"
    End With
End Sub

ส่วนได้คำตอบหรือไม่นั้นจำเป็นต้องปรับปรุงสูตรเองหรือไม่ก็ต้องแจ้งรายละเอียดประกอบพร้อมคำตอบที่ต้องการ จะได้ทราบว่าต้องการให้แสดงค่าจากที่ใด ด้วยเงื่อนไขใดครับ