Snasui Excel Forum

คือว่าในชีท Data ผมมีข้อมูลหลัก แล้วในชีท Doc2 ผมต้องการจะให้มันอัพเดทข้อมูลและตัวเลขเอง อย่างในไฟล์แนบ คนสุดท้ายคนที่ 9 ที่เพิ่งเพิ่มไป อยากจะให้มันมาปรากฎในชีท Doc2 ต่อจากคนที่ 8 เลยครับ แล้วตามด้วยผลรวมทั้งหมด เพราะพอคัดลอกสูตรมันก็ต้องคอยมาทำเรื่อยๆ ผมอยากให้มันสามารถอัพเดทข้อมูลโดยอัตโนมัติ หากมีการเพิ่มคนเข้ามา หรือหากมีการตัดใครออกไปครับ
ขอบคุณครับ

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

ไม่ค่อยแน่ใจว่าใช่ที่ต้องการหรือไม่นะครับ
E7 =SUM(E$7:INDIRECT("r[-1]c",FALSE)) Enter+Copy ไปทางขวาครับ

parakorn wrote: Thu May 10, 2018 5:25 pm ไม่ค่อยแน่ใจว่าใช่ที่ต้องการหรือไม่นะครับ

Code: Select all

Sub InsertNew()
    Application.Goto Reference:="R1048576C1"
    Selection.End(xlUp).Select
    Selection.EntireRow.Insert
    ActiveCell.Range("A1:C1").Select
    Selection.FormulaR1C1 = "=Data!R[-1]C"
    ActiveCell.Range("E1").Select
    Selection.FormulaR1C1 = "=Data!R[-1]C[4]"
    ActiveCell.Range("B1").Select
    Selection.FormulaR1C1 = "=Data!R[-1]C[7]"
    ActiveCell.Range("B1").Select
    Selection.FormulaR1C1 = "=RC[-2]-RC[-1]"
End Sub

E7 =SUM(E$7:INDIRECT("r[-1]c",FALSE)) Enter+Copy ไปทางขวาครับ

ขอบคุณนะครับ ผมอยากได้แบบนี้แหละครับ แต่ถ้าเกิดผมจะลบคนที่ 5 จาก data ออกไป พอรันใหม่ มันก็ขึ้น #REF คือผมอยากให้มันอัพเดทตามกันด้วยอ่ะครับ

ตัวอย่างสูตรที่ชีต Doc2 เซลล์ B7 ครับ

=INDIRECT("'Data'!$B"&ROWS(B$7:B7)+5)

Enter > Copy ลงด้านล่าง > ปรับใช้กับคอลัมน์อื่น ๆ โดยปรับเฉพาะตำแหน่งที่ผมระบายสีไว้ในสูตรครับ