lundi 27 janvier 2020

End If without block If - Excel VBA

Getting "End If without block If" error on the following code and cannot figure this one out...

If ActiveSheet.Name = "Front Wing" Or "Nose" Or "Bargeboard" Or "Sidepod Vane" Or "Fwd Floor" Then _
Set ws = ActiveWorkbook.Worksheets("Front Team Project List")
    With ws
        For Each aCell In .Range(Sheets("VBA_Data").Cells(2, ProjectColumn), Sheets("VBA_Data").Cells(ProjectRangeLastRow, ProjectColumn))
            If aCell.Value <> "" Then
                Me.ComboBoxProjectTitle.AddItem aCell.Value
            End If
        Next
    End With
End If

Any help much appreciated.

Aucun commentaire:

Enregistrer un commentaire