แสดงผลลัพธ์ ทศนิยม ใน textbox
Posted: Wed Feb 17, 2016 11:16 am
เรียนทุกท่าน ครับ
ผมต้องการ นำข้อมูล จาก b3:b5
แสดงผลลัพธ์ ที่ textbox 1 ครับ ให้เป็น
1,000.00 ครับ ไม่ทราบว่าจะกำหนด code ตรงไหนครับ
ผมต้องการ นำข้อมูล จาก b3:b5
แสดงผลลัพธ์ ที่ textbox 1 ครับ ให้เป็น
1,000.00 ครับ ไม่ทราบว่าจะกำหนด code ตรงไหนครับ
Code: Select all
Private Sub ComboBox1_Change()
On Error Resume Next
Set myRange = Worksheets("data1").Range("a3:b5")
TextBox1.Value = Application.WorksheetFunction.VLookup(CLng(ComboBox1), myRange, 2, False)
End Sub
เพิ่มบรรทัด