I need some help again please. Below is a VBA which uses two worksheets and was wondering how I manipulate the code to keep all destinayion formatting.
Thanks in advance.
Garth
Sub UpdateEWRDSDR()
Worksheets("EW-RDS-DR").Select
' CLEAR EXISTING DATA IN EWRDSDR
Range("b6:k1000").ClearContents
' COPY UPDATED DATA IN 320 AND PASTE IN EWRDSDR
Dim rng1 As Range
Dim n As Long
n = Sheet1.Range("A1").Value
Set rng1 = Sheets("EW-RDS-DR").Cells(Rows.Count, 2).End(xlUp).Offset(5, 0)