Page 1 of 1
ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Mon May 12, 2014 2:40 pm
by zonewar123
สมมุติ ว่า ผมเลือกหัวข้อ aaa ใน userform1 จาก Combobox แล้วข้อมูลจำนวน,ประเภท ที่เหลือจะโชว์ใน textbox หรือ combobox อื่นขึ้นมาอัตโนมัติ
ขอความกรุณาด้วยนะครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Mon May 12, 2014 3:19 pm
by snasui
ต้องเขียน Code มาเองครับ ติดตรงไหนแล้วค่อยถามกันครับ
ลองศึกษาตัวอย่างจากที่นี่ประกอบครับ
WorksheetFunction
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Mon May 12, 2014 5:18 pm
by zonewar123
snasui wrote: ต้องเขียน Code มาเองครับ ติดตรงไหนแล้วค่อยถามกันครับ
ลองศึกษาตัวอย่างจากที่นี่ประกอบครับ
WorksheetFunction
พอเข้าใจแล้วครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Mon May 12, 2014 5:20 pm
by zonewar123
ขออีกหน่อยนะครับ
คือว่า ผมอยากให้ข้อมูลใน Combobox ดึกมาจาก sheet อื่นได้ไหมครับ คือเราไม่ต้องไป sheet นั้นได้ไหมครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Mon May 12, 2014 5:28 pm
by snasui
สำหรับ VBA แล้ว คือการเขียนโปรแกรม ย่อมมีความสามารถในขอบเขตที่กว้างขวางแทบจะไร้ขีดจำกัด
ที่ถามมานั้นเป็นเรื่องปกติที่จะทำได้ด้วย VBA ครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Tue May 13, 2014 8:53 am
by zonewar123
snasui wrote: สำหรับ VBA แล้ว คือการเขียนโปรแกรม ย่อมมีความสามารถในขอบเขตที่กว้างขวางแทบจะไร้ขีดจำกัด
ที่ถามมานั้นเป็นเรื่องปกติที่จะทำได้ด้วย VBA ครับ
สมมุติว่า ผมต้องการให้ Combobox3 ใน Userform4 ดึงข้อมูลจากชีท สต็อกวัสดุ โดยผมใช้ name manager ที่ชื่อว่า list2 เป็นตัวขยาย select
ผมต้องการให้เวลาเราอยู่ที่ไหนก็ได้ เปิด Userform4 เลือก Combobox3 มันก็จะมีข้อมูลของ แถว list2 ขึ้นมาให้ โดยที่เราไม่ต้องไปใน Sheets สต็อกวัสดุ อ่ะครับ
พอจะมีวิธีไหมครับ
เพราะว่าตอนนี้ผมทำได้แค่ใส่ Row source ใน propertie เป็น list2 เอาไว้ เวลาไปอยู่ใน Sheet อื่นๆ มันก็ไม่ขึ้นข้อมูลมาให้ครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Tue May 13, 2014 9:32 am
by snasui
ลองดูตัวอย่างการปรับ Code ตามด้านล่างครับ
Code: Select all
Private Sub UserForm_Initialize()
UserForm4.ComboBox3.RowSource = Names("สต็อกวัสดุ!list2")
' -----------------------
'ComboBox3.Value = ""
tb2.Value = ""
TextBox3.Value = ""
ComboBox1.Value = ""
ComboBox2.Value = ""
TextBox5.Value = ""
ComboBox3.SetFocus
End Sub
หาก Scope ของ Range name อยู่ในชีทใด เขียนชีทนั้นกำกับเข้าไปกับ Range name นั้นด้วยครับ
Re: ผมอยากทราบว่า จะให้โชว์ข้อมูลใน textbox ยังไงครับ VBA
Posted: Tue May 13, 2014 12:28 pm
by zonewar123
ขอบคุณมากครับ