Snasui Excel Forum

เรีนท่านอาจารย์ครับ / ท่านผู้รู้ครับ
สืบเนื่องจากกระทู้เดิม ๆ ที่ผมสร้างใบลาแล้ว Run Macro เพื่อทำ Object ใน Outlook ได้เป็นผลสำเร็จและนำไปใช้งานต้องขอขอบคุณทุกท่านครับ ครั้งนี้ ต้องการเพิ่มฟังก์ชั่นให้สามารถลงบันทึกใน Calendar ของ Outlook ได้ด้วย ( เพื่อจะได้ติดตามการลาย้อนหลังได้ )
ดังนั้นผมจ ...

Test Sentemail.xlsm เรียนอาจารย์/ ผู้รู้ครับ
ผมออกแบบการส่งเมล์เพื่อขออนุมัติการลา โดยได้ลอกโค้ดมาจากมีผู้ให้ความรู้ไว้ทำตามโค้ดนี้ ( ตาม Module1 )ครับ
Sub SendEmail_Outlook()
Dim OutlookApp As Object
Dim MItem As Object
Dim email_ As String
Dim subject_ As String
Dim body_ As String
Dim ...

ขอบคุณมากครับ
ทำได้แล้ว ที่คุณ snasui แนะโค้ดมา
ทำให้ได้แนวทางคือ เมื่ออนุมัติให้สร้างSheet.ใหม่เพื่อนำค่าแผ่นงานที่อนุมมัตินั้นไปเก็บส่วน
แผ่นเก่าก็ให้แมโครล้างค่าเพื่อพร้อมสำหรับการทำงานใหม่
ซึ่งผมมองแต่อยากจะทำงานที่แผ่นใหม่อย่างเดียว
เป็นคำแนะนำที่มาประยุกต์ใช้ได้ดีมาก ๆ เลย
ขอบคุณมาก

ขอบคุณครับที่เข้ามาอธิบาย
คืออย่างนี้ครับคุณ snasui
การอนุมัติของผู้จัดการในแต่ละวันทันทีที่อนุมัติแผ่นงานปัจจุบันแมโครจะสร้างแผ่นงานใหม่ ( เป็น Format ทำงานที่ยังไม่ป้อนข้อความ ) เพื่อให้หัวหน้างานใช้งานต่อไปในวันรุ่งขึ้น ลักษณะเป็นการวนลูป ที่ต้องทำลักษณะนี้เป็นเพราะมีการตั้งล๊อคชีทนั้นภายหล ...

ผมสร้างรูปแบบงานต่อเนื่องของแผ่นงานดังนี้ครับ
แผ่นงานปัจจุบันมีการตรวจจากผู้จัดการกดปุ๋มอนุมัติ === >> แมโครทำงานตามขั้นตอน 1. เรียกแผ่นงานต้นฉบับมาทำสำเนาเพื่อสร้างแผ่นงานในวันต่อไป ตั้งชื่อใหม่ว่า New. 2.คืนค่าเรียกกลับแผ่นงานต้นฉบับนำไปซ่อน 3.ทำงานที่แผ่นงานปัจจุบันลงชื่อผู้อนุมัติ ลงวันเวลาอนุม ...