เคล็ดลับ: ภาษาอื่น ๆ ได้รับการแปลโดย Google คุณสามารถเยี่ยมชม English รุ่นของลิงก์นี้
เข้าสู่ระบบ
x
or
x
x
สมัครสมาชิก
x

or

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

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

Navigation--ข้อความอัตโนมัติ (เพิ่มแผนภูมิที่ใช้บ่อยลงใน AutoText pane.then หนึ่งคลิกเพื่อแทรกเมื่อคุณต้องการ)

excel เพิ่มในเครื่องมือสำหรับการแทรกแผนภูมิน้ำตกได้ตลอดเวลา

เครื่องมือเพิ่มประสิทธิภาพที่แนะนำสำหรับ Excel / Office

แท็บ Office: นำการแก้ไขแท็บไปใช้ Excel และซอฟต์แวร์ Office อื่น ๆ เช่นเดียวกับ Chrome, Firefox และ Safariการทดลองใช้ฟรีไม่ จำกัด 30 วัน

Kutools สำหรับ Excel: คุณลักษณะที่มีประสิทธิภาพของ 300 ช่วยให้ Excel ใช้งานได้ง่ายและเพิ่มประสิทธิภาพการทำงานได้ทันทีการทดลองใช้ฟรีไม่ จำกัด 60 วัน


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


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

Kutools สำหรับ Excel, ที่มีมากกว่า 120 ฟังก์ชัน Excel ที่มีประโยชน์, เพิ่มประสิทธิภาพการทำงานและประหยัดเวลาในการทำงาน

doc-สารสกัดแผนภูมิข้อมูล 5

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

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

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

Sub GetChartValues()
	'Updateby20150203
	Dim xNum As Integer
	Dim xSeries As Object
	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 ดูภาพหน้าจอ:

doc-สารสกัดแผนภูมิข้อมูล 2

จากนั้นคุณจะเห็นข้อมูลถูกดึงมา ChartData แผ่น.

doc-สารสกัดแผนภูมิข้อมูล 3

ส่งออกเป็น Graphic

Kutools' ส่งออกเป็น Graphic มีวัตถุประสงค์เพื่อบันทึกหรือส่งออกเซลล์ที่เลือกเป็นรูปแบบกราฟิกหลายรูปแบบ
doc ส่งออกเป็นภาพ

เคล็ดลับ:

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

doc-สารสกัดแผนภูมิข้อมูล 4

2 ข้อมูลของแผนภูมิที่เลือกถูกดึงไปที่เซลล์แรกของแผ่นงาน ChartData ในค่าเริ่มต้น

ให้ความสนใจ1หากคุณสนใจ addi-in นี้, ดาวน์โหลด 60 วันทดลองใช้ฟรี.


เครื่องมือเพิ่มประสิทธิภาพที่แนะนำ

แท็บ Office

gold star1 นำแท็บที่มีประโยชน์ไปยัง Excel และซอฟต์แวร์ Office อื่น ๆ เช่นเดียวกับ Chrome, Firefox และ Internet Explorer ใหม่

Kutools สำหรับ Excel

gold star1 น่าทึ่ง! เพิ่มประสิทธิภาพการทำงานของคุณในอีก 5 นาที ไม่จำเป็นต้องมีทักษะพิเศษประหยัดสองชั่วโมงทุกวัน!

gold star1 300 คุณสมบัติใหม่สำหรับ Excel, Make Excel ง่ายมากและมีประสิทธิภาพ:

  • ผสานเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล
  • รวมและรวมแผ่นงานหลายแผ่นและสมุดงาน
  • เปรียบเทียบช่วง, คัดลอกหลายช่วง, แปลงข้อความเป็นวันที่, หน่วยและการแปลงสกุลเงิน
  • นับตามสี, เพจย่อยย่อย, การเรียงลำดับขั้นสูงและตัวกรอง Super,
  • เพิ่มเติมเลือก / แทรก / ลบ / ข้อความ / รูปแบบ / ลิงก์ / ความคิดเห็น / เวิร์คบุ๊ค / แผ่นงานเครื่องมือ ...

ภาพหน้าจอของ Kutools for Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Astro · 1 years ago
    This doesn't appear to work for a scatter plot as it only extracts one set of "x" data. How can I amend it to extract all "x" data sets?
    • To post as a guest, your comment is unpublished.
      Sunny · 1 years ago
      Sorry I did not found the solution about that.
      • To post as a guest, your comment is unpublished.
        Carlos · 1 years ago
        i've tried with a scatter plot graph as well, but only get one line of valor.


        i need so much to find a way to extract data from scatterplot graphs.
  • To post as a guest, your comment is unpublished.
    Ian · 1 years ago
    I failed to get the prices of a fund chart on my mac excel 2011 . Run time error '91' object variable or block variable not set . Don't know how to debug . Appreciate any help .
  • To post as a guest, your comment is unpublished.
    jignesh · 1 years ago
    Very useful and perfect
  • To post as a guest, your comment is unpublished.
    Berk · 1 years ago
    gives me values that i created chart with not all the values in range
  • To post as a guest, your comment is unpublished.
    Leo · 2 years ago
    Amazing command, thanks a lot!

    I used it with a pivot chart and it works!