vb.net - VB 2010 Expressを使用してテキストファイルからExcelにデータを貼り付けます

Question

これは非常に簡単に聞こえるかもしれませんが、私は vb プログラミングの初心者です。11 行、39 スペースで区切られた 2 列のテキスト ファイルがあります。今、私はこのファイルを読み込んでコピーし、Excel シートに貼り付けようとしています。これが私がこれまでに持っているコードです:

Imports System.IO

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim oExcel As Object
        Dim oBook As Object
        Dim oRow As Int16 = 0

        oExcel = CreateObject("Excel.Application")
        oBook = oExcel.Workbooks.Add

        'Read input .txt file line-by-line, Copy to Clipboard & Paste to Excel

        Using rdr As New System.IO.StreamReader("C:\Temp\ONI.txt")
            Do While rdr.Peek() >= 0
                Dim InputLine As String = rdr.ReadLine
                oRow = oRow + 1
                System.Windows.Forms.Clipboard.SetDataObject (InputLine)
                oBook.Worksheets(1).Range("A" + oRow.ToString).Select()
                oBook.Worksheets(1).Paste()
            Loop
            rdr.Close()
        End Using

        oExcel.Visible = True
        'oExcel.SaveAs("C\Temp\test.xls")
        oBook = Nothing
        oExcel.Quit()
        oExcel = Nothing
    End Sub

End Class

これは、Excel ワークブックが開かれ、データが A1 から A11 に貼り付けられる範囲で機能します。つまり、行は 11 (これで問題ありません) ですが、列は 1 しかありません (列 A と B にある必要があります)。これはとても簡単だと思います。ご指導ください。

また、コードは「名前を付けて保存」行で停止します（コメントしました）。実行するとエラーが表示されるPublic member 'SaveAs' on type 'ApplicationClass' not found.