Hello folks from Steved

Used below and works a treat
ps Swanson Depot that's what I got

Set wksT = GetWorksheet(wks.Parent, _
"" & Right(cell.Text, 8) & " Depot")

Thankyou.

-----Original Message-----
Hello From Steved

Set wksT = GetWorksheet(wks.Parent, _
"Sheet" & Left(cell.Text, 2))

I've made Changes to the above

Set wksT = GetWorksheet(wks.Parent, _
"" & Left(cell.Text, 8))

It now names the sheet "Papakura" instead of
SheetPapakura.
Please what Do I enter in the above code to add Depot
as an example "Papakura Depot".

Thankyou.



.