snasui.com ยินดีต้อนรับ ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
เมื่อทดสอบ listbox 2 ตัว ดังนี้:
Code ใน Module1:
Show Userform1,ListBox1,ListBox2
Open 1.xls
Fill ListBox1 with Rowsource
Close 1.xls
Open 2.xls
Fill ListBox2 with Rowsource
Close 2.xls
ทั้งสอง listbox แสดงรายการครบถ้วนครับ
--------------------------------------------------------------------------------------------------------------------------------------------
แต่พอแก้ไขเป็นดังนี้:
Codes ใน Module1:
Show Userform1,ListBox1,ListBox2, เพิ่ม CommandButton1
Codes in Userform1:
CommandButton1_Click
Open 1.xls
Fill ListBox1 with Rowsource
Close 1.xls
มี error message แสดงข้อความ" Not enough storage is available to operate this operation."
และ ListBox1 แสดงข้อมูลของ 1.xls เพียง 2-3 แถว นอกนั้นเป็นแถวว่างบ้าง บางแถวข้อมูลแหว่งบ้าง เป็นขยะบ้าง
snasui.com ยินดีต้อนรับ 
สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ 
โปรดทราบ 
