Page 1 of 1
เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่างไร
Posted: Sat Nov 26, 2011 11:56 am
by bigger10
เมื่อผมขยาย Sheet งานของตนเองเป็นแบบ Full Screen แล้วพบว่าบนแถบTitle จะมีชื่อไฟล์.xlsm และตามด้วย "-Microsoft Excel" นั้น ผมอยากเรียนถามอาจารย์ว่า เราสามารถเปลี่ยนชื่อ "-Microsoft Excel" เป็นชื่ออื่นๆ ได้ไหมครับ เช่น เปลี่ยนเป็นชื่อหน่วยงานหรือองค์กร เป็นต้น ถ้าเปลี่ยนชื่อได้ ผมขอทราบวิธีการเขียน Code VBA ด้วยครับ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sat Nov 26, 2011 12:35 pm
by snasui
ลองใช้ Code ตามด้านล่างครับ
Code: Select all
Sub ChangeExcelTitle()
Application.Caption = "Enter wording what you want"
End Sub
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sat Nov 26, 2011 1:59 pm
by bigger10
ขอบคุณมากครับ
-----
ไม่ต้องทำ Link ไปยังหน้าจอการตอบปัญหาครับ ที่ทำ Link ผมลบออกให้แล้ว ผู้ตอบสามารถทราบได้เองว่าต้องคลิกปุ่มไหน
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sun Nov 27, 2011 6:29 am
by tahc
อาจารย์ครับ ผมขอรายละเอียดและขั้นตอนการเอาโค้ดนี้ไปใช้ครับ ..ขอบคุณมากครับ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sun Nov 27, 2011 7:33 am
by snasui
ดูวิธีการจาก Link นี้ครับ
http://snasui.blogspot.com/2011/09/vba.html
ตั้งแต่ข้อ 3 เป็นต้นไปจะบอกวิธีการวาง Code และการเรียกใช้ Code
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sun Nov 27, 2011 6:53 pm
by tahc
หลังจากกด alt+f11 แล้วก่อนจะเอาโค้ดไปลง ต้องคลิกที่หมายเลข 1,2,3 ก่อนไหมครับ
ถ้าต้องเลือกก่อน...
บริเวณพื้นที่หมายเลข 1 เลือก sheet1 หรือ sheet2 หรือ sheet3 หรือ ThisWorkbook
หมายเลข 2 เลือกอะไร
หมายเลข 3 เลือกอะไร
ขออภัยครับอาจารย์ ไม่เป็นจริงๆ
ขอบคุณครับอาจารย์
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Sun Nov 27, 2011 7:00 pm
by snasui
คลิกเมนู Insert > Module โปรแกรมจะสร้าง Module1 มาให้ จากนั้นนำ Code ไปไว้ใน Module1 แล้วลองเรียกใช้ดูครับ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Tue Nov 29, 2011 9:01 am
by bank9597
โค๊ดดังกล่าวของอาจารย์ใช้ได้ผลครับ แต่จะต้องสั่งรันทุกครั้งที่เปิดโปรแกรม
ฉะนั้นผมจึงอยากได้วิธีที่สั่งให้โค๊ดรันทันทีที่เปิดเครื่อง
แต่ยังไม่อยากให้ตอนนี้ ผมจะขอลองทำเองก่อนครับ ฮ่าๆ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Tue Nov 29, 2011 9:16 am
by snasui
bank9597 wrote:โค๊ดดังกล่าวของอาจารย์ใช้ได้ผลครับ แต่จะต้องสั่งรันทุกครั้งที่เปิดโปรแกรม
ฉะนั้นผมจึงอยากได้วิธีที่สั่งให้โค๊ดรันทันทีที่เปิดเครื่อง
ไม่จำเป็นต้องสั่ง Run Manual ครับ สามารถทำไปใส่ใน ThisWorkbook เพื่อให้ Run แบบ Automatic
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Tue Nov 29, 2011 9:36 am
by bank9597
โอ๊ว...คิดว่าต้องทำเพิ่มมากกว่านี้เสียอีก เสียหน้าๆๆๆ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Fri Dec 02, 2011 6:10 am
by tahc
ขอบพระคุณมากมายเลยครับ...อาจารย์
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Fri Dec 02, 2011 6:33 am
by tahc
สั่ง Run แล้วได้ป้ายนี้ ไปไหนต่อครับอาจารย์
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Fri Dec 02, 2011 8:52 am
by bank9597
สั่ง Run แล้วได้ป้ายนี้ ไปไหนต่อครับอาจารย์
ดูในรูปด้านบนซ้ายที่เขียนว่า General นะครับ ให้เปลี่ยนเป็น Workbook ด้านบนขวาก็จะเป็น Open
แค่นี้ก็ได้แล้วครับ
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Fri Dec 02, 2011 3:42 pm
by snasui
อ่านตามหน้าต่าง Pop up แล้วเข้าใจว่าได้กำหนด Security เกี่ยวกับ Macro เป็น High ลองปรับเป็น Medium หรือ Low โดยไปยัง Excel แล้วเข้าเมนู Tools > Macro > Security > Medium หรือ Low หากกำหนดเป็น Medium จะต้องคลิกให้ยอมรับการใช้งาน Macro ทุกครั้งที่เปิดไฟล์ที่มี Macro
จากนั้นลอง Save ไฟล์ ปิดไฟล์แล้วเปิดขึ้นมาใหม่ ทดสอบการ Run Code
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Tue Dec 13, 2011 11:27 pm
by tahc
ไม่สำเร็จอีกแล้วครับอาจารย์ ไม่เป็นไรครับ ผมคงต้องไปเพิ่มRAMให้กับตัวเองก่อนครับ !!!
Re: เปลี่ยนชื่อ Title "-Microsoft Excel" เป็นชื่ออื่นได้อย่า
Posted: Thu Dec 15, 2011 10:10 am
by ChoBkuN
เปิดทันทีเมื่อเปิดfile ครับ