Snasui Excel Forum

Posted: **Fri May 22, 2020 11:44 am**

เรียน อาจารย์ครับ

ขอสอบถามว่าทำไมเวลา Save ข้อมูลแล้วมันทับข้อมูลเดิม ไม่ขึ้นบรรทัดใหม่ครับ
ต้องปรับ Code อย่างไรครับ ขอบคุณครับ

Code: Select all

Sub Save()

    Num = Cells(Rows.Count, 1).End(xlUp).Row + 1
    
    Sheets("Data").Cells(Num, 1) = Num - 2
    Sheets("Data").Cells(Num, 2) = Sheets("Input").Range("C4").Value
    Sheets("Data").Cells(Num, 3) = Sheets("Input").Range("C6").Value
    Sheets("Data").Cells(Num, 4) = Sheets("Input").Range("C8").Value

    Sheets("Input").Select
    Sheets("Input").Range("C4").Value = ""
    Sheets("Input").Range("C6").Value = ""
    Sheets("Input").Range("C8").Value = ""
    
End Sub

Posted: **Fri May 22, 2020 1:49 pm**

ลองดูครับ

แก้ตัวแปร Num ~~> Num = Sheets("Data").Cells(Rows.Count, 1).End(xlUp).Row + 1

Posted: **Fri May 22, 2020 2:09 pm**

ได้แล้วครับอาจารย์ logic ขอบคุณมากครับ

Snasui Excel Forum

Macro : Save ข้อมูลแล้วมันทับข้อมูลเดิม

Macro : Save ข้อมูลแล้วมันทับข้อมูลเดิม

Re: Macro : Save ข้อมูลแล้วมันทับข้อมูลเดิม

Re: Macro : Save ข้อมูลแล้วมันทับข้อมูลเดิม