Object defined error?

[cheoksoon]

Hi everybody,

Can somebody tell me why Excel is giving me an error message "Application or Object defined error" for this code?

Private Sub CommandButton1_Click()
    Dim a As Integer
    Dim b As Integer
    
    For a = 5 To 1 Step -1
        For b = 1 To 4
            Cells(a, b).Value = Cells(a - 1, b).Value
        Next b
    Next a
        
End Sub

Edit:
SORRY!! Just 2 seconds after posting and I discovered the bug!
Can the moderators please delete this thread?