vb 操作excel， 如何在excel文件中写入值
我想在窗体上有一个按钮，一按这个按钮，“好好学习，天天向上”就到了指定的excel里指定的单元里
谢谢
我要的是代码~~~
最新回答
小晴日记
2024-11-03 03:38:32
Dim xlExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim AppExcel As Object
Dim str As String
str = App.Path & "\11.xls"
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = False '设置excel对象不可见
Dim objWorkBook As Excel.Workbook
objExcel.SheetsInNewWorkbook = 1
Set objWorkBook = objExcel.Workbooks.Add
objExcel.Cells(3,4) = Text1.Text
objWorkBook.SaveAs str
objWorkBook.Close (True)
objExcel.Quit
Set objExcel = Nothing
End Sub
你会腻我何必
2024-11-03 14:18:50
热门标签
