ไปยังเนื้อหาหลัก

จะเปลี่ยนการตั้งค่าฟิลด์หลายฟิลด์ในตาราง Pivot ได้อย่างไร?

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

doc-เปลี่ยน-การตั้งค่าฟิลด์-1

เปลี่ยนการตั้งค่าฟิลด์ในตาราง Pivot ด้วยตนเองทีละรายการ

เปลี่ยนการตั้งค่าฟิลด์หลายฟิลด์ในตาราง Pivot ด้วยรหัส VBA


ลูกศรสีฟ้าฟองขวา เปลี่ยนการตั้งค่าฟิลด์ในตาราง Pivot ด้วยตนเองทีละรายการ

ใน Excel คุณสามารถเปลี่ยนการคำนวณการตั้งค่าฟิลด์ได้โดยเปลี่ยนฟังก์ชันทีละฟังก์ชันในไฟล์ การตั้งค่าฟิลด์ค่า โปรดทำตามนี้:

1. เลือกเขตข้อมูลในพื้นที่ค่าที่คุณต้องการเปลี่ยนฟังก์ชันสรุปในตาราง Pivot และคลิกขวาเพื่อเลือก การตั้งค่าฟิลด์ค่าดูภาพหน้าจอ:

doc-เปลี่ยน-การตั้งค่าฟิลด์-1

2. จากนั้นใน การตั้งค่าฟิลด์ค่า กล่องโต้ตอบเลือกประเภทการคำนวณที่คุณต้องการใช้ภายใต้ สรุปมูลค่าตาม ดูภาพหน้าจอ:

doc-เปลี่ยน-การตั้งค่าฟิลด์-1

3. จากนั้นคลิก OK เพื่อปิดกล่องโต้ตอบนี้และคุณจะเห็นว่าฟังก์ชัน Count ของคุณถูกเปลี่ยนเป็นฟังก์ชัน Sum โปรดดูภาพหน้าจอ:

doc-เปลี่ยน-การตั้งค่าฟิลด์-1

4. ทำซ้ำขั้นตอนข้างต้นเพื่อเปลี่ยนการตั้งค่าการคำนวณของช่องอื่น ๆ ทีละรายการ

หมายเหตุ คุณยังสามารถเปลี่ยนการตั้งค่าฟิลด์ได้โดยคลิกขวาที่เซลล์ฟิลด์หนึ่งเซลล์แล้วเลือก สรุปค่าโดย และเลือกการคำนวณหนึ่งรายการที่คุณต้องการจากเมนูบริบท

doc-เปลี่ยน-การตั้งค่าฟิลด์-1


ลูกศรสีฟ้าฟองขวา เปลี่ยนการตั้งค่าฟิลด์หลายฟิลด์ในตาราง Pivot ด้วยรหัส VBA

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

1. คลิกเซลล์ใดก็ได้ในตาราง Pivot

2. กด ALT + F11 และจะเปิดไฟล์ หน้าต่าง Microsoft Visual Basic for Applications.

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ หน้าต่างโมดูล.

รหัส VBA: เปลี่ยนการตั้งค่าหลายฟิลด์ในตาราง Pivot

Public Sub SetDataFieldsToSum()
'Update 20141127
Dim xPF As PivotField
Dim WorkRng As Range
Set WorkRng = Application.Selection
With WorkRng.PivotTable
   .ManualUpdate = True
   For Each xPF In .DataFields
      With xPF
         .Function = xlSum
         .NumberFormat = "#,##0"
      End With
   Next
   .ManualUpdate = False
End With
End Sub

4. จากนั้นกด F5 กุญแจสำคัญในการรันโค้ดนี้และการตั้งค่าฟิลด์ทั้งหมดในตาราง Pivot ที่คุณเลือกได้ถูกแปลงเป็นการคำนวณความต้องการของคุณในครั้งเดียวดูภาพหน้าจอ:

doc-เปลี่ยน-การตั้งค่าฟิลด์-1
-1
doc-เปลี่ยน-การตั้งค่าฟิลด์-6

หมายเหตุ: ในโค้ดด้านบนคุณสามารถเปลี่ยนฟังก์ชัน Sum เป็นการคำนวณอื่น ๆ เช่น Average, Max, Min ตามที่คุณต้องการ คุณเพียงแค่ต้องเปลี่ยนผลรวมในสคริปต์เหล่านี้: สาธารณะย่อย SetDataFieldsToSum () และ .ฟังก์ชัน = xlSum ไปยังฟังก์ชันอื่น ๆ

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

รายละเอียด


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (29)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Brilliant, thanks, this worked perfectly and save much time
This comment was minimized by the moderator on the site
Muchas gracias por el aporte
This comment was minimized by the moderator on the site
Hi!

I'm wondering how to use the code for Count Numbers instead of count, I've tried changing the code to Count Numbers and CountNumbers but netiher works..

Help is appreciated :)
This comment was minimized by the moderator on the site
Hello, Sara,
Sorry for that your Count Numbers field can't be changed in the code, so, you need to change the field one by one with the first method in this article.
Thank you!
This comment was minimized by the moderator on the site
Thank you so much, this VBA code works amazing. 
This comment was minimized by the moderator on the site
I got the error" Unable to get the PivotTable property of the range class". Do you know hoe can I fix this?
This comment was minimized by the moderator on the site
I got this error, "Unable to get the Pivot Table property of the Range class". Do you know how I can fix this?
This comment was minimized by the moderator on the site
Thank you so much!!! That is sooo helpful and brilliant! Saved me soooo much time
This comment was minimized by the moderator on the site
Thank you so much for the VBA code, I LOVE it!
This comment was minimized by the moderator on the site
Thank you. The code worked beautifully and saved me a lot of wasted time and energy!
This comment was minimized by the moderator on the site
I've used the VBA solution with great success in the past, but it doesn't work with the data model. Do you know if there is a solution for that?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations