Excelがインストールされていれば参照設定のCOMタブにExcelの名前が出てくると思いますが・・・見つかりませんか?
あと技術的な部分ですが、以下の宣言
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
は参照設定をすることで使用できるようになります。(事前バインディング)
参照設定を行っていなければ、まずこの部分でエラーが発生するのではないかと思われます。
これに対して、
Set xlApp = CreateObject("Excel.Application")
で行っているのは、事前バインディングせず、実行時にExcelオブジェクトを生成するやり方(遅延バインディング)です。
クライアントのExcelバージョンに依存しないようにする目的などで利用され、参照設定も必要ありません。
遅延バインディングで実装する場合、各変数の宣言はobject型で行えばよいです。
ただし、コーディング時にパラメータの候補が表示されないなどのデメリットもあるため、開発時は参照設定できたほうが楽です。
Dim xlApp As Object
Dim xlBook As Object
Dim xlSheet As Object
Set xlApp = CreateObject("Excel.Application")
(追記)
セルの値を参照・編集するためには、対象のブックやシートまで特定してあげる必要があります。
まずは開いたエクセルに対する操作の仕方を勉強しましょう。
⇒参考
事前バインディング
の場合 (参照設定が必要)
Imports Microsoft.Office.Interop.Excel
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'変数宣言
Dim myPath As String = "C:\Users\Ikumi Fukiishi\Desktop\Book1.xlsx"
Dim xlApp As New Application()
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
'ファイルオープン
xlBook = xlApp.Workbooks.Open(myPath)
xlSheet = xlBook.Worksheets(1)
xlApp.Visible = True
'Excel操作
xlSheet.Cells(1, 1).value = RichTextBox1.Text
xlSheet.Cells(1, 2).value = Label1.Text
'上書保存
xlBook.Save()
'Excelを閉じる
xlApp.Workbooks.Close()
xlApp.Quit()
End Sub
End Class
遅延バインディング
の場合
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'変数宣言
Dim myPath As String = "C:\Users\Ikumi Fukiishi\Desktop\Book1.xlsx"
Dim xlApp As Object
Dim xlBook As Object
Dim xlSheet As Object
'Excelオブジェクト作成
xlApp = CreateObject("Excel.Application")
'ファイルオープン
xlBook = xlApp.Workbooks.Open(myPath)
xlSheet = xlBook.Worksheets(1)
xlApp.Visible = True
'Excel操作
xlSheet.Cells(1, 1).value = RichTextBox1.Text
xlSheet.Cells(1, 2).value = Label1.Text
'上書保存
xlBook.Save()
'Excelを閉じる
xlApp.Workbooks.Close()
xlApp.Quit()
End Sub
End Class
なお、ご覧になってわかるとおり、違いは変数宣言とExcelオブジェクトの作成までで、あとは共通の記述です。
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2016/01/21 04:29 編集
2016/01/21 04:37
2016/01/21 04:40
2016/01/21 04:58
2016/01/21 05:45 編集
2016/01/21 06:00
2016/01/21 07:02
2016/01/21 07:32
2016/01/21 08:07
2016/01/21 08:11
2016/01/21 08:22
2016/01/21 08:31
2016/01/21 09:02
2016/01/21 09:48
2016/01/21 10:08
2016/01/22 00:30
2016/01/22 01:27
2016/01/22 01:34 編集
2016/01/22 01:44
2016/01/22 02:10 編集
2016/01/22 02:10
2016/01/22 02:33
2016/01/22 04:05
2016/01/22 07:01
2016/01/22 07:55
2016/01/22 08:32
2016/01/25 00:36
2016/01/25 00:58 編集