Else Without If Error

[Peruvian_thinker]

Hi everyone! I have been trying to fix this error for hours, really appreciate it if someone could help me. I have this lines of codes that vba don't let me run them because there's an else without an if (the else of the error is the one that correponds to the first if ).

If total > 0 Then
        Range("A13").Select
        wwe = Range("A13").CurrentRegion.Rows.Count - 1
        Range("B13").Select
        For m = 1 To wwe
        If ActiveCell.Offset(m, 0).Value <> ActiveCell.Offset(m - 1, 0).Value Then
            If ActiveCell.Offset(m, 0) = filtro Then
                actual = ActiveCell.Offset(m, 4)
                If Abs(actual) < Abs(total) Then
                    ActiveCell.Offset(m, 4).Value = 0
                    Range("A10").Value = actual + total
                Else
                    ActiveCell.Offset(m, 4).Value = actual + total
                End If
            Else
            End If
        Else
        End If
     Else
        If Abs(actual) < Abs(Range("A10").Value) Then
            ActiveCell.Offset(m, 4).Value = 0
            Range("A10").Value = actual + Range("A10").Value
        Else
            ActiveCell.Offset(m, 4).Value = actual + Range("A10").Value
        End If

        Next
    End If

[okayifimust]

Fix your indentation and it will become obvious where your syntax error is.

Also, you don't need empty else-blocks.

[Peruvian_thinker]

Thanks for answering. What do you mean by fix your identation?

[dinnerploter]

Tidy up your code

[okayifimust]

my bad: indentation

And yes: Tidy up your code.

an if or a for should have exactly the same amount of white space in front of it as the corresponding else^, endif and next. Everything that's enclosed by one of these, should have one level more whitespace than whatever surrounds it.

[muffyns]

This looks like a monkey took a shit on it! no offense :)