Snasui Excel Forum

เพิ่มเติมจากข้างบน กดแก้ไขไม่ได้

หรืออาจจะสมมุติว่าบางทีเอาแค่ผลรวมของวัน บรรทัดต่อไปก็อีกวัน จะต้องแก้ไขส่วนไหน รบกวนด้วยครับ

:D ตัวอย่าง Code ครับ

Dim rAll As Range, rAll1 As Range, r As Range
Dim i As Integer
With Sheets("Value")
Set rAll = .Range("a2", .Range("a" & .Rows.Count).End(xlUp))
For i = rAll.Count To 1 Step -1
If i = 1 Then Exit For
If rAll(i) <> rAll(i - 1) Then
rAll(i).EntireRow.Insert
End If
Next ...

ขอโทษที่อธิบายไม่ชัดเจนครับ

ผลลัพธ์ แบบนี้ครับ

ปล.ลืมบอก vba ครับ ขอบคุณครับ

สอบถามเกี่ยวกับผลรวม ของวันที่เดียวกันหน่อยครับ

ผมเคยลองเอางานเก่ามาปรับใช้ใหม่แล้วมันก็ยังทำไม่ได้รบกวนชี้แนะด้วยครับ ขอบคุณครับ

ผมอยากให้ จำนวน ของวันที่เดียวกันมันรวมกัน ในตำแหน่งที่เรากำหนด โดยข้อมูลที่จะใช้ชี้มันอาจมีมากกว่านั้น

ขอบคุณครับได้แล้วครับ

ขอบคุณครับ

สอบถามวิธี ปรับทศนิยมเป็น 2 ตำแหน่ง

ในราคาเฉลี่ย ผมอยากให้ค่า value มันเป็น ทศนิยม 2 ตำแหน่ง ไม่ใช่ แสดงเป็น 2 ตำแหน่ง แต่คลิกดูค่า มันออกมาเยอะเลยครับ

ถ้าผมจะหาจำนวนราคาจากการเอาเงิน มา หาร กับจำนวน ผมสามารถใช้ offset(0,4)/offset(0,6) ได้เลยตรงเลยไหมครับ

ผลรวมไม่แสดงครับ แล้วผมลองเพิ่มหรือลบจำนวนข้อมูลดู แล้วerror ตอนนี้กำลังศึกษาcodeอยู่ครับ มือใหม่ ขอคำแนะนำด้วยครับ ขอบคุณครับ

คือผมจะหาผลรวมของแต่ละเรท แต่ละช่วง เอามารวมกันเป็นเรทต่อเรท แล้วทีนี้มันมีเยอะครับ

ตั้งแต่ เรท 1-5 6-10 ไปจน 96-100 แล้วผมต้องเขียน if else กับ select case ตลอด ผมเลยอยากรู้มีวิธีเขียนให้สั้นกว่านี้ไหมครับ

มีวิธีไหนที่ดีกว่านี้ไหมครับ ผมรู้สึกว่าถ้าเขียนทั้งหมดมันจะ if else เยอะมากๆ select caseก็จะเยอะมากๆ ผมเลยอยากขอคำแนะนำเกี่ยวกับวิธีที่ง่ายกว่านี้หรือสะดวกกว่านี้หน่อยครับ


แก้ไขเพิ่มเติม ข้อมูลจริงไม่ได้ติดกันแบบนี้นะครับ มันแยกกันมีข้อมูลอื่นคั่นอยู่