Page 1 of 1

นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 9:38 am
by godstep
ช่วยด้วยครับ
ต้องการนำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

ขอบคุณครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 9:46 am
by snasui
:D การใช้ VBA ต้องลองเขียนมาเองก่อนตามกฎการใช้บอร์ดข้อ 5 ด้านบน :roll: ติดตรงไหนแล้วค่อยมาถามกันต่อครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 10:05 am
by godstep
snasui wrote::D การใช้ VBA ต้องลองเขียนมาเองก่อนตามกฎการใช้บอร์ดข้อ 5 ด้านบน :roll: ติดตรงไหนแล้วค่อยมาถามกันต่อครับ
ผมเขียนโค้ดนี้ไว้ใน worksheet1 textbox1.text แต่ต้องการดึงข้อมูลจาก textbox1.text ใน worksheet ชื่อ Main ไปแสดง ผมเขียนแบบข้างล่างแต่ว่าค่าไม่มาครับ

TextBox1.Text = Worksheet(Main).TextBox1.Text

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 10:12 am
by snasui
:D จาก Code Worksheet(Main).TextBox1.Text

สำหรับการอ้างอิงถึง Sheet ที่ไม่ได้กำหนดตัวแปรไว้จะต้องครอบด้วยฟันหนูเสมอเป็น Worksheets("Main").TextBox1.Text

หากยังไม่ได้คำตอบ ให้แนบไฟล์ที่เป็นปัญหามาด้วย จะได้ช่วยตรวจสอบได้ครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 10:36 am
by godstep
ผมต้องการดึงข้อมูลจาก worksheet CF3 ใน textbox1.text
ไปแสดงที่ worksheet Start ใน textbox1.text

ผมแนบไฟล์กับรูปของ box ให้นะครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 10:56 am
by snasui
:D ไปแสดงเมื่อคลิกปุ่มใดหรือเกิดเหตุการณ์ใดหรือผู้ใช้งานทำอะไร เมื่อใด ช่วยระบุมาด้วยครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 1:25 pm
by godstep
snasui wrote::D ไปแสดงเมื่อคลิกปุ่มใดหรือเกิดเหตุการณ์ใดหรือผู้ใช้งานทำอะไร เมื่อใด ช่วยระบุมาด้วยครับ

ผมเพิ่มรายละเอียดให้ตามรูปนะครับ และลบปุ่มกดที่ไม่เกี่ยวข้องทิ้ง แนบไฟล์ excel ใหม่ให้ด้วยครับ

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 1:46 pm
by snasui
:D ตัวอย่าง Code ตามด้านล่างครับ

Code: Select all

Private Sub CommandButton1_Click()
    Sheets("Start").TextBox1.Text = Sheets("CF3").TextBox1.Text
    'Other code
End Sub

Re: นำข้อมูลใน Textbox1 worksheet1 มาแสดงที่ Textbox1 worksheet2 เขียนโค้ดยังไง

Posted: Fri Jul 31, 2015 5:32 pm
by godstep
snasui wrote::D ตัวอย่าง Code ตามด้านล่างครับ

Code: Select all

Private Sub CommandButton1_Click()
    Sheets("Start").TextBox1.Text = Sheets("CF3").TextBox1.Text
    'Other code
End Sub
ทำได้แล้วครับ
ขอบคุณครับ