วิธีดึงข้อมูลจากแผนภูมิหรือกราฟใน Excel

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

ดึงข้อมูลจากแผนภูมิด้วย VBA

ดึงข้อมูลจากแผนภูมิด้วย VBA

1. คุณต้องสร้างแผ่นงานใหม่และเปลี่ยนชื่อเป็น ข้อมูลแผนภูมิ. ดูภาพหน้าจอ:

2. เลือกแผนภูมิที่คุณต้องการดึงข้อมูล กด Alt + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3 คลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นวางโค้ด VBA ด้านล่างนี้ลงใน โมดูล หน้าต่าง

Sub GetChartValues()
    'Updateby20220510
    Dim xNum As Integer
    Dim xSeries As Object
    On Error Resume Next
    xCount = 2
    xNum = UBound(Application.ActiveChart.SeriesCollection(1).Values)
    Application.Worksheets("ChartData").Cells(1, 1) = "X Values"
    With Application.Worksheets("ChartData")
        .Range(.Cells(2, 1), _
        .Cells(xNum + 1, 1)) = _
        Application.Transpose(ActiveChart.SeriesCollection(1).XValues)
    End With
    For Each xSeries In Application.ActiveChart.SeriesCollection
        Application.Worksheets("ChartData").Cells(1, xCount) = xSeries.Name
        With Application.Worksheets("ChartData")
            .Range(.Cells(2, xCount), _
            .Cells(xNum + 1, xCount)) = _
            Application.WorksheetFunction.Transpose(xSeries.Values)
        End With
        xCount = xCount + 1
    Next
End Sub

4 จากนั้นคลิก วิ่ง เพื่อเรียกใช้ VBA ดูภาพหน้าจอ:

จากนั้นคุณสามารถดูข้อมูลที่แยกออกมาได้ ข้อมูลแผนภูมิ แผ่น.

เคล็ดลับ:

1. คุณสามารถจัดรูปแบบเซลล์ได้ตามที่คุณต้องการ

2. โดยค่าเริ่มต้น ข้อมูลของแผนภูมิที่เลือกจะถูกแยกโดยเริ่มจากเซลล์แรกของแผ่นงาน ChartData