VBA regel splitsen

[Roma]

beste allemaal,

Ik heb een vba regel en die wil ik graag over 2 regels hebben
Hoe moet ik dat doen?
Alvast bedankt

If WorksheetFunction.Or(Sh.Name = "NLC 1", Sh.Name = "1", Sh.Name = "NLC 2", Sh.Name = "2", Sh.Name = "NLC 3", Sh.Name = "3", Sh.Name = "NLC 4", Sh.Name = "4") Then

 

[jkpieterse]

Or is in VBA ingebouwd, dus je hoeft WOrksheetfunction niet te gebruiken. Je splitst een regel door te eindigen met spatie gevolgd door underscore gevolgd door enter:

    If Sh.Name = "NLC 1" Or Sh.Name = "1" Or Sh.Name = "NLC 2" Or Sh.Name = "2" Or _
        Sh.Name = "NLC 3" Or Sh.Name = "3" Or Sh.Name = "NLC 4" Or Sh.Name = "4" Then

 

[jkpieterse]

Alternatief:

    Select Case Sh.Name 
    Case "NLC 1", "1", "NLC 2", "2", "NLC 3", "3", "NLC 4", "4"
    Case Else
    End Select

 

[Roma]

Jan Karel,
Bedankt en ik heb weer wat geleerd

 

[snb]

of

if instr("NLC 1234",left(sh.name,4)) then

regel afbreken lijkt me niet nodig