เพิ่มค่าใหม่ที่แตกต่างให้กับผลรวมที่มีอยู่


0

ฉันมีสองเซลล์ใน Excel (A1 และ B1) ควรเปลี่ยน A1 ทุกเดือนโดยมีค่าแตกต่างกันไปตามยอดขาย และ B1 มีมูลค่า $ 100

สำหรับเดือนสิงหาคมการขายคือ $ 150 (ซึ่งจะถูกป้อนในเซลล์ A1) ฉันต้องการเพิ่ม $ 150 ลงใน $ 100 ที่มีอยู่ในเซลล์ B1 เพื่อกลายเป็น $ 250 (ซึ่งง่ายมาก)

สำหรับเดือนถัดไป อย่างไรก็ตามฉันต้องการป้อนค่าอื่นในเซลล์ A1 พูด $ 200 และฉันต้องการให้ $ 200 เพิ่มลงใน $ 250 ในเซลล์ B1 กลายเป็น $ 450

ฉันไม่ต้องการคัดลอกและผ่านมา ในเซลล์เดียวกันที่ระบุฉันต้องการใส่ค่าที่แตกต่างกันในขณะที่ค่าที่ป้อนทุกครั้งจะถูกเพิ่มเข้าไปในค่าในเซลล์ B1

ฉันสงสัยว่าฉันสามารถทำได้ใน Excel

คำตอบ:


0

ฉันไม่คิดว่าคุณสามารถทำสิ่งที่คุณต้องการได้ทันทีที่คุณเปลี่ยนเซลล์ A1 จาก 150 เป็น 200 มูลค่าเดิมของ 150 จะไม่มีอยู่อีกต่อไป

ความเป็นไปได้อย่างหนึ่งคือคุณเก็บยอดขายรายเดือนทั้งหมดไว้ในคอลัมน์เดียวและใช้สูตรในคอลัมน์ที่แตกต่างกันเพื่อคำนวณผลรวมของค่าทั้งหมด ตัวอย่างเช่นถ้าคุณเก็บ 100, 150 และ 200 ใน A1, A2 และ A3 ตามลำดับคุณสามารถใช้สูตร=Sum(A:A)เพื่อคำนวณผลรวมของค่าทั้งหมดในคอลัมน์ A โปรดทราบว่าสิ่งนี้ต้องการให้คุณไม่เก็บอะไรไว้ในคอลัมน์ =Sum(A1:A12)มิฉะนั้นสูตรเฉพาะควรจะรวมถึงเซลล์ที่อาจมีค่ายอดขายรายเดือนเช่น

ป้อนคำอธิบายรูปภาพที่นี่


0

คุณสามารถบรรลุสิ่งที่คุณต้องการโดยใช้การเขียนโปรแกรม VBA ในค่าเริ่มต้นของเวิร์กชีทชื่อ Say Sheet1 คุณได้พูดเซลล์ A1 ที่จะถูกเขียนทับทุกเดือนและเซลล์ B1 เป็นตำแหน่งที่คุณต้องการดูยอดรวมสะสม

คลิกขวาที่ Sheet1 และคลิก View Code หรือกด ALT + F11 แล้วดับเบิลคลิกที่ Sheet1 ทางบานหน้าต่างด้านซ้ายภายใต้โครงการ VBA

หน้าต่างรหัส VBA ว่างเปล่าจะเปิดขึ้น ใส่รหัสต่อไปนี้

   Private Sub Worksheet_Change(ByVal Target As Range)
    Dim KeyCells As Range

    Set KeyCells = Range("A1")

    If Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then

    Else
       If IsNumeric(Range("A1").Value) Then
            Range("B1").Value = Range("B1").Value + Range("A1").Value
       Else

       End If
    End If
End Sub

บันทึกและออก. บันทึกสมุดงานเป็น filename.xlsm เช่นสมุดงานที่เปิดใช้งานแมโคร ตอนนี้เมื่อคุณเขียนทับค่าในเซลล์ A1 มันจะถูกเพิ่มเข้าไปใน B1 ตรวจสอบให้แน่ใจว่าคุณอัปเดต A1 เฉพาะเมื่อตั้งใจไว้เท่านั้นและจะเพิ่มไว้ใน B1 ต่อไป ไม่มีการตรวจสอบความถูกต้องในรหัสนี้ที่ A1 ควรได้รับการอัพเดตเดือนละครั้งเท่านั้น! เพียงตรวจสอบเบื้องต้นว่า A1 ควรเป็นตัวเลขเพื่อป้องกันข้อผิดพลาดในขณะทำงาน

ป้อนคำอธิบายรูปภาพที่นี่

การอ้างอิงเพิ่มเติมhttps://support.microsoft.com/en-in/help/213612/how-to-run-a-macro-when-certain-cells-change-in-excel

โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.