Page 1 of 1
สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Sun Sep 20, 2015 2:00 pm
by euang
คือตอนนี้ทำงานสร้างบิลส่งของ ในนั้นมีการทำเป็นตาราง โดยมีช่องรายการสินค้า รหัสสินค้า ช่วงด้านบนก็เป็นพวกที่อยู่บริษัท ปัญหาคือตอนนี้ต้องการสร้างปุ่ม โดยจะตั้งชื่อว่าclear เพื่อเมื่อกดปุ่มที่สร้างนี้เเล้ว มันจะลบข้อมูลที่เราได้คลิกเลือกไว้ให้เป็นช่องสีขาวๆเปล่าๆแต่ยังเหลือDrop Down Listให้เราเลือกอยู่(คือในตารางจะมีคอลัมน์ รหัสสินค้า รายการสินค้า หน่วย จำนวน ในคอลลัมน์ รายการสินค้า และรหัสสินค้า แต่ละอันก็จะมีเซลล์เป็นช่องๆอยู่ซึ่งแต่ละช่องดิฉันได้ทำDrop Down Listไว้ เพื่อเวลาทำงานก็จะได้กดเลือกชื่อสินค้าที่ต้องการ รหัสสินค้า ที่ต้องการลงไปมันก็จะโชว์ขึ้นมา) มีคนเคยแนะนำว่าให้ใช้เครื่องมือ clear ที่อยู่ในแทบเครื่องมือ แต่พอดิฉันใช้อันนั้นลบ มันลบไปหมดเลย Drop Down Listไว้ก็หายไป ต้องการสร้างปุ่มลบข้างๆตารางโดยตั้งชื่อclear เมื่อกดมันจะลบข้อมูลในตารางแบบฟอร์มให้เป็นสีขาวเปล่าๆ แต่ยังเหลือDrop Down Listให้เลือกสินค้าใหม่เหมือนเดิมยังไง ใครพอทราบวิธีแก้ปัญหาชวยแนะนำหน่อย ต้องให้สูตรหรือโค้ดอะไร ขอบคุณค่ะ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Sun Sep 20, 2015 2:45 pm
by snasui

เท่าที่อ่านดูจะเป็นการใช้ Code ในการลบเฉพาะ Contents ครับ
การถามปัญหาที่เป็น Code ต้องทำตามกฎข้อ 5 ด้านบน คำแนะนำเบื้องต้นคือให้บันทึก Macro แล้วนำ Code มาปรับใช้ ถ้าหากยังไม่ทราบว่าบันทึก Macro ทำอย่างไรก็ต้องศึกษามาก่อนตามลำดับครับ ดู Link นี้เป็นแนวทางครับ
https://support.office.com/th-th/articl ... a70e64937b
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Sun Sep 20, 2015 9:13 pm
by euang
แนบไฟล์มาให้ค่ะ มีโค้ดอยู่ข้างในไฟล์ค่ะ ขอบคุณค่ะ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Sun Sep 20, 2015 9:22 pm
by snasui

ช่วยอธิบายมาว่าต้องการ Clear เซลล์ใดบ้างอย่างละเอียดครับ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 7:21 am
by euang
อันนี้ไฟล์ใหม่ ข้างในแก้แล้วค่ะว่าจะclearเซลล์ใดบ้าง
B7 กับ B10 ดิฉันใช้สูตร VLOOKUP
A18 ถึง E25 ดิฉันใช้สูตร VLOOKUP ซึ่งมีการเชื่่อมโยงกับตารางข้อมูลด้านล่างของแบบฟอร์ม
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 1:08 pm
by snasui

ตัวอย่าง Code ครับ
Code: Select all
Sub test()
Sheets("แบบฟอร์ม").Range("b7").MergeArea.ClearContents
Sheets("แบบฟอร์ม").Range("a18:a25").ClearContents
End Sub
ส่วนที่เป็นสูตรไม่ต้อง Clear เพราะต้องใช้ต่อ หากไม่ต้องการให้แสดง Error สามารถปรับสูตรได้ ยกตัวอย่างเช่นด้านล่างครับ
=If(Isna(VLOOKUP(B7,I44:J66,2,0)),"",VLOOKUP(B7,I44:J66,2,0))
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 7:52 pm
by euang
ลองแก้ไขเเล้วนะค่ะ แต่อยากสอบถามว่า เรากดปุ่มclear ที่สร้างขึ้น มันจะมีบางช่องที่ขึ้น #N/A เราจะไม่ให้ช่องพวกนั้นขึ้นคำนี้ ให้เป็นช่องขาวๆได้หรือไม่ค่ะ หรือว่ามันสุดได้แค่นี้ (ใช่ในแบบความคิดของดิฉันหรือไม่ ว่าค่า #N/A นี่คือค่าว่างของมันเเล้ว)
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 8:02 pm
by snasui

ให้ลองนำสูตรที่ผมตอบไปด้านบนไปใช้แล้วสังเกตดูผลครับ
ลองแล้วติดขัดตรงไหนให้แนบไฟล์ที่ได้ลองเองแล้วมาด้วยจะได้ช่วยดูต่อไปจากนั้นครับ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 9:13 pm
by euang
ไฟล์นี้ที่ดิฉันนำโค้ดไปใช้แล้ว แต่เมื่อกดปุ่มclearที่สร้าง บางช่องแสดงผลเป็น #N/A ดิฉันต้องการให้เป็นแค่ช่องสีขาวเปล่าๆไม่ต้องขึ้นคำว่า #N/A ได้หรือไม่คะ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 9:17 pm
by snasui
snasui wrote:ส่วนที่เป็นสูตรไม่ต้อง Clear เพราะต้องใช้ต่อ หากไม่ต้องการให้แสดง Error สามารถปรับสูตรได้ ยกตัวอย่างเช่นด้านล่างครับ
=If(Isna(VLOOKUP(B7,I44:J66,2,0)),"",VLOOKUP(B7,I44:J66,2,0))

คุณได้อ่านประโยคด้านบนนี้แล้วหรือไม่ อ่านแล้วเข้าใจว่าอย่างไร ที่ถามเพราะไม่เห็นทำตามที่ผมแจ้งไปครับ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 9:36 pm
by euang
ใช่แบบนี้หรือเปล่าคะ คือไม่รู้จะใส่ไว้ตรงส่วนใด
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 9:53 pm
by snasui

ค่อย ๆ ถามตอบกันไปจนกว่าจะได้คำตอบนะครับ
Vlookup ที่เขียนไว้นั้นอยู่ที่ไหนบ้าง อยู่ในหน้าต่างตามภาพที่แนบมาหรือไม่ ถ้าไม่ก็ไม่ใช่ที่นั่นแน่ๆ เลิกสนใจหน้าต่างนั้นไปก่อนแล้วกลับไปดูในเซลล์
ที่ผมเขียนไปนั้นคือสูตร ไม่ใช่ Code และสูตรที่ผมเขียนไปนั้นต้องคีย์ลงไปในเซลล์ ส่วนจะเป็นเซลล์ใดคิดว่าไม่น่าจะหายากครับ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Mon Sep 21, 2015 9:58 pm
by euang
ขอบคุณค่ะ ขณะนี้ดิฉันกำลังแก้ที่ละเซลล์ที่มี Vlookup อยู่ค่ะ
Re: สร้างปุ่มลบข้อมูลแต่ยังเหลือDrop Down List
Posted: Wed Sep 23, 2015 8:09 pm
by euang
ทำสำเร็จแล้วค่ะ

ขอบคุณมากๆนะคะ ขอบคุณจริงๆจากใจเลย ถ้าไม่ได้ คุณsnasui ช่วยก็ยังทำไม่ได้จนถึงทุกวันนี้ ขอบคุณมากๆนะคะ
