Page 1 of 1
ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 10:20 am
by diamondbom
ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
ต้องการแอดทั้ง Cells(C, 1) และ Cells(C, 1)
ผมทดลอง
.AddItem Sheet1.Cells(C, 1).Value + " " + Sheet1.Cells(C, 2).Value
แต่ว่าใช้ไม่ได้ รบกวนด้วยครับ
ขอบคุณครับ
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 6:08 pm
by snasui
ปรับ Code ด้านบนเป็นตามด้านล่างครับ
Code: Select all
.AddItem Sheet1.Cells(C, 1).Value & " " & Sheet1.Cells(C, 2).Value
การบวกเพื่อเชื่อมข้อความ ต้องมั่นใจว่าต้องเป็นข้อความ + ข้อความ หากเป็นตัวเลข + ข้อความจะติด Error ดังนั้น หากต้องการเชื่อมข้อความเข้าด้วยกัน โดยไม่ต้องกังวลว่าต่างรูปแบบกัน สามารถเลือกใช้เครื่องหมาย & แทนครับ
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 7:07 pm
by diamondbom
ขอบคุณครับ
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 7:24 pm
by diamondbom
ถ้าในการเลือกต้องการให้แสดงผลเฉพาะตัวเลขควรทำอย่างไรครับ
เช่น แสดงเฉพาะตัวเลขที่เลือกใน column C เป็น 1
ขอบคุณครับ
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 7:57 pm
by snasui
ตัวอย่างการปรับ Code ครับ
Code: Select all
With Application
Sheet1.Cells(1, 3).Value = VBA.Left(ComboBox1.Text, .Search(" ", ComboBox1.Text) - 1)
End Wit
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 8:07 pm
by diamondbom
ขอบคุณครับ
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 8:37 pm
by diamondbom
ถ้าต้องการ คำ ด้านขวาทำอย่างไรครับ ผมลองปรับแบบนี้แต่ไม่ได้
With Application
Sheet1.Cells(1, 3).Value = VBA.Right(ComboBox1.Text, .Search(" ", ComboBox1.Text) - 1)
End With
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 8:46 pm
by snasui
สำหรับ Code ควรวางให้แสดงเป็น Code จะได้สะดวกในการอ่านและ Copy ไปใช้ ดู Link นี้ประกอบครับ
viewtopic.php?style=1&f=6&t=1187
สำหรับที่ถามมานั้นปรับเป็นด้านล่างครับ
Code: Select all
Sheet1.Cells(1, 3).Value = Mid(ComboBox1.Text, .Search(" ", ComboBox1.Text) +1)
Re: ขอสอบถามการ Add Item ของ ComboBox1 หน่อยครับ
Posted: Wed Feb 04, 2015 9:12 pm
by diamondbom
ขอบคุณครับ