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
:D ช่วยยกตัวอย่างค่าที่ต้องการจะค้นหา 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
:D ผมลองหาชื่อสมฤทัยก็พบข้อมูลตามปกติครับ

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
:D เพิ่มการเลือกชีต 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
ได้แล้วครับผม

ขอบคุณมากครับ