Page 1 of 1

ต้องการแสดงข้อมูลใน ListBox เมื่อเราคีย์ข้อมูลเพิ่มครับ

Posted: Mon May 20, 2019 10:29 am
by kanchat_1412
รบกวนสอบถามด้วยครับ
ตอนนี้ใช้คำสั่ง
ListBox_data.ColumnCount = 7
ListBox_data.RowSource = "Tension!A2:G5"
แต่เมื่อมีการเพิ่มบรรทัด อยากให้ข้อมูลนั้นมาลงในตาราง ListBox ด้วยครับ ตามรูปภาพครับ

Re: ต้องการแสดงข้อมูลใน ListBox เมื่อเราคีย์ข้อมูลเพิ่มครับ

Posted: Mon May 20, 2019 10:50 am
by EX2010
Name Manager => ตั้งชื่อ = Data กรอกข้อมูล Refers to: =offset(Database!$A$2,,,Counta($A2$:$A$100000),7)

ListBox_Data.Rowsource ="Data"

Re: ต้องการแสดงข้อมูลใน ListBox เมื่อเราคีย์ข้อมูลเพิ่มครับ

Posted: Mon May 20, 2019 11:01 am
by kanchat_1412
EX2010 wrote: Mon May 20, 2019 10:50 am Name Manager => ตั้งชื่อ = Data กรอกข้อมูล Refers to: =offset(Database!$A$2,,,Counta($A2$:$A$100000),7)

ListBox_Data.Rowsource ="Data"


ขอบคุณมากครับ
ถ้าเราจะใช้รูปแบบ Format เป็นแบบ .Cells จะได้ไหมครับ เผื่อเอาไปต่อยอด

Re: ต้องการแสดงข้อมูลใน ListBox เมื่อเราคีย์ข้อมูลเพิ่มครับ

Posted: Mon May 20, 2019 12:19 pm
by snasui
:D ใช้ .Cells หรือ .Range ได้ครับ

ตัวอย่าง .Range

เช่น ListBox_Data.Rowsource="Sheet1!" & .Range("A2",.Range("A" & .Rows.Count).End(xlUp)).Address