สร้างแผนภูมิการขายแบบเคลื่อนไหวใน Excel – คำแนะนำทีละขั้นตอน

เรารวบรวมชุดข้อมูลยอดขายรายเดือนเป็นเวลา 3 ปีติดต่อกัน ได้แก่ ปี 2020, 2021 และ 2022 เราจะสร้างแผนภูมิที่เปลี่ยนแปลงโดยอัตโนมัติ

ขั้นตอนที่ 1 – การตั้งค่าแผนภูมิด้วยคอลัมน์ตัวช่วยเหลือ

• แทรกคอลัมน์ตัวช่วย "การขาย" สามคอลัมน์

หมายเหตุ :คุณสามารถไฮไลต์คอลัมน์ตัวช่วยเพื่อให้เห็นภาพได้ดีขึ้น

• ย้ายไปยังเซลล์ว่าง
• นำทางไปยัง แทรก แท็บ
• ใต้แผนภูมิ ส่วน ให้เลือก แทรก แผนภูมิเส้นหรือพื้นที่ และเลือก เส้นเรียงซ้อน .

• คลิกขวาที่แผนภูมิแล้วคลิก เลือกข้อมูล .

• เลือกแหล่งข้อมูล กล่องโต้ตอบจะปรากฏขึ้น
• เลือก เพิ่ม จาก รายการตำนาน (ซีรีส์) .

• คุณจะเห็นแก้ไขซีรีส์ หน้าต่าง.
• ใน ชื่อซีรี่ส์ กล่อง เลือก ยอดขาย (2020) และใน ค่าซีรี่ส์ ให้เลือกช่วงข้อมูล $F$5:$F$16 .
• กด ตกลง .

• ทำซ้ำเพื่อเลือก “ยอดขาย ทั้งหมด ” คอลัมน์และคอลัมน์ตัวช่วยที่เกี่ยวข้อง

• ยิ่งกว่านั้น ใน ป้ายกำกับแกนแนวนอน (หมวดหมู่) ให้ย้ายไปที่ แก้ไข .

• ต่อมา ป้ายกำกับแกน กล่องโต้ตอบปรากฏขึ้น เลือกช่วงข้อมูลจาก $B$5:$B$16 . คลิกตกลง .

สุดท้าย ให้กด ตกลง ในเลือกแหล่งข้อมูล หน้าต่าง.

อ่านเพิ่มเติม: วิธีสร้างการแข่งขันแผนภูมิแท่งแบบเคลื่อนไหวใน Excel

ขั้นตอนที่ 2 – การจัดรูปแบบแผนภูมิ

• สร้าง ชื่อแผนภูมิ ชื่อแกน และ ตำนาน ที่ด้านล่าง สิ่งเหล่านี้หาได้จากองค์ประกอบแผนภูมิ

แผนภูมิของคุณจะมีลักษณะคล้ายกับภาพด้านล่าง

ขั้นตอนที่ 3 – การใช้โค้ด VBA

• ไปที่นักพัฒนาซอฟต์แวร์ และเลือก Visual Basic .

• เลือก ส่วนแทรก แท็บและเลือก โมดูล .

• ใน โมดูล 1 คุณจะเห็นทั่วไป กล่อง
• ใส่ VBA ต่อไปนี้ รหัสที่นั่นและบันทึก

Sub AnimationChart()
    Const SR As Long = 5
    Dim LR As Long
    Dim RN As Long
    LR = Range("C" & SR).End(xlDown).Row
    Range("F" & SR, "H" & LR).ClearContents
    DoEvents
    Application.Wait (Now + TimeValue("00:00:1"))
    For RN = SR To LR
        DoEvents
        Range("F" & RN, "H" & RN).Value = Range("C" & RN, "E" & RN).Value
        Application.Wait (Now + TimeValue("00:00:1"))
        DoEvents
    Next RN
End Sub

รายละเอียดโค้ด

เราประกาศ ตัวแปร ก่อน เราตั้งค่า ค่าคงที่ เป็น SR แสดงถึง แถวเริ่มต้น . ในกรณีของเรา มันคือ 5 . LR และ อาร์เอ็น ยังเป็นตัวแปรที่อ้างอิงถึงค่าของ แถวสุดท้าย และ หมายเลขแถว ตามลำดับ

LR =ช่วง(“C” &SR).สิ้นสุด(xlDown).แถว→ คำสั่งลบค่าทั้งหมดของคอลัมน์ที่เกี่ยวข้อง (F:H ).

ช่วง("F" &SR, "H" &LR).ล้างเนื้อหา→ เลือกช่วงของเซลล์ เริ่มแสดงค่าของเซลล์ทีละแถว และเติมคอลัมน์ว่าง F ถึง H .

เราได้ตั้งค่า การหน่วงเวลา แล้ว ถึง 1 วินาที ซึ่งจะช่วยให้เราแสดงข้อมูลในเวลา 1 วินาที ความล่าช้า ซึ่งให้ความรู้สึกแบบไดนามิกแก่แผนภูมิ

ขั้นตอนที่ 4 – การป้อนปุ่มเพื่อสร้างแอนิเมชั่น

• เพิ่มปุ่มโดยใช้ การควบคุมแบบฟอร์ม ในแผ่นงานของคุณ
• เปลี่ยนชื่อเป็น ภาพเคลื่อนไหว
• คลิกขวาที่ภาพเคลื่อนไหว ปุ่มและเลือก กำหนดมาโคร จากเมนูบริบท .

• กำหนดมาโคร กล่องโต้ตอบจะปรากฏขึ้น
• เลือกชื่อมาโคร เป็น AnimationChart .
• กด ตกลง .

• แผนภูมิภาพเคลื่อนไหวพร้อมแล้ว คลิกที่ภาพเคลื่อนไหว ปุ่ม.

ส่วนฝึกซ้อม

เราได้จัดเตรียมส่วนฝึกปฏิบัติไว้ในแต่ละแผ่นทางด้านขวาเพื่อให้คุณสามารถฝึกทำตามขั้นตอนได้

ดาวน์โหลดหนังสือแบบฝึกหัด

บทความที่เกี่ยวข้อง

• วิธีทำให้ข้อความเคลื่อนไหวใน Excel
• ภาพเคลื่อนไหว VBA ใน UserForm