ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย ระบุ Version ของ Excel
คำแสดงเจตนา
ขอผลแห่งการให้ความรู้นี้ จงกลับไปยังผู้ที่เป็นเจ้าของเดิม แม้ข้าพเจ้าจะไม่รู้จักท่านก็ตาม ขอให้แสงแห่งปัญญาที่ท่านเคยจุดไว้ ได้กลับไปเติมเต็มชีวิตของท่านอีกครั้ง และขอให้เจตนาของข้าพเจ้าเป็นการคืนความดีอย่างสงบ
ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง) กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#1
Post
by Ponpimon Wed Mar 11, 2015 12:37 am
***เมื่อกดปุ่มเก็บข้อมูล ข้อมูลที่อยู่ในหน้า "ข้อมูล" จะถูกนำไปเก็บไว้ที่หน้า "ผลลัพธ์" และข้อมูลที่อยู่ในหน้า "ข้อมูล" ก็จะถูกลบออก
You do not have the required permissions to view the files attached to this post.
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#3
Post
by Ponpimon Wed Mar 11, 2015 10:51 am
ข้อมูลที่ต้องการจะดึงของหนูมันเป็นชุดๆค่ะ แบบว่าแต่ละชุดก็มีปริมาณไม่เท่ากัน จะแก้สูตรตรงไหนค่ะ
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#4
Post
by Ponpimon Wed Mar 11, 2015 2:16 pm
หนูลองทำแล้วค่ะ แต่ตอนนี้ติดบรรทัดนึงค่ะ ลองทำไฟล์อื่นแล้วมันไม่ติดค่ะ แต่พอลองมาทำไฟล์นี้แล้วติดค่ะ ช่วยแก้ให้หน่อยได้มั้ยคะ
You do not have the required permissions to view the files attached to this post.
snasui
Site Admin
Posts: 31175 Joined: Sun Jan 24, 2010 12:33 pmLocation: Songkhla, ThailandExcel Ver: 2010, 2019
Contact:
#5
Post
by snasui Wed Mar 11, 2015 7:48 pm
ติดบรรทัดไหนของ Procedure ใด ให้แจ้งมาด้วยเสมอ จะได้เข้าถึงปัญหาได้โดยไวครับ
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#6
Post
by Ponpimon Wed Mar 11, 2015 8:28 pm
ติดบรรทัด .Resize (Worksheets("นับ").Range("h1"))
snasui
Site Admin
Posts: 31175 Joined: Sun Jan 24, 2010 12:33 pmLocation: Songkhla, ThailandExcel Ver: 2010, 2019
Contact:
#7
Post
by snasui Wed Mar 11, 2015 8:34 pm
ย้าย Comment ไปไว้ที่อื่น อย่านำไปคั่นกลางบรรทัดของ Code ที่มีเครื่องหมาย _ เพราะเป็น Code ที่แสดงถึงความต่อเนื่องกัน
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#8
Post
by Ponpimon Wed Mar 11, 2015 8:41 pm
.Resize (Worksheets("นับ").Range("h1"))
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#9
Post
by Ponpimon Wed Mar 11, 2015 8:46 pm
ได้แล้วค่ะ อาจารย์ ตอนแรกหนูไม่เข้าใจค่ะ ว่า commentของอาจารย์คืออะไร ^^
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#10
Post
by Ponpimon Wed Mar 11, 2015 8:49 pm
อาจารย์คะ แล้วทำไมข้อมูลในหน้ารายชื่อโครงงาน มันไม่ลบออกไปคะ ทั้งๆที่เราก็ใส่ ClearContents แล้วค่ะ
snasui
Site Admin
Posts: 31175 Joined: Sun Jan 24, 2010 12:33 pmLocation: Songkhla, ThailandExcel Ver: 2010, 2019
Contact:
#11
Post
by snasui Wed Mar 11, 2015 9:11 pm
Code ที่ Procedure ใด เขียนไว้อย่างไร ยก Code นั้นมาด้วยครับ
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#12
Post
by Ponpimon Wed Mar 11, 2015 10:15 pm
Sub อันแรก()
snasui
Site Admin
Posts: 31175 Joined: Sun Jan 24, 2010 12:33 pmLocation: Songkhla, ThailandExcel Ver: 2010, 2019
Contact:
#13
Post
by snasui Thu Mar 12, 2015 11:22 am
ผมทดสอบแล้วสามารถลบได้ตามปกติ
การโพสต์ Code ในฟอรัมให้ง่ายต่อการอ่านและนำไปทดสอบดูตาม Link นี้ครับ
viewtopic.php?f=6&t=1187
Ponpimon
Member
Posts: 85 Joined: Fri Jan 16, 2015 12:20 am
#14
Post
by Ponpimon Sat Mar 14, 2015 9:06 pm
โค้ดใช้งานได้แล้วค่ะ ขอโทษด้วยนะคะที่ไม่ได้มารายงานผลค่ะ ขอบคุณค่ะ^^
snasui.com ยินดีต้อนรับ 
สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ 
ระบุ Version ของ Excel 
โปรดทราบ 
คำแสดงเจตนา
