Sheet Names = to Variables?

[StefanRSA]

Hi Guys,

Trying to make a sheet name equal to a variable in an Worksheet_Selection Change(ByVal Target as Range) Sub...

I have tried to isolate the worksheet which I want to rename (as I dont know if they have numbers like columns references) by checking if the name of the other two worksheets equal the name I want to rename to. Obviously they do not and I was hoping I could then "select" the third worksheet and thus rename it. I have left ??? for the parameters I am missing.

Is this even possible?

If Sheets("Vanco").Name <> Sheets(Name).Name Or Sheets("LOV").Name <> Sheets(Name).Name Then

??? Sheets.Select
ActiveSheet.Name = Name
Sheets("Vanco").Select

Many thanks in advance for your consideration and suggestions.

Stefan

 

[Andrew Poulsom]

Try:

Sub Test()
    Dim Sh As Worksheet
    For Each Sh In ThisWorkbook.Worksheets
        If Sh.Name <> "Vanco" And Sh.Name <> "LOV" Then
            Sh.Name = "TheName"
            Exit For
        End If
    Next Sh
End Sub