copy paste - tasmia9/VBA GitHub Wiki

Sheets("Formatted").Select

Range("A1").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToRight)).Select Selection.Copy Sheets("BKRSSTPF").Select Range("A1").Select ActiveSheet.Paste