Merging Similar Rows

[MISSUCF]

Hey There!<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
I’m new to the forum and am having a tough time.. I’m pretty proficient in Access, but Excel is a little foreign to me. I have a table that contains simliar (but not duplicate) rows. Is there a filter or macro that would simplify this issue?
IE:
ColA ColB ColC
One xxx xxx
One xxx yyy
Two xxx xxx
Two xxx yyy

and I want it to look like this:
ColA ColB ColC
One xxx xxx
____xxx yyy
Two xxx xxx
____xxx yyy
Thank you for your time and dilligence!!

 

[Progrower]

This is a WYRWYG (What You Request is What You Get)

Sub OneTwo()
With Sheets("Sheet1")
 If .Range("A1").Value = .Range("A2").Value Then
    If .Range("B1").Value = .Range("B2").Value Then
        If .Range("C1").Value = .Range("C2").Value Then
        .Range("A2").ClearContents
End If
End If
End If
 If .Range("A3").Value = .Range("A4").Value Then
    If .Range("B3").Value = .Range("B4").Value Then
        If .Range("C3").Value = .Range("C4").Value Then
        .Range("A4").ClearContents
End If
End If
End If
End With
End Sub

If there's other data then the code will have to be tweaked

 

[Progrower]

If your data goes farther down like to 100 from what I first posted, try this on a copy of your WorkBook

Sub OneTwo()
Dim i As Long
For i = 1 To 100
With Sheets("Sheet1")
 If .Range("A" & i).Value = .Range("A" & i + 1).Value Then
    If .Range("B" & i).Value = .Range("B" & i + 1).Value Then
        If .Range("C" & i).Value = .Range("C" & i + 1).Value Then
        .Range("A" & i - 1).ClearContents
        .Range("A" & i + 1).ClearContents

         End If
     End If
 End If
 End With
 Next i

End Sub

 

[Progrower]

oops!
Instead

Sub OneTwo()
Dim i As Long
With Sheets("Sheet1")
For i = 2 To 100
 If .Range("A" & i - 1).Value = .Range("A" & i).Value Then
    If .Range("B" & i - 1).Value = .Range("B" & i).Value Then
        If .Range("C" & i - 1).Value = .Range("C" & i).Value Then
            .Range("A" & i).ClearContents

        End If
    End If
End If
 
 Next i
End With
End Sub