Dim ex As New Microsoft.Office.Interop.Excel.Application Dim sh As Microsoft.Office.Interop.Excel.Worksheet Dim wb As Microsoft.Office.Interop.Excel.Workbook
’ファイルオープン wb = ex.Workbooks.Open(“C:\wk\test1.xlsx”) sh = wb.Sheets(“一覧表”) MsgBox(sh.Range(“A2”).Value) ex.Quit()
はうまきくのですが MsgBox(sh.Range(“A2”).Value)を MsgBox(sh.Range(1,2).Value)にしたら(変数にしたら) エラーになります win10でVB<NET 2013 microsoft EXCEL 12.0 オブジェクトライブラリーです「「