既存のエクセルファイルを操作する
 
 目的

既存のエクセルファイルの特定のワークシートに対して書きこみを行う

 ポイント

特定のワークシートを参照する場合、 Worksheets("シート名") もしくは Worksheets(インデックス番号) と記述することができる。

 
 サンプルコード

Option Explicit

Private Sub cmdGO_Click()

    Dim xl As Object 'Excel.Application
    Dim wb As Object 'Excel.Workbook
    Dim ws As Object 'Excel.Worksheet
    
    ' エクセルオブジェクトの新しいインスタンスを作成
    Set xl = CreateObject("Excel.Application")
    
    ' ファイル名を指定してワークブックを開く
    Set wb = xl.Workbooks.Open("C:\My Documents\Book1.xls")
    
    ' エクセルを表示
    xl.Visible = True
    
    ' シート名を指定してオブジェクトを定義
    Set ws = wb.Worksheets("Sheet1")
    
    ' シート内のセルに文字を書き込む
    ws.Cells(1, 1).Value = "hello"
    
End Sub

ソースのダウンロードはありません。