snasui.com ยินดีต้อนรับ
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ ระบุ Version ของ Excel
ฟอรัมถาม-ตอบเกี่ยวกับ Visual Basic
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]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่างเพิ่มเติม)
กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
ณัฐวุฒิ เบ็ญชา
Member
Posts: 32 Joined: Sat Oct 27, 2012 9:04 am
#1
Post
by ณัฐวุฒิ เบ็ญชา » Thu Jan 16, 2014 2:27 pm
รบกวนท่านผู้รู้ทุกท่าน
คือผมเขียนโปรแกรมขึ้นมาตัวหนึ่งซึ่งต้องการแสดงข้อมูลเลขที่เอกสารใน DataGridView แต่ในฐานข้อมูลเลขที่เอกสารที่เก็บ
ไม่ได้เป็น PK ดังนั้นในฐานข้อมูลจะมีเลขที่เอกสารที่ซ้ำกันค่อนข้างเยอะ แต่ในตอนที่จะเอามาแสดงใน DataGridView
อยากให้เลขที่เอกสารที่ซ้ำๆ กันโชว์แค่ 1 รายการ ซึ้งตอนนี้สมมติเลขที่เอกสาร 1234/56789 มีซ้ำกกัน 5 รายการในฐานข้อมูล
ตอนดึงมาโชว์ในDataGridView ก็โชว์ 5 บันทัด ซึ่งเป็นเลขที่เอกสารเดียวกัน รบกวนด้วยครับ
ขอบคุณผู้รู้ล่วงหน้าทุกท่านครับ
snasui
Site Admin
Posts: 30917 Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:
#2
Post
by snasui » Thu Jan 16, 2014 3:55 pm
ณัฐวุฒิ เบ็ญชา
Member
Posts: 32 Joined: Sat Oct 27, 2012 9:04 am
#3
Post
by ณัฐวุฒิ เบ็ญชา » Thu Jan 16, 2014 4:21 pm
OK ได้เรียบร้อยแล้วครับ ผม ขอบคุณอาจารย์มากๆๆๆ ครับผม แต่ปรับแต่งโค้ด นิดหน่อยครับ
Code: Select all
For i = Me.DGV_BRK.RowCount - 1 To 0 Step -1
For j = i - 1 To 0 Step -1
If DGV_BRK.Rows(i).Cells(0).Value = DGV_BRK.Rows(j).Cells(0).Value Then
DGV_BRK.Rows.Remove(DGV_BRK.Rows(i))
i = i - 1
End If
Next
Next
ณัฐวุฒิ เบ็ญชา
Member
Posts: 32 Joined: Sat Oct 27, 2012 9:04 am
#4
Post
by ณัฐวุฒิ เบ็ญชา » Fri Jan 17, 2014 11:24 am
รบกวนท่านผู้รู้ทุกท่าน
ขอรบกวนต่อเนื่องเลยนะครับ คือใน DataGridView มีค่าที่แสดงเป็น 0 ซึ่งใน ฐานข้อมูลก็เป็น 0 แต่ผมไม่ต้องการให้แสดงค่า 0
ต้องการให้เป็นช่อง ว่างๆ เลยอะครับผม
ผมได้เอาโค้ดข้างต้นมาประยุค แต่ก็ยังติด Error อยู่ รบกวนด้วย ครับ
Code: Select all
For i = 0 To Me.DGV_BRK.RowCount - 2
For j = 4 To 6
If DGV_BRK.Rows(i).Cells(j).Value = 0 Then
DGV_BRK.Rows(i).Cells(j).ValueType = GetType(System.String)
DGV_BRK.Rows(i).Cells(j).Value = ""
End If
Next
Next