การย้าย ค่าเฉลี่ย ของ Excel Vba

ตารางเฉลี่ยกลิ้งด้านล่างเราจะดูที่โปรแกรมใน Excel VBA ซึ่งจะสร้างตารางเฉลี่ยโดยเฉลี่ย วางบรรทัดคำสั่งในแผ่นงานของคุณและเพิ่มบรรทัดรหัสต่อไปนี้: Range (quotB3quot).Value WorksheetFunction. RandBetween (0, 100) บรรทัดรหัสนี้ป้อนตัวเลขสุ่มระหว่าง 0 ถึง 100 ลงในเซลล์ B3 เราต้องการให้ Excel VBA ใช้มูลค่าหุ้นใหม่และวางไว้ที่อันดับแรกของตารางเฉลี่ยโดยเฉลี่ย ค่าอื่น ๆ ทั้งหมดควรย้ายลงหนึ่งแห่งและควรลบค่าสุดท้าย สร้างกิจกรรมการเปลี่ยนแปลงแผ่นงาน รหัสที่เพิ่มเข้าไปใน Worksheet Change Event จะถูกดำเนินการโดย Excel VBA เมื่อคุณเปลี่ยนเซลล์บนเวิร์กชีท 2. ดับเบิลคลิกที่ Sheet1 (Sheet1) ใน Project Explorer 3. เลือกแผ่นงานจากรายการแบบหล่นลงด้านซ้าย เลือกเปลี่ยนจากรายการแบบเลื่อนลงด้านขวา เพิ่มบรรทัดรหัสต่อไปนี้ลงในเหตุการณ์การเปลี่ยนแปลงเวิร์กชีท: 4. ประกาศตัวแปรที่เรียกว่า newvalue ของ Type Integer และสองช่วง (firstfourvalues ​​และ lastfourvalues) Dim newvalue As Integer firstfourvalues ​​As Range, lastfourvalues ​​As Range 5. เหตุการณ์การเปลี่ยนแปลงแผ่นงานจะรับฟังการเปลี่ยนแปลงทั้งหมดใน Sheet1 เราต้องการให้ Excel VBA ทำอะไรบางอย่างหากมีการเปลี่ยนแปลงอะไรในเซลล์ B3 เมื่อต้องการทำเช่นนี้เพิ่มบรรทัดรหัสต่อไปนี้: ถ้า Target. Address quotB3quot จากนั้น 6. เราเตรียม newvalue ด้วยค่าของเซลล์ B3 ค่าแรกด้วย Range (quotD3: D6quot) และ lastfourvalues ​​ที่มี Range (quotD4: D7quot) newvalue Range (quotB3quot). ค่ากำหนด firstfourvalues ​​Range (quotD3: D6quot) Set lastfourvalues ​​Range (quotD4: D7quot) 7. ตอนนี้มาพร้อมกับเคล็ดลับง่ายๆ เราต้องการอัปเดตตารางเฉลี่ยโดยรวม คุณสามารถทำได้โดยการแทนที่สี่ค่าล่าสุดด้วยสี่ค่าแรกของตารางและวางมูลค่าสต็อคใหม่ในตำแหน่งแรก lastfourvalues. Value firstfourvalues. Value Range (quotD3quot). Value newvalue 8. อย่าลืมปิดคำสั่ง if 9. ป้อนสูตร AVERAGE (D3: D7) ลงในเซลล์ D8 10. ทดสอบโปรแกรมโดยคลิกที่ปุ่มคำสั่งค่าเฉลี่ยตัวอย่างนี้จะสอนวิธีการคำนวณค่าเฉลี่ยเคลื่อนที่ของชุดข้อมูลเวลาใน Excel ค่าเฉลี่ยเคลื่อนที่จะใช้เพื่อทำให้เกิดความผิดปกติ (ยอดเขาและหุบเขา) เพื่อรับรู้แนวโน้มได้ง่ายขึ้น 1. ขั้นแรกให้ดูที่ซีรี่ส์เวลาของเรา 2. ในแท็บข้อมูลคลิกการวิเคราะห์ข้อมูล หมายเหตุ: ไม่สามารถหาปุ่ม Data Analysis คลิกที่นี่เพื่อโหลด Add-in Analysis ToolPak 3. เลือก Moving Average และคลิก OK 4. คลิกที่กล่อง Input Range และเลือกช่วง B2: M2 5. คลิกที่ช่อง Interval และพิมพ์ 6. 6. คลิกที่ Output Range box และเลือก cell B3 8. วาดกราฟของค่าเหล่านี้ คำอธิบาย: เนื่องจากเราตั้งค่าช่วงเป็น 6 ค่าเฉลี่ยเคลื่อนที่คือค่าเฉลี่ยของ 5 จุดข้อมูลก่อนหน้าและจุดข้อมูลปัจจุบัน เป็นผลให้ยอดเขาและหุบเขาจะเรียบออก กราฟแสดงแนวโน้มที่เพิ่มขึ้น Excel ไม่สามารถคำนวณค่าเฉลี่ยเคลื่อนที่สำหรับจุดข้อมูล 5 จุดแรกได้เนื่องจากไม่มีจุดข้อมูลก่อนหน้านี้เพียงพอ 9. ทำซ้ำขั้นตอนที่ 2 ถึง 8 สำหรับช่วงเวลา 2 และช่วงที่ 4 ข้อสรุป: ช่วงที่ใหญ่กว่ายอดเนินและหุบเขาจะเรียบขึ้น ช่วงเวลาที่สั้นกว่านี้ค่าเฉลี่ยของค่าเฉลี่ยเคลื่อนที่จะใกล้เคียงกับจุดข้อมูลที่เกิดขึ้นจริงฉันต้องการคำนวณค่าเฉลี่ยเคลื่อนที่ของช่วงสุดท้ายกล่าวคือ 20 ตัวเลขของคอลัมน์ ปัญหาคือบางส่วนของเซลล์ของคอลัมน์อาจว่างเปล่าพวกเขาควรจะละเลย ตัวอย่าง: ค่าเฉลี่ยเคลื่อนที่ของสามตัวสุดท้ายคือ (155167201) 3 Ive พยายามใช้นี้โดยใช้ค่าเฉลี่ย, ชดเชยดัชนี แต่ฉันก็ไม่ทราบ. ฉันนิดหน่อยคุ้นเคยกับมาโครดังนั้นโซลูชันจะทำงานได้ดี: MovingAverage (A13) ขอขอบคุณสำหรับคำแนะนำหรือคำแนะนำที่ถาม 12 มีนาคม 11 เวลา 15:36 ป้อนข้อมูลนี้ด้วย controlshiftenter เพื่อทำให้เป็นสูตรอาร์เรย์ ค่านี้จะเป็นค่าล่าสุดสามค่า ถ้าคุณต้องการมากหรือน้อยเปลี่ยนสองอินสแตนซ์ของ 3 ในสูตรเพื่อสิ่งที่คุณต้องการ ส่วนนี้จะส่งกลับจำนวนแถวสูงสุดที่ 4 ของเซลล์ทั้งหมดที่มีค่าหรือ 5 ในตัวอย่างของคุณเนื่องจากแถวที่ 6, 8 และ 9 เป็นแถวที่ 1 ถึงสูงสุดที่ 3 ซึ่งมีค่า ส่วนนี้จะส่งคืน 9 TRUE หรือ FALSEs ตามจำนวนแถวที่มีขนาดใหญ่กว่าอันดับที่ 4 มากที่สุด คูณค่าใน A1: A9 โดย 9 TRUEs หรือ FALSEs TRUE ถูกแปลงเป็น 1 และ FALSE เป็นศูนย์ นี้จะออกจากฟังก์ชัน SUM เช่นนี้เนื่องจากค่าทั้งหมดข้างต้น 155 ไม่เป็นไปตามเกณฑ์จำนวนแถวคูณด้วยศูนย์ ฉันได้เขียนสคริปต์สั้น ๆ ใน VBA แล้ว Hopefull มันไม่สิ่งที่คุณต้องการ นี่คือ: 1) ฉันได้กำหนดวงเงินไว้ที่ 360 เซลล์แล้ว หมายความว่าสคริปต์จะไม่มองหาเซลล์มากกว่า 360 ถ้าคุณต้องการเปลี่ยนแล้วเปลี่ยนค่าเริ่มต้นของตัวนับ 2) สคริปต์ส่งกลับค่าเฉลี่ยไม่กลม เปลี่ยนแถวสุดท้ายเป็น MovingAverage Round (CDbl (tmp i), 2) 3) การใช้งานเป็นแบบที่คุณต้องการเพียงพิมพ์ MovingAverage (a13) ลงในเซลล์ ข้อคิดเห็นใด ๆ ยินดีต้อนรับวิธีการคำนวณค่าเฉลี่ยเคลื่อนที่ใน Excel การวิเคราะห์ข้อมูล Excel สำหรับ Dummies รุ่นที่ 2 คำสั่งการวิเคราะห์ข้อมูลมีเครื่องมือสำหรับคำนวณค่าเฉลี่ยที่เคลื่อนที่และค่าเฉลี่ยที่คล่องตัวใน Excel สมมติว่าเพื่อให้เห็นภาพประกอบคุณได้รวบรวมข้อมูลอุณหภูมิประจำวันแล้ว คุณต้องการคำนวณค่าเฉลี่ยเคลื่อนที่สามวัน 8212 โดยเฉลี่ยในสามวันที่ผ่านมา 8212 ซึ่งเป็นส่วนหนึ่งของการพยากรณ์อากาศที่เรียบง่าย หากต้องการคำนวณค่าเฉลี่ยเคลื่อนที่สำหรับชุดข้อมูลนี้ให้ทำตามขั้นตอนต่อไปนี้ หากต้องการคำนวณค่าเฉลี่ยเคลื่อนที่ก่อนคลิกปุ่มคำสั่ง Data Analysis ข้อมูล tab8217s เมื่อ Excel แสดงไดอะล็อกบ็อกซ์การวิเคราะห์ข้อมูลเลือกรายการย้ายค่าเฉลี่ยจากรายการแล้วคลิกตกลง Excel จะแสดงกล่องโต้ตอบ Moving Average ระบุข้อมูลที่คุณต้องการใช้เพื่อคำนวณค่าเฉลี่ยเคลื่อนที่ คลิกในกล่องข้อความ Input Range ของกล่องโต้ตอบ Moving Average จากนั้นระบุช่วงการป้อนข้อมูลโดยพิมพ์ที่อยู่ช่วงเวิร์กชีทหรือใช้เมาส์เพื่อเลือกช่วงของแผ่นงาน การอ้างอิงช่วงของคุณควรใช้ที่อยู่ของเซลล์สัมบูรณ์ แอดเดรสเซลล์ที่แน่นอนนำหน้าด้วยตัวอักษรคอลัมน์และหมายเลขแถวที่มีเครื่องหมายเช่นใน A1: A10 หากเซลล์แรกในช่วงอินพุทของคุณมีป้ายข้อความเพื่อระบุหรืออธิบายข้อมูลของคุณให้เลือกช่องทำเครื่องหมายในช่องแรก ในกล่องข้อความช่วงบอก Excel จำนวนค่าที่จะรวมไว้ในการคำนวณค่าเฉลี่ยเคลื่อนที่ คุณสามารถคำนวณค่าเฉลี่ยเคลื่อนที่โดยใช้จำนวนค่าใด ๆ โดยค่าเริ่มต้น Excel จะใช้ค่าล่าสุดสามค่าในการคำนวณค่าเฉลี่ยเคลื่อนที่ ในการระบุว่าจะใช้ค่าอื่น ๆ เพื่อคำนวณค่าเฉลี่ยเคลื่อนที่ให้ป้อนค่านั้นลงในช่องข้อความช่วงเวลา บอก Excel ให้ใส่ข้อมูลค่าเฉลี่ยเคลื่อนที่ ใช้กรอบข้อความ Output Range เพื่อระบุช่วงเวิร์กชีตที่คุณต้องการวางข้อมูลค่าเฉลี่ยเคลื่อนที่ ในตัวอย่างเวิร์กชีทข้อมูลค่าเฉลี่ยเคลื่อนที่จะถูกใส่ลงในช่วงเวิร์กชีท B2: B10 (ไม่บังคับ) ระบุว่าคุณต้องการใช้แผนภูมิหรือไม่ ถ้าคุณต้องการแผนภูมิที่แปลงข้อมูลค่าเฉลี่ยเคลื่อนที่ให้เลือกช่องทำเครื่องหมายแผนภูมิเอาท์พุท (ไม่บังคับ) ระบุว่าคุณต้องการคำนวณข้อมูลข้อผิดพลาดมาตรฐานหรือไม่ ถ้าคุณต้องการคำนวณข้อผิดพลาดมาตรฐานสำหรับข้อมูลให้เลือกกล่องกาเครื่องหมายข้อผิดพลาดมาตรฐาน Excel วางค่าความผิดพลาดมาตรฐานถัดจากค่าเฉลี่ยที่เคลื่อนที่ได้ (ข้อมูลข้อผิดพลาดมาตรฐานจะปรากฏเป็น C2: C10) หลังจากที่คุณระบุข้อมูลค่าเฉลี่ยเคลื่อนที่ที่คุณต้องการคำนวณและตำแหน่งที่คุณต้องการแล้วคลิกตกลง Excel คำนวณข้อมูลค่าเฉลี่ยเคลื่อนที่ หมายเหตุ: หาก Excel doesn8217t มีข้อมูลเพียงพอที่จะคำนวณค่าเฉลี่ยเคลื่อนที่สำหรับข้อผิดพลาดมาตรฐานระบบจะวางข้อความแสดงข้อผิดพลาดลงในเซลล์ คุณสามารถเห็นเซลล์หลายเซลล์ที่แสดงข้อความแสดงข้อผิดพลาดนี้เป็นค่า