Page 1 of 1

การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 12:06 am
by tigerwit
สวัสดีครับ
มาขอความช่วยเหลืออีกครั้ง
ตามไฟล์ที่แนบมาครับ

1. Cell K9 Sheet Main ต้องการให้ผู้ใช้งานกรอกได้แค่ ก ข ค
2. Sheet Main ต้องการป้องกันไม่ใช้ผู้ใช้งานเลื่อนลงด้านล่างของ Sheet ด้วยการเลื่อนปุ่มกลาง ของเมาส์

ขอคำแนะนำด้วยครับ

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 12:21 am
by snasui
:D ให้ทำการปลดการ Protect ก่อนแล้วทำตามภาพครับ :ard:

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 10:22 pm
by tigerwit
สวัสดีครับทำตามแล้วมารายงานผล
ข้อ 1. ได้ตามต้องการ
ข้อ 2. มีปัญหาครับ หลังจากล็อค ใช้ได้ สกอร์บาร์ไม่เลื่อน (ตอนที่ยังไม่ปิดไฟล์)
แต่หลังจากปิดไฟล์ลงไป แล้วเปิดไฟล์นั้นขึ้นมาใหม่ ที่ล็อคไว้ กลับมีปัญหา ไม่ล็อคครับ เลื่อนได้เฉยเลย

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 10:43 pm
by snasui
:D Excel ไม่จำค่าที่กำหนดให้ Lock พื้นที่ไว้ครับ หนทางที่ช่วยได้คือเขียน Code VBA ตามภาพด้านล่าง :ard:

แต่เครื่องที่จะมีผลคือได้กำหนด Security เป็น Medium หรือ Low เท่านั้นครับ วิธีกำหนด Security ให้ทำดังนี้ครับ

เข้าเมนู Tools > Macro > Security > กำหนดเป็น Medium หรือ Low หากกำหนดเป็น Medium โปรแกรมจะถามว่ายอมให้ใช้ Macro หรือไม่ ซึ่งต้องตอบรับว่ายอมให้ใช้ตอนที่เปิดไฟล์ขึ้นมาครับ ถ้าเลือกเป็น Low จะไม่มีการถาม :mrgreen:

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 11:25 pm
by tigerwit
ขอบคุณครับ
ลองแล้วไม่ได้เหมือนเดิม
ผมพิมพ์โค๊ดผิดหรือเปล่าครับ

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Fri Apr 09, 2010 11:46 pm
by snasui
:lol: เนื่องจากต้อง Activate ถึงจะมีผลครับ เช่น คลิกไปที่ Sheet อื่นก่อนแล้วค่อยกลับมาคลิก Sheet Main

เพื่อให้มีผลตอนเปิดไฟล์ทุกครั้งสามารถเขียน Code ที่ ThisWorkbook โดย Copy Code ด้านล่างไปวางได้เลยครับ

Code: Select all

Private Sub Workbook_Open()
    Sheets("Main").ScrollArea = "A1:Q3"
End Sub

Re: การกำหนดให้ผู้ใช้งานกรอกเฉพาะตัวอักษรลงใน Cell

Posted: Sat Apr 10, 2010 1:02 pm
by tigerwit
ได้แล้วครับ
ขอบคุณมากครับ