Snasui Excel Forum

ขอบคุณมากค่ะ

สวัสดีค่ะ หนูพยายามดึงข้อมูลข้ามชีทโดย ขั้นแรก กรอก ID สินค้าที่ต้องการ เข้า textbox1
ขั้นที 2 หนูเชคว่า ID สินค้าใน Textbox 1 ตรงกับ ID สินค้า (คอลัมภ์ที่ 6 ในsheet 1) ไหม
ขั้นที่3 ถ้าตรง เช่น ID สินค้า 053 ให้copy ทั้งแถว หมายถึง A14 : F21 ไปวางใน sheet 2 ในตำแหน่งเดียวกันกับ sheet 1
หนูลองเข ...

ขอบคุณมากๆค่า :) โค้ดใช้ได้แล้วค่ะแต่หนูต้องการให้เวลาเรากดsaveไปแล้วมีหน้าต่างให้เราตั้งชื่อเองแล้วค่อยเซฟเหมือนกับเราไปกด file แล้วsave as ค่ะ หนูเลยลองโค้ดนี้แต่ว่าติดอีกแล้วค่ารบกวนอีกทีนะคะ

[color=#FF0000] Dim file As FleStream
Dim fw As StreamWritter
Dim textDir As Stringir
If ...

ต้องการ กดปุ่ม save ที่สร้างไว้ แล้วสามารถไปเซฟในโฟเดอร์ชื่อ AA ที่ตั้งไว้หน้าเดสทอปค่ะ โดยเซฟแค่ sheet 1ทั้งหน้า
หนูลองเขียนโค้ดมาแล้วไม่ทราบว่าเข้าใจผิดส่วนใดรึเปล่าคะ ลองหลายรอบแล้วไม่ได้เลย รบกวนช่วยแนะนำด้วยนะคะ
มีไฟล์แนบมาด้วยค่ะ test .xlsm

Private Sub CommandButton2_Click()
Workbooks ...

ต้องการ copy ข้อมูลจาก sheet 1 ไปยัง sheet 2 ค่ะ โดยในชีท 2 เราแค่กรอกเลขรหัสสินค้า เช่น 1 อยากให้ช่อง ชื่อสินค้าขึ้นชื่อมาเลยโดยที่เราไม่ต้องพิมอ่ะค่ะ สามารถไปดึงข้อมูลจาก sheet 1 ได้ไหมคะ ( ต้องทำแบบนี้ทุกรหัสค่ะคือกรอกแค่รหัสสินค้าเฉยๆ แล้วอยากให้ชื่อสินค้าขึ้นมาเองเลยโดยไปดึงข้อมูลจากชีท1 ค่ะ ...