Another way to copy data to another sheet

Another way to copy data to another sheet

Sub copysheetb()

     Sheets("Billing Letter").Activate
     Range("a1:r51").Copy Destination:=Sheets("sheet3").Range("a1")
          'Sheets("sheet2").Range("b8:v100").Font.Size = 8
    Application.CutCopyMode = False
End Sub