如何取得EXCEL（1，1）里的值??

[wxbps]

如何取得EXCEL（1，1）里的值??

[wxbps]

用 .Range(1,1).value = i
这样不可以！

[水如烟]

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim mExcelApplication As Object
Dim mWorkbook As Object
Dim mWorkSheet As Object

mExcelApplication = CreateObject("Excel.Application")
mExcelApplication.Visible = True
mWorkbook = mExcelApplication.Workbooks.Add()
mWorkSheet = mWorkbook.Sheets.Add
mWorkSheet.Cells(1, 1).Value = "It is me"
Dim mValue As Object
mValue = mWorkSheet.Cells(1, 1).Value
Console.WriteLine(mValue)

End Sub

[wxbps]

不行!mExcelApplication.Quit 还是出错!

我用了这段,退出程序以后直接销毁EXCEL的进程,然后关闭程序

Dim pList() As Process
Dim processName As String = "excel"
pList = Process.GetProcessesByName(processName)
For Each proc As System.Diagnostics.Process In pList
proc.Kill()
Next proc
Application.Exit()

[水如烟]

那也太霸道了,凡是打开的都杀了.

只删自己的:
MSOffice小知识:基本框架
http://www.cnblogs.com/LzmTW/archive/2006/05/26/410233.html

[水如烟]

mExcelApplication.Quit

你可以参考Excel的宏
或者在项目中直接引用Excel Object Libary

还可以参考一下我这篇:

MSOffice小知识:基本框架
http://www.cnblogs.com/LzmTW/archive/2006/05/26/410233.html

[wxbps]

水大大，麻烦你下，近来帮我再写下

关闭这个EXCEL就是这个的CLOSE 和销毁QUIT的代码！谢谢了！