Page 1 of 1

Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Tue Aug 02, 2011 5:22 pm
by tongfangfupai
Excell 2007 เราสามารถ ที่จะกำหนด default ของ custom view ได้ไหมครับ เช่นในกรณีที่ทำงานในโปรไฟล์ A แล้วเซฟพอเปิดขขึ้นมาใหม่
จะเป็นหน้าของ โปรไฟล์ B ที่เราตั้งเป็น default ไว้น่ะครับ ยังไงรบกวนด้วยนะครับคือผมเป็นมือใหม่น่ะครับ
ขอบคุณครับ

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Tue Aug 02, 2011 6:00 pm
by snasui
:D View การแสดงหน้าใด ๆ ใน Excel เมื่อเปิดไฟล์จะขึ้นอยู่กับว่าเรา Save โปรแกรมครั้งสุดท้ายที่หน้าใดครับ การจะให้เปิดมาแล้วไปยัง View ที่ต้องการคงต้องพึ่งพา VBA เนื่องจากไม่มี Option ในการกำหนดหน้า View เพื่อตั้งเป็น Default ครับ :mrgreen:

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 10:06 am
by tongfangfupai
ไม่ทราบว่าพอจะมีตัวอย่างของ code ที่ใช้ custom view ใหมครับ

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 10:46 am
by snasui
:D ประการแรกต้องไปสร้าง Custom View เสียก่อนครับ โดย
1. ไปยังพื้นที่ที่ต้องการให้แสดงเมื่อเปิดไฟล์
2. เข้าเมนู View > Custom View > Add > กรอกชื่อ View ที่ต้องการ สมมุติชื่อ TestV
3. กดแป้น Alt+F11
4. Double Click ThisWorkbook > วาง Code ตามด้านล่าง > Save

Code: Select all

Private Sub Workbook_Open()
    ActiveWorkbook.CustomViews("TestV").Show
End Sub

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 3:38 pm
by tongfangfupai
ลองทำได้แล้วครับ แต่พอ protect sheet แล้ว vba กลับไม่ทำงานครับ

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 3:55 pm
by snasui
:D ส่งไฟล์ตัวอย่างมาดู เพื่อจะได้ช่วยหาสาเหตุครับ :P

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 4:22 pm
by tongfangfupai
Book1.xlsm
ตามไฟล์ที่แนบมานี่ครับตอนยังไม่ได้ protect sheet มาโครใช้งานได้ครับแต่พอ protect sheet เปิดไฟล์มาแล้วไม่ทำงานครับ
ยังไงรบกวนดูให้หน่อยนะครับ

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 4:29 pm
by snasui
:D กรณีมีการซ่อนคอลัมน์ ซ่อนบรรท้ดแล้ว Protect ต้องไปปลด Protect ออกก่อนครับ

ตัวอย่างเช่น Code ด้านล่าง

Code: Select all

Private Sub Workbook_Open()
    Worksheets("Sheet1").Unprotect
    ActiveWorkbook.CustomViews("222").Show
    Worksheets("Sheet1").Protect
End Sub

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 4:52 pm
by tongfangfupai
ได้แล้วครับ ขอบพระคุณเป็นอย่างสูงเลยครับ ยังไงก็ถามแล้วขอถามต่อเรื่องเดิมอีกนิดนะครับ
แล้วถ้าเกิดกรณแบบไฟล์เมื่อกี้แต่เป็นกรณีที่เราเซฟไฟล์แบบที่เวลาเปิดต้องใส่ password
ที่excel 2007เลือกตรง save as แล้วเลือก general แล้วให้ใส่ password ล่ะครับจะต้องใช้ code
แบบไหนครับ
ยังไงขอบคุณอีกคร้งนะครับสำหรับคำแนะนำมีประโยชน์กับผมมากเลยครับ

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Wed Aug 03, 2011 6:13 pm
by snasui
:D ไม่เข้าใจครับ หากเป็นกรณีต้องการเปิดไฟล์ที่มีการป้องกันการเปิดโดยใช้ Macro ลอง Search หาจาก Internet เนื่องจากการทำเช่นนั้น อาจจะเป็นการละเมิดทรัพย์สินทางปัญญาของผู้อื่นได้ครับ

หากเป็นการ Protect File แบบใส่ Password ให้ลองดูกระทู้นี้ครับ ซึ่งเป็นตัวอย่างการเขียน Code ให้ใส่ Password และการปลด Password ดูต้วอย่างที่นี่ครับ http://topicstock-tech.pantip.com/tech/ ... 910.html#6

Re: Excell 2007 กำหนด default custom view ได้ไหมครับ

Posted: Thu Aug 04, 2011 9:29 am
by tongfangfupai
ขอบคุณมากครับ ทำได้แล้วครับ url ที่แนะนำมาตามที่ต้องการเลยครับ