Page 1 of 1
ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 11:38 am
by piman
สวัสดีครับ
ผมได้ทำการสร้าง ปุ่มสำหรับ กดเข้าไปที่ userform ไว้ที่ ชีท Program สองปุ่ม
1.ปุ่มสำหรับเพิ่มข้อมูล เมื่อกรอกข้อมูลเสร็จแล้ว กดปุ่มบันทึก จะบันทึกข้อมูลไปที่ ชีท Data (สามารถใช้งานได้)
2.ปุ่มสำหรับค้นหาและแก้ไข ใส่ชื่อเข้าไปในช่องค้นหา จะต้องดึงข้อมูลจากชีท Data มาแสดงใน textbox แต่ไม่มีข้อมูลใดๆมาแสดงครับ****
รบกวนด้วยครับ
ขอบคุณครับ
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 7:33 pm
by snasui

ช่วยยกตัวอย่างค่าที่ต้องการจะค้นหา Object ไหนเลือกหรือกรอกอะไรบ้าง สิ่งเหล่านี้จะต้องแจ้งมาเสมอ หากพบจะได้ค่าที่ Object ไหนเป็นอย่างไร จะได้เข้าถึงปัญหาโดยไวครับ
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 9:13 pm
by piman
ตัวอย่าง เช่น ผมจะทำการค้นหาคนชื่อ สมฤทัย ครับ พิมพ์ สมฤทัย ในช่องค้นหาข้อมูล จากนั้น กดปุ่มค้นหาจากชื่อ ถ้ามี ทั้งข้อมูลส่วนตัวและข้อมูลการทำงาน จะขึ้นแสดงในช่อง Textbox ต่างๆครบถ้วนครับ
หมายเหตุ : ก่อนหน้านี้ผมทำให้ปุ่ม กับ ข้อมูลตารางใน sheet "Data" อยู่ใน sheet เดียวกันครับ พอนำปุ่มแยก sheet ออกมาก็ไม่สามารถดึงข้อมูลมาได้ครับ
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 9:17 pm
by snasui

ผมลองหาชื่อสมฤทัยก็พบข้อมูลตามปกติครับ
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 9:40 pm
by piman
ผมลองแนบรูปมาให้ครับ ไม่มีข้อมูลใดๆมาเลยครับ
จะมีที่เปลี่ยนแปลงคือ active cell ครับ ไม่ว่าจะไปกดที่ช่องใดๆ พอกดปุ่มค้นหาจากชื่อ ตัว active cell จะมาอยู่ที่ช่อง A2 ของ sheet Program ครับ
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 9:46 pm
by snasui

เพิ่มการเลือกชีต Data เข้าไปตามด้านล่างครับ
Code: Select all
'Other code
GoTo nNext
End If
Sheets("Data").Activate
txtID.Value = Cells(nRow, 1)
'Other code
Re: ดึกข้อมูลจากอีก sheet มาแสดงใน textbox
Posted: Tue Aug 11, 2020 9:51 pm
by piman
ได้แล้วครับผม
ขอบคุณมากครับ