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

Moving Average ตัวอย่างนี้สอนวิธีการคำนวณค่าเฉลี่ยเคลื่อนที่ของชุดข้อมูลเวลาใน Excel ค่าเฉลี่ยเคลื่อนที่จะใช้เพื่อทำให้จุดสูงสุดและที่ราบสูงเป็นไปอย่างราบรื่นเพื่อให้ทราบถึงแนวโน้มต่างๆได้ง่ายขึ้นอันดับแรกลองดูที่ชุดข้อมูลเวลาของเรา คลิกการวิเคราะห์ข้อมูลคลิกที่นี่เพื่อโหลด Add-In Toolkit การวิเคราะห์ 3 เลือก Moving Average และคลิก OK.4 คลิกในกล่อง Input Range และเลือกช่วง B2 M2 5. คลิกที่ช่อง Interval และพิมพ์ 6.6 คลิกที่ Output Range และเลือกเซลล์ B3.8 วาดกราฟของค่าเหล่านี้การอธิบายเนื่องจากเราตั้งค่าช่วงเป็น 6 ค่าเฉลี่ยเคลื่อนที่คือค่าเฉลี่ยของ 5 จุดข้อมูลก่อนหน้าและ จุดข้อมูลปัจจุบันเป็นผลให้ยอดและหุบเขาถูกทำให้ราบเรียบกราฟแสดงแนวโน้มการเพิ่มขึ้น Excel ไม่สามารถคำนวณค่าเฉลี่ยเคลื่อนที่สำหรับจุดข้อมูล 5 จุดแรกเนื่องจากไม่มีจุดข้อมูลก่อนหน้านี้มากพอ 9 ทำซ้ำตามขั้นตอนที่ 2 ถึง 8 สำหรับช่วง 2 และช่วงเวลา 4. บทสรุป The la rger ช่วงเวลามากขึ้น peaks และหุบเขาจะเรียบออกช่วงที่เล็กกว่าใกล้ค่าเฉลี่ยเคลื่อนที่เป็นจุดข้อมูลจริงตารางเฉลี่ย Rolling ด้านล่างเราจะดูที่โปรแกรมใน Excel VBA ที่สร้างตารางเฉลี่ยกลิ้ง วางรหัสคำสั่งลงในเวิร์กชีทของคุณและเพิ่มบรรทัดรหัสต่อไปนี้กำหนดเส้น B3 100. บรรทัดรหัสนี้ป้อนตัวเลขสุ่มระหว่าง 0 ถึง 100 ลงในเซลล์ B3 เราต้องการให้ Excel VBA ใช้มูลค่าหุ้นใหม่และวางไว้ที่ตำแหน่งแรก ของตารางเฉลี่ยกลิ้งค่าอื่น ๆ ทั้งหมดควรย้ายลงหนึ่งแห่งและควรลบค่าล่าสุดสร้างแผ่นงานการเปลี่ยนแปลงรหัสเหตุการณ์ที่เพิ่มเข้าไปในเหตุการณ์การเปลี่ยนแปลงแผ่นงานจะถูกดำเนินการโดย Excel VBA เมื่อคุณเปลี่ยนเซลล์บนแผ่นงาน คลิก Sheet1 Sheet1 ใน Explorer โครงการ 3 เลือกแผ่นงานจากรายการแบบหล่นลงด้านซ้ายเลือกเปลี่ยนแปลงจากรายการแบบหล่นลงด้านขวาเพิ่มโค้ดต่อไปนี้ลงในเหตุการณ์การเปลี่ยนแปลงแผ่นงาน 4 ประกาศตัวแปรที่เรียกว่า newvalue of type จำนวนเต็มและสองช่วง firstfourvalues ​​และ lastfourvalues. Dim newvalue As Integer firstfourvalues ​​เป็น Range lastfourvalues ​​As Range5 กิจกรรมการเปลี่ยนแผ่นงานจะรับฟังการเปลี่ยนแปลงทั้งหมดใน Sheet1 เราต้องการให้ Excel VBA ทำอะไรบางอย่างถ้ามีการเปลี่ยนแปลงอะไรในเซลล์ B3 เพื่อให้บรรลุเป้าหมายนี้ให้เพิ่ม บรรทัดต่อไปนี้ถ้า B 3 จากนั้น 6 เราเริ่มต้น newvalue ด้วยค่าของเซลล์ B3 ค่าแรกด้วยช่วง D3 D6 และค่าสุดท้ายกับ D4 D7 ช่วงค่าใหม่ B3 กำหนดค่าแรกช่วง D3 D6 กำหนดช่วงค่าสุดท้ายช่วง D4 D7.7 ตอนนี้มา เคล็ดลับง่ายๆเราต้องการอัปเดตตารางเฉลี่ยกลิ้งคุณสามารถทำได้โดยเปลี่ยนค่าสี่ค่าล่าสุดด้วยสี่ค่าแรกของตารางและวางมูลค่าสต็อคใหม่ในตำแหน่งแรก Range D3 newvalue.8 อย่าลืมปิดคำสั่ง if 9 ท้ายสุดให้ป้อนสูตร AVERAGE D3 D7 ลงในเซลล์ D8.10 ทดสอบโปรแกรมโดยการคลิกที่ปุ่มคำสั่ง subscript t ใช้เพื่อแสดงเวลาเช่น t-1 หมายถึงระยะเวลาก่อนที่ t และ n ซึ่งผู้ใช้กำหนดโดยอ้างถึงระยะเวลาเฉลี่ยของ EMA ตัวอย่างเช่น EMA เทียบเท่ากับค่าเฉลี่ยเคลื่อนที่แบบง่าย 3 ช่วงมี n จาก 3 ค่าของ n มีค่าน้อยกว่า กลายเป็นผลให้ขนาดใหญ่ 1 และ EMA มากขึ้น t-1 จะยังคงอยู่ใน EMA t. ค่าแรกของ EMA ในชุดเวลาอาจจะถือว่าเป็นค่าเฉลี่ยเคลื่อนที่ที่เรียบง่ายของ n วันของราคาผู้ใช้บางรายอาจยัง ชอบที่จะเริ่มต้นค่าแรกของ EMA ตั้งแต่ช่วงที่สองเป็นต้นไปซึ่ง EMA ในช่วงเวลา 2 x ช่วงเวลา 2 ราคา 1 x ช่วงราคา 1 ผู้ใช้ควรเข้าใจว่าค่าเฉลี่ยเคลื่อนที่แบบเสวนาคือการขยายตัวแบบอนันต์ที่ราคาก่อนหน้านี้มี น้ำหนักเบามากขึ้นใน EMA t พิจารณาต่อไปนี้ผลลัพธ์นี้ i n EMA จะตอบสนองได้ดีกว่าและมีความผันผวนน้อยกว่าค่าเฉลี่ยของค่าเฉลี่ยของค่าเฉลี่ยที่เคลื่อนที่ได้ง่ายการอภิปรายอย่างละเอียดสามารถพบได้ในบทความของฉันเกี่ยวกับตัวกรองการเงินและการวิเคราะห์ทางเทคนิควิธี A ใช้ฟังก์ชันในขณะที่วิธี B ใช้วิธีย่อยในการคำนวณวิธี CMF B มีความยืดหยุ่นและรวดเร็วขึ้น วางโค้ดนี้ลงในหน้าต่างรหัส ThisWorkBook ใน VBA คลิกขวาที่เวิร์กบุคนี้ใน Project Explorer แล้วคลิกดู Code. Private Sub WorkbookOpen ส่วนที่เหลืออยู่ในโมดูลใด ๆ บอก Excel ให้รวมรายการเหล่านี้ไว้ในรายการฟังก์ชันเพิ่มคำอธิบายให้กับพวกเขาและสร้างหมวดหมู่ใหม่ที่ชื่อ Technical Indicators แมโคร EMA,.Description ส่งกลับค่าเฉลี่ยที่เพิ่มขึ้น Chr 10 Chr 10 เลือกระยะเวลา EMA ล่าสุดหรือช่วงเวลาที่ผ่านมาถ้างวดปัจจุบันเป็นงวดแรก Chr 10 Chr 10 ตามด้วยราคาปัจจุบันและ n Chr 10 Chr 10 Chr 10 ปัจจัยการผุกร่อนของค่าเฉลี่ยเคลื่อนที่เชิงเลขคำนวณเป็น alpha 2 n 1 ฟังก์ชันสาธารณะ EMA เมื่อวานนี้ราคา, n. EMA alpha ราคา 1 - alpha EMAY yesterday. Once เมื่อคุณทำกับข้างต้นแล้วคุณสามารถคำนวณค่าเฉลี่ยเคลื่อนที่แบบเสวนาได้โดยการพิมพ์ ลงในเซลล์ใด ๆ EMA EMA งวดล่าสุด, ราคาปัจจุบัน, n ป้อนราคางวดสุดท้ายเป็นระยะเวลาสุดท้าย EMA หากคุณกำลังคำนวณ EMA แรกของชุดข้อมูลของคุณเมื่อต้องการเรียกใช้วิธี B คุณต้องคัดลอกข้อมูลย่อย Runthis จากหน้าใน Accumulation Distribution Line ลงในโมดูลของคุณนอกจากนี้คุณต้องเรียกใช้ EMA จากรายการย่อย Runthis เพิ่มบรรทัดต่อไปนี้ลงใน Runthis ย่อย วางไว้ทางขวาก่อน End Sub และปิดใช้งานแมโครอื่น ๆ ทั้งหมดที่ Runthis จะเรียก sub นี้จะเริ่มคำนวณ EMA จาก t 2 เป็นต้นไป Close EMA close1 เป็นช่วง output เป็น Range, n เป็น Long. close0 close1 1, False. close1a close1 2, False. output1 output 1, False. output 2, 2 1 n close1a 1-2 1 n output1.output 2, 2 1 n close1a 1-2 1 n close0. เหมือนสิ่งที่คุณเพิ่งอ่าน Digg it หรือ Tip d it วัตถุประสงค์ของ Finance4Traders คือการช่วยให้ traders เริ่มต้นด้วยการนำเสนองานวิจัยที่เป็นกลางและ ความคิดตั้งแต่ปลายปี 2005 ฉันได้รับการพัฒนากลยุทธ์การซื้อขายบนพื้นฐานส่วนบุคคลไม่ทั้งหมดของรูปแบบเหล่านี้เหมาะสำหรับฉัน แต่นักลงทุนอื่น ๆ หรือผู้ค้าอาจพบว่ามีประโยชน์หลังจากที่ทุกคนมีเป้าหมายการลงทุนการลงทุนที่แตกต่างกันและนิสัยดังนั้น Finance4Traders กลายเป็น แพลตฟอร์มที่สะดวกในการเผยแพร่งานของฉันอ่านเพิ่มเติมเกี่ยวกับ Finance4Traders กรุณาใช้เว็บไซต์นี้ในลักษณะที่เหมาะสมและรอบคอบซึ่งหมายความว่าคุณควรอ้างอิง Finance4Traders โดยอย่างน้อยให้การเชื่อมโยงกลับไปยังเว็บไซต์นี้ถ้าคุณเกิดขึ้นกับการใช้เนื้อหาใด ๆ ของเรานอกจากนี้, คุณไม่ได้รับอนุญาต คุณควรเข้าใจว่าเนื้อหาของเราไม่ได้รับการรับประกันใด ๆ และคุณควรตรวจสอบเนื้อหาของเราก่อนที่จะใช้เนื้อหาเหล่านี้โปรดอ่านนโยบายเนื้อหาและนโยบายความเป็นส่วนตัวของไซต์เมื่อเข้าสู่ไซต์นี้โพสต์ ความเห็นกลยุทธ์การซื้อขายมีความคล้ายคลึงกับกลยุทธ์ขององค์กรการศึกษาทรัพยากรของคุณอย่างละเอียดจะช่วยให้คุณสามารถตัดสินใจได้อย่างมีประสิทธิภาพมากขึ้นอ่านต่อด้านเทคนิคตัวชี้วัดทางเทคนิคเป็นตัวชี้วัดที่ดีกว่าตัวชี้วัดที่มีการพัฒนาอย่างดี เพื่อช่วยให้ผู้ค้าดึงข้อมูลที่สำคัญจากข้อมูลทางการเงินอ่านต่อไปทำไมต้องใช้ Excel. Excel แสดงข้อมูลให้กับคุณด้วยสายตาซึ่งช่วยให้คุณเข้าใจการทำงานของคุณได้ง่ายขึ้นและประหยัดเวลาอ่านต่อ