Macro which inserts new sheet name

[Bevy]

Hi, I have a macro where I need to paste the content of a copied cell
as the sheets name. Below is example of where I am, but can't find
the syntax to paste the copied value when re-naming the sheet. Any
suggestions would be really appreciated.... thanks Bev


Sub selectandcopy()

Cells.Select
Selection.Copy
Sheets.Add
ActiveSheet.Paste
Range("E2").Select
Application.CutCopyMode = False
Selection.Copy
ActiveSheet.Select
ActiveSheet.Name = *****Paste copied selection from E2 here"
Sheets("Sheet2").Select
End Sub

 

[Bevy]

ActiveSheet.Copy Before:=Sheets(1)
    'the new sheet is now the activesheet
ActiveSheet.Name = Range("E2").Value
Sheets("Sheet2").Activate








- Show quoted text -

MIke - that fantastic thank you - so straight forward really but
couldn't get there. Thanks! Bev