vb.net - vb.netでExcelの設定値セルが機能しないのはなぜですか?

Question

vb.net で Excel 用のサンプル アドインを作成します。

Imports System.Runtime.InteropServices
Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim excelApp As Excel.Application
            excelApp = CType(Marshal.GetActiveObject("Excel.Application"), Excel.Application)
            ' Dim xlwb As Excel.Workbook = Globals.ThisAddIn.Application.Worksheets.Add()
            ' dim sheet As Excel.Worksheet = xlwb.ActiveSheet
            Dim sheet As Excel.Worksheet
            sheet = excelApp.ActiveSheet
            sheet.Range("A1").Value = "OK"

            Me.Close()

        End Sub
    End Class

Excel のセルに値を設定しました : sheet.Range("A1").Value = "OK"が、設定されません。なんで？どのように修正しますか？

Answer 1

ワークシートを変数として宣言するのではなく、名前に基づいて直接ワークシートを呼び出します。例えば、

Sheets("Sheet1").Range("A1").Value = "OK"

このようにして、ワークシートの複数の変数を持つことはありません。

また、これは正しいワークブックをアクティブにする必要があることを意味することも付け加えておきます。

お役に立てれば

グレッグ