EXCEL TOOLS
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
[code]
และปิดด้วย [/code]
ตัวอย่างเช่น [code]dim r as range[/code]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)ไม่มี Properties ในการกำหนด Gridline ของ ListBox ครับBafnet wrote:ผมได้ไปตามกระทู้ที่อาจารย์บอกครับ(เป็นเรื่องราวของการบันทึกลูกค้าและพนักงาน รายการอาหาร
และได้ลองอ่านดู ไม่พบประเด็นของการกำหนดให้ listbox มีเส้นตารางเลยครับ
ความเสถียรไม่น่าจะต่างกัน หากเขียน Code เองได้อย่างแม่นยำครับ สำหรับ Code ที่ได้จากการบันทึก Macro ย่อมมั่นใจได้ว่า Code มีความแม่นยำ ทำงานได้ถูกต้องแน่นอน แต่อาจจะได้ Code ที่เกินความจำเป็นมาให้ด้วย ซึ่งเราควรที่จะปรับออกไปให้เหลือเท่าที่จำเป็นเพื่อให้มีความกระชับทำงานได้รวดเร็วBafnet wrote:การที่เราใช้คำสั่งที่ บันทึกจากมาโคร มันมีความเสถียรแตกต่างกับการใช้คำสั่งที่เราเขียนตรงใน VBA ไหมครับ
ครับ เข้าใจถูกต้องร้อยเปอร์เซ็นต์เต็มเปรี๊ยะไม่มีหย่อนแม้แต่นิดเดียวครับBafnet wrote:หรืออาจารย์จะบอกว่า เมื่อไม่มี Properties/Gridline ของ ListBox ก็จะกำหนดให้ ListBox มีเส้นตารางไม่ได้
เลยคิดว่ามีวิธีsnasui wrote: เราสามารถทำ ListBox ให้มีลักษณะเหมือนตารางได้ตามจำนวนคอลัมน์และจำนวน List ได้ครับ
ลองส่งไฟล์ตัวอย่างมาดูจะได้ทดสอบได้สะดวกครับ
Code: Select all
Selection.EntireColumn.AutoFit
With Selection
.Borders(xlEdgeLeft).LineStyle = xlContinuous
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeBottom).LineStyle = xlContinuous
.Borders(xlEdgeRight).LineStyle = xlContinuous
.Borders(xlInsideHorizontal).LineStyle = xlContinuous
.Borders(xlInsideVertical).LineStyle = xlContinuous
End With