Page 1 of 1
ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 2:57 pm
by san02551
เรียน อาจารย์ที่เคารพ
ที่ UserForm2 ผมต้องการทำอยู่ 3 ปุ่ม
- ปุ่มบันทึกข้อมูล (CommandButton1) ทำได้แล้ว หากเพิ่มอีกสัก 100 textBox จะบันทึกช้ามาก
- ปุ่มล้างข้อมูล(CommandButton2) คือ เมื่อกรอกข้อมูลเสร็จแล้ว คลิกปุ่มบันทึก และให้แสดงหน้าต่างยืนยันบันทึกข้อมูล แล้วคลิกปุ่มล้างข้อมูล เพื่อกรอกข้อมูลใหม่ครับ
- ปุ่มยลเลิก (CommandButton3)ทำได้แล้ว
ผมเรียนมาเพื่อขอรบกวนหน่อยครับ
Re: ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 3:23 pm
by snasui
Code สำหรับล้างข้อมูลชื่อว่าอะไร ติดที่บรรทัดใดครับ
Re: ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 3:41 pm
by san02551
ล้างข้อมูลใน User Form2 ครับ
1.กรอกข้อมูลใน UserForm2 แล้วคลิกปุ่มบันทึก ข้อมูลก็จะไปบันทึกใน Sheet Data ครับ
2.ใน UserForm2 ต้องการกรอกข้อมูลเพิ่มอีก
3.ข้อมูลมีหลายชุดครับ ถ้าผมให้กรอกข้อมูลสัก 10 ชุด โปรแกรมจะบันทึกช้าครับ รอประมาณ 2 นาที
4.ผมเลยอยากบันทึก สัก 5 ชุด โดยทำปุ่มล้างข้อมูลใน UserForm2 ก่อน แล้วก็บันทึกต่อไปครับ
5.ติดตรงที่ปุ่ม ล้างข้อมูล จะเลือกล้างข้อมูลที่ UserForm2 ได้ไหมครับ
Re: ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 3:52 pm
by snasui
ผมทราบในสิ่งที่ต้องการจะทำครับ การล้างข้อมูลจะต้องเขียน Code มาเอง ติดแล้วค่อยถามกันต่อ อ่านกฎข้อ 5 ด้านบนประกอบด้วยครับ
Re: ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 4:07 pm
by san02551
แนบไฟล์แล้วครับ ติดที่
Private Sub CommandButton2_Click()
Selection.ClearContents
'ขออนุญาต ต้องใช้คำสั่งใดครับ'
Range("textBox1:textBox20").Select
Selection.ClearContents
End Sub
Re: ล้างข้อมูลออกจาก UserForm เมื่อคลิกปุ่มบันทึกแล้ว
Posted: Sun Feb 23, 2014 4:14 pm
by snasui
ตัวอย่าง Code ตามด้านล่างครับ
Code: Select all
Private Sub CommandButton2_Click()
TextBox1.Text = ""
TextBox2.Text = ""
'...
TextBox20.Text = ""
End Sub