excel - Pastespecial is not working although paste does -
activesheet.pastespecial not working should be. activesheet.paste gives me result need formatting.
sub show() dim rng range set rng = activeworkbook.worksheets("dashboard").range("a1:f30") rng.select rng.copy activeworkbook.close thisworkbook.worksheets.add(after:=worksheets(worksheets.count)).name = "dashboard" & newfile activesheet .range("a1").activate .range("a1").select .pastespecial paste:=xlpasteall **<-------** end end sub
i think need specify paste.
with activesheet .range("a1").pastespecial paste:=xlpasteall **<-------** end
Comments
Post a Comment