VBA Copy a Sheet with formatting -

VBA Copy a Sheet with formatting -

i'm running next code re-create , rename worksheet name isn't changing reason. ideas?

thanks in advance.

sub copy()

sheets("tv indicators").copy after:=sheets(sheets.count) sheets(sheets.count).cells.copy sheets(sheets.count).cells.pastespecial xlpastevalues sheets(sheets.count).name = sheets("tv indicators").range("a3").value

end sub

try this:

sub copier() sheets("tv indicators").copy after:=sheets(sheets.count) activesheet .cells.copy .cells.pastespecial xlpastevalues .name = sheets("tv indicators").range("a3").value end application.cutcopymode = false range("a1").select end sub

is okay?

vba