Thread: Better way to write this
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Steph[_3_] Steph[_3_] is offline
external usenet poster
  
Posts: 312
Default Better way to write this
without actually having to select a sheet?

Worksheets("HR DB").Range("A5:BJ" & Range("B1499").End(xlUp).Row).Copy
Workbooks.Add
ActiveSheet.Select
Selection.PasteSpecial Paste:=xlPasteValues


Reply With QuoteReply With Quote