Page 1 of 1
สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 12:20 am
by pimwalan
ป้อนข้อมูลให้กับเซลล์ต่างๆ แล้วพอต้องการคลิกปุ่ม Clear เพื่อให้เคลียร์ข้อมูลในเซลล์ ถ้าเป็นเซลล์เดียวจะได้ แต่ถ้าผสาน2 เซลล์เป็นเซลล์และอ้างอิงเซลล์ที่ผสาน จะเจอ debug ดังรูปที่คำสั่งดังรูป
ควรแก้ไขอย่างไรคะ
Code: Select all
Sub cleardata()
Sheets("sheet2").Range("b12,d4,g4,i4,k4,m4,d7,g7,i7,k7,m7,p5").ClearContents
End Sub
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 8:29 am
by joo
ช่วยแนบไฟล์ตัวอย่างมาด้วยครับ เพื่อนสมาชิกจะได้ช่วยกันทดสอบได้
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 4:54 pm
by pimwalan
ช่วยบอกวิธีแก้ไขด้วยนะคะ ส่งไฟล์ไปให้ดูแล้วคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:00 pm
by bank9597
pimwalan wrote:ช่วยบอกวิธีแก้ไขด้วยนะคะ ส่งไฟล์ไปให้ดูแล้วคะ
ลองแทนโค๊ดนี้เข้าไปครับ
Code: Select all
Sub cleardata()
Sheets("sheet1").Range("b12:c13,d4,g4,i4,k4,m4,d7,g7,i7,k7,m7").ClearContents
Sheets("sheet2").Range("d4,g4,i4,k4,m4,d7,g7,i7,k7,m7").ClearContents
Worksheets("sheet1").Select
End Sub
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:00 pm
by pimwalan
คุณ bank9597 และูผู้รู้ช่วยดูโค้ดให้ด้วยนะคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:06 pm
by pimwalan
คุณแบงค์ ค่ะ เจอปัญหาโค้ดเดิม พอดีจะล๊อกเซลล์ทั้งหมด ให้เหลือแค่เวลานับถอยหลัง และก็เซลล์ที่ต้องการป้อนข้อความ แต่พอกดปุ่มเคลียร์ก็เจอ Error ดังรูปคะ พอมีวิธีแก้ไขใหมคะ
ช่วยบอกวิธีแก้ไขด้วยคะ ขอบคุณคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:13 pm
by joo
ลองปรับโค๊ดที่ปุ่มเคลียร์แบบนี้ดูครับ
Code: Select all
Sub cleardata()
Sheets("Sheet1").Unprotect
Sheets("sheet1").Range("b12:c13,d4,g4,i4,k4,m4,d7,g7,i7,k7,m7").ClearContents
Sheets("sheet2").Range("d4,g4,i4,k4,m4,d7,g7,i7,k7,m7").ClearContents
Worksheets("sheet1").Select
Sheets("Sheet1").Protect
End Sub
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:40 pm
by pimwalan
ขอบคุณคะแล้วแก้ไขได้แล้วคะ แต่..
อีกข้อคำถามนะคะ คุณแบงค์และผู้รู้ ไฟล์ที่ส่งไปใหม่คะ
ดิฉันต้องการให้เซลล์ที่ D4 และ D7 ชีทที่ 2 อ้างอิงเซลล์ ที่ D4 และ D7 ของชีทที่ 1 เสมอ(สีเหลือง) หลังจากที่กดปุ่มเคลียร์แล้ว
มันก็ยังสามารถป้อนชื่ออ้างอิงกันได้ ช่นเราเล่นเกม เราก็ป้อนชื่อผู้เล่น แต่เวลาที่เราเคลียร์เพื่อจะเล่นเกมใหม่ มันก็ยังจำค่าที่อ้างอิง
โดยไม่เคลียร์หมด แล้วเวลาเราป้อนชื่อก็สามารถอ้างอิงได้ชีทที่ 1 เซลล์ที่ d4 d7 ได้เสมอคะ
ส่วนตำแหน่งเซลล์ที่ G4 G7 I4 I7 ของชีทที่ 1 และ 2 เวลากดปุ่มเคลียร์ให้ไม่ให้จำค่าของมัน เคลียร์ข้อมูลหมดเลยคะ(สีฟ้า)
ช่วยบอกวิธีการแก้ไขด้วยนะคะ ขอบคุณคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 5:52 pm
by pimwalan
ช่วยบอกวิธีการ ด้วยนะคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:02 pm
by pimwalan
คุณ joo และคุณ bank ค่ะ ดิฉันลองเขียนโค้ดแบบนี้ แต่ก็ติด Error อีกค่ะ เพราะดิฉันต้องการมันอ้างอิงถึงชีท 1 เสมอ เวลาป้อนค่า
แก้ไขอย่างไรดีคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:03 pm
by bank9597
ยังไม่เข้าใจครับ โจทย์ยังสับสนครับ
หากจะแค่อ้างอิงเฉยตามที่ถามมา ที่ Sheet2 เซลล์ D4 คีย์ =Sheet1!D4 จะเป็นการอ้างอิงมา แต่หากข้อมูลใน Sheet1!D4 ถูกเคลียร์ออกไป ค่าใน Sheet2 เซลล์ D4 ก็จะหายไปด้วยครับ
หากจะให้มีการจดจำค่า จำเป็นต้องมีการบันทึกข้อมูลเก็บไว้ เช่น ผ่านด่านที่ 1 ไปด่านที่ 2 ค่าของด่านที่ 1 ที่เคยใส่ไว้คืออะไร อย่างนี้เป็นต้น
เมื่อเปลี่ยนคนเล่น ค่าก็จะถูกล้างไปทั้งหมด
อย่างไรก็ตามหากจะทำเช่นนั้น ก็ต้องเขียนโค๊ดมาเองก่อนเสมอครับ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:09 pm
by bank9597
pimwalan wrote:คุณ joo และคุณ bank ค่ะ ดิฉันลองเขียนโค้ดแบบนี้ แต่ก็ติด Error อีกค่ะ เพราะดิฉันต้องการมันอ้างอิงถึงชีท 1 เสมอ เวลาป้อนค่า
แก้ไขอย่างไรดีคะ
pimwalan wrote:ช่วยบอกวิธีการ ด้วยนะคะ
เมื่อถามแล้ว ควรรอคำตอบจากผู้ตอบก่อน ไม่ถามเรื่อยเปื่อยจนหาข้อผิดพลาดไม่เจอ ผู้ตอบทุกท่านที่เข้ามาดู เขาพยายาช่วยอยู่แล้วครับ แต่ผู้ถามต้องรอ ไม่ว่างานจะด่วนแค่ไหนก็ตามก็มีค่าเท่ากันครับ
หากจะคุยก็สามารถไปคุยได้ที่ Talk ครับ สามารถคุยได้เรื่อยๆทุกเรื่องราวครับ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:17 pm
by pimwalan
คืออย่างนี้คะ เมื่อเราป้อนชื่อผู้เล่น แล้วมันก็อ้างอิงไปยังเซลล์ต่างๆ ของชีทที่ระบุอัตโนมัติอยู่แล้ว นี่ไม่มีปัญหาเลยคะ
แต่พอแบบว่า เราอยากจะสร้างปุ่มหนึ่งปุ่มที่สามารถเคลียร์ข้อมูลเซลล์ต่างๆ ยกเว้นการระบุชื่อผู้เล่นให้อ้างอิงกันเสมอ โดยไม่ต้องกรอกสูตรทุกครั้งเวลาอ้างอิง
ต้องการเคลียร์คนเล่นคนเก่าออก แล้วก็ป้อนผู้เล่นใหม่ นี่ละคะ ทำอย่างไรที่ ค่าของชีท 2 จะจำค่าของผู้เล่นคนใหม่
หรือเราต้องไปกรอกการอ้างอิงเซลล์ชื่อผู้เล่นทุกครั้งคะทุกครั้งคะ
เพราะ ดิฉันเห็นว่าเวลาเล่นเกมใหม่ ก็ต้องกรอกชือ่ผู้เล่นคนใหม่ แล้วก็สามารถอ้ัางอิงชึทต่อไปได้ แต่โจทย์นี้อยากให้ผู้รู้ช่วยดิฉันด้วยคะ
เอาอ้างอิงเฉพาะไฟล์ที่ส่งไปก็ได้คะ
ขอบคุณคะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:24 pm
by bank9597
คืออย่างนี้ครับ คุณ pimwalan ควรบอกวิธีการเล่น ส่วนที่ติดปัญหามาด้วย ระบุเจาะจงไปที่ชีทใด เซลล์ใด
ผมอ่านโจทย์แล้ว ยังไม่รู้เลยครับว่าต้องกรอกอะไร ส่วนไหน เพราะไม่มีอธิบายวิธีการไว้เลย
โจทย์คำถามแรกที่คุณ pimwalan ถามมาเป็นตัวอย่างที่ดี คือระบุเป้าหมายชัดเจน แต่คำถามหลังๆมานี้ ผมยังอ่านแล้วสับสนครับ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:35 pm
by pimwalan
ขอขอบคุณทุกๆ คำแนะนำ ตอนนี้ถึงบางอ้อแล้วคะ
ดิฉันได้ทำการล๊อกเซลล์ที่ต้องการอ้างอิงในชีทที่กรอกข้อมูลผู้เล่น คะ พอดีเวลามันล๊อกเซลล์ มันก็จะจำผู้เล่นคนใหม่ได้ ดังโปรแกรมคะ
ขออภัยที่ถามคำถามวกวน สับสน ด้วยนะคะ แต่ก็ขอขอบคุณผู้รู้ทุกคนค่ะ
Re: สอบถามผสานเซลล์แล้วเคลียร์ข้อมูลใน Cell ไม่ได้ค่ะ
Posted: Tue Jan 22, 2013 6:43 pm
by bank9597
