I need a macro that will delete every other row in excel. I tried this but no luck. If I just create a macro to delete a row it places a 2 where I have row. I just need to increment the row.

Sub delete()
' delete Macro
'
Dim row, endrow As Integer
row = 2
endrow = 120
'
If row < endrow Then
Rows("row:row").Select
Selection.delete Shift:=xlUp
    row = row + 1

End If

End Sub

Try this
Sub delete()
' delete Macro
'
Dim row, endrow As Integer
row = 2
endrow = 120
'
Do while row < endrow
Rows("row:row").Select
Selection.delete Shift:=xlUp
    row = row + 2

loop

End Sub