Page 1 of 1

สอบถามเรื่องให้excelทุกworkbook minimizeตอนเปิด

Posted: Thu Oct 17, 2013 7:53 pm
by Polnapath
ไม่ทราบว่าควรเขียนcodeในThisWorkbookยังไงให้เวลาเราเปิดไฟล์ขึ้นมาแล้วซ่อนworkbookทั้งหมดให้เหลือแต่เพียงโปรแกรมที่เราเขียนรันไว้อย่างเดียวครับ

แล้วก็ถ้าหากว่าผมต้องการให้ปุ่มexitที่สร้างไว้กดแล้วปิดexcelไปเลยโดยที่ไม่กระทบต่อworkbookอื่นๆ(workbookที่ไม่ใช่ตัวโปรแกรม) ยังคงเปิดอยู่จะทำยังไงครับ

ปล. ผมเคยใช้codeของอาจารย์ที่เขียนว่า Application.DisplayAlerts = False
Application.Quit
แล้วทีนี้มันปิดworkbookไปหมดเลยรวมทั้งworkbookที่ไม่ได้เกีย่วข้องด้วย

ขอบคุณครับ

Re: สอบถามเรื่องให้excelทุกworkbook minimizeตอนเปิด

Posted: Thu Oct 17, 2013 7:58 pm
by snasui
:lol: Application.Quit คือปิด Application ซึ่งตัว Application คือ Excel ไม่ใช่เพียงแต่ปิด Workbook

หากจะปิดเฉพาะ Workbook ก็ลองบันทึก Macro แล้วดู Code ว่าโปรแกรมสร้าง Code อะไรมาให้ครับ เช่นบันทึก Macro ใน Workbook A แล้วทำการปิด Workbook B แล้วค่อยนำ Code มาปรับใช้ครับ

Re: สอบถามเรื่องให้excelทุกworkbook minimizeตอนเปิด

Posted: Thu Oct 17, 2013 8:29 pm
by bank9597
:lol: ผมก็ติดปัญหาอยู่พอดีครับ ผมใช้โค๊ดนี้

Application.CellDragAndDrop = False

ปรากฏว่ามันเป็นทั้งโปรแกรมเลย เปิดไฟล์อื่นก็เป็นไปด้วย ต้องเข้าไปตั้งค่าใหม่เท่านั้น

Re: สอบถามเรื่องให้excelทุกworkbook minimizeตอนเปิด

Posted: Fri Oct 18, 2013 1:29 am
by Polnapath
ขอบคุณอาจารย์มากครับ