การเรียกใช้แมโครโดยอัตโนมัติเมื่อเปิดเวิร์กบุ๊ก

สิ่งสำคัญ:  บทความนี้เป็นการแปลด้วยเครื่อง โปรดดู ข้อจำกัดความรับผิดชอบ โปรดดูบทความฉบับภาษาอังกฤษ ที่นี่ เพื่อใช้อ้างอิง

คุณอาจต้องแมโครที่คุณบันทึกการทำงานโดยอัตโนมัติเมื่อคุณเปิดเวิร์กบุ๊กที่เฉพาะเจาะจง กระบวนงานต่อไปนี้ใช้ตัวอย่างจะแสดงวิธีการที่ทำงาน คุณอาจต้องการเรียกใช้แมโคโดยอัตโนมัติเมื่อ Excel เริ่มทำงาน

ก่อนที่คุณจะเริ่มต้น ให้แน่ใจว่ามีแท็บ นักพัฒนา แสดงอยู่บน Ribbon ถ้ายังไม่มี ให้ทำดังนี้

  1. คลิก ไฟล์ > ตัวเลือก > กำหนด Ribbon เอง

  2. ภายใต้ กำหนด Ribbon เอง ในกล่อง แท็บหลัก ให้เลือกกล่อง นักพัฒนา

  3. คลิก ตกลง

เมื่อต้องการใช้ตัวอย่างด้านล่างในเวิร์กบุ๊กของคุณเอง ให้สร้างแผ่นงานสำหรับแต่ละวันของเดือน และตั้งชื่อแท็บของแผ่นงานตามไปด้วย ตัวอย่างเช่น ตั้งชื่อเป็น มีนาคม 1, มีนาคม 2 เรื่อยไปจนถึง มีนาคม 31 แมโครจะถูกเรียกใช้โดยอัตโนมัติเมื่อคุณเปิดเวิร์กบุ๊ก โดยจะแสดงแท็บสำหรับวันปัจจุบันของเดือน

  1. คลิก นักพัฒนา > Visual Basic

กลุ่ม โค้ด บนแท็บ นักพัฒนา

  1. คลิก แทรก > มอดูล

  2. ในมอดูล ให้แทรกโค้ดต่อไปนี้

    ส่วนตัวย่อย Auto_Open()
    พร่ามัว vntToday เป็นตัวแปร
    vntToday = WorksheetFunction.Text (วัน, " mmmm dd ")
    บนข้อผิดพลาดประวัติย่อถัดไป
    Sheets(vntToday) เลือก
    ถ้าข้อผิดพลาด <> 0 แล้ว
    MsgBox "เวิร์กชีตไม่มีอยู่"
    อีก
    Range("A1") เลือก
    สิ้นสุดถ้า
    ย่อยสิ้นสุด

  3. ปิด Visual Basic (คุณไม่ต้องบันทึกอะไร)

  4. บันทึกเวิร์กบุ๊กเป็น Excel Macro-Enabled Workbook (*xlsm) และปิดเวิร์กบุ๊ก

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

เคล็ดลับ: คุณสามารถสร้างเวิร์กบุ๊กใหม่สำหรับเดือนแต่ละเดือนเมื่อถึงเวลานั้น และสร้างแมโครขึ้นมาอีกสำหรับเวิร์กบุ๊กใหม่นั้น

หมายเหตุ: ข้อจำกัดความรับผิดชอบของการแปลด้วยเครื่อง: บทความนี้มีการแปลด้วยระบบคอมพิวเตอร์โดยไม่มีการดำเนินการโดยบุคคล Microsoft จัดให้มีการแปลด้วยเครื่องนี้เพื่อช่วยให้ผู้ใช้ที่ไม่ได้พูดภาษาอังกฤษสามารถใช้ประโยชน์จากเนื้อหาเกี่ยวกับผลิตภัณฑ์ บริการและเทคโนโลยีของ Microsoft เนื่องจากบทความมีการแปลด้วยเครื่อง อาจมีข้อผิดพลาดด้านคำศัพท์ ไวยากรณ์หรือรูปประโยค

ขยายทักษะของคุณ
สำรวจการฝึกอบรม
รับฟีเจอร์ใหม่ก่อนใคร
เข้าร่วม Office Insider

ข้อมูลนี้เป็นประโยชน์หรือไม่

ขอบคุณสำหรับคำติชมของคุณ!

ขอขอบคุณสำหรับคำติชมของคุณ! เราคิดว่าอาจเป็นประโยชน์ที่จะให้คุณได้ติดต่อกับหนึ่งในตัวแทนฝ่ายสนับสนุน Office ของเรา

×