Vb.Net - Copying cells from from one Excel worksheet to another

Dim oExc As Object = Nothing, oWbk As Object = Nothing
Dim oSrcWsh As Object = Nothing, oDstWsh As Object = Nothing

Try
    oExc = CreateObject("Excel.Applictaion")
    oWbk = oExc.Workbooks.Open("FullPathToWorkbook.xls")

    oSrcWsh = oWbk.WorkSheets("Sheet1")
    oDstWsh = oWbk.WorkSheets("Sheet2")

    oSrcWsh.Range("A1:D1").Copy(oDstWsh.Range("A1"))
    oWbk.Save()

Catch ex As Exception
    Console.WriteLine(ex.Message)

Finally
    oSrcWsh = Nothing
    oDstWsh = Nothing
    oWbk.Close(SaveChanges:=False)
    oWbk = Nothing
    oExc.Quit()
    oExc = Nothing
End Try