vb打开excel有几种方法

别梦重5183怎么在vb中打开excel ppt文件 -
贾贸潘17644661859 ______ EXCEL文件:Dim xlApp As Excel.Application Dim xlbook As Excel.Workbook Dim xlsheet As Excel.Worksheet Private Sub Command1_Click() Set xlApp = New Excel.Application xlApp.Visible = True Set xlbook = xlApp.Workbooks.Open(＂d:\hao\...

别梦重5183VB打开不同的EXCEL文件 -
贾贸潘17644661859 ______ Sub sfile() Dim fs, f1, s Dim fd As FileDialog Set fs = CreateObject(＂Scripting.FileSystemObject＂) Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.Show f1 = fd.SelectedItems(1) Workbooks.Open f1 '编写操纵新打开文件的代码,如下...

别梦重5183vb 调用不同excel数据 -
贾贸潘17644661859 ______ 可以用commondialog来实现 Set xlsApp = CreateObject(＂Excel.Application＂) commondialog1.showopen Set xlsworkbook = xlsApp.Workbooks.Open(commondialog1.filename) 不明白请百度HI我

别梦重5183用vb怎么调用在excel中写入的宏? -
贾贸潘17644661859 ______ VB打开Excel:ShellExecute hwnd, ＂open＂, ＂C:\1.xls＂, vbNull, vbNull, 1 在ThisWorkbook下建立Private Sub Workbook_Open()宏命令,则在每次打开这份Excel文档时就会自动运行该宏的代码.

别梦重5183请问如何使用vb调用 excel 文件? -
贾贸潘17644661859 ______ 添加引用 Microsoft Excel 12.0 Object Library (视你的office版本不同有所差异) 然后就可以用这个来编程啦 Dim xlapp As Excel.Application '代表excel程序 Dim wkBook As Excel.Workbook '代表excelworkbook(也就是excel工作簿文件 .xls .xlsx...

别梦重5183vb读取excel中的数据并在窗体上显示 -
贾贸潘17644661859 ______ 参考: Public ExcelTable As Workbook 'excel 工作表对象 Private TextBoxA() As Control '以编辑框为基础动态构造数据网格 Private FormWidth As Integer '窗体宽度 '以下子程序是用来建立数据网格 Sub CreateGrid(No, Data) For i = 1 To CInt(...

别梦重5183在VB 中,怎样以只读方式打开EXCEL文件 -
贾贸潘17644661859 ______ Workbooks.Open Filename:=＂C:\123.xls＂, ReadOnly:=True

别梦重5183VB 读取Excel的内容 -
贾贸潘17644661859 ______ Dim appexcel As Object '定义Excel应用程序对象 Dim wbmybook As Object '定义工作簿对象 Dim wsmysheet As Object '定义工作表对象 Set appexcel = CreateObject(＂excel.application＂) '创建Excel应用程序对象 Set wbmybook = appexcel....

别梦重5183VB读取excel几个单元格的数据? -
贾贸潘17644661859 ______ Dim ExcelApp set ExcelApp = CreateObject(＂Excel.Application＂) dim oBook Set oBook = ExcelApp.WorkBooks.Open(＂d:\book1.xls＂) dim strText As String strText = ＂＂ For i = 2 to 6 strText = strText & oBook.WorkSheets(＂Sheet1＂).Range(＂P＂&cstr(i)).Value & ＂,＂ Next Text1.Text = Mid(strText,1,Len(StrText)-1)

别梦重5183VB可以读取WPS电子表格中的数据吗 -
贾贸潘17644661859 ______ VB6直接读取WPS的电子表格的数据是不行的.但可以读取Excel的表格数据.你只要将WPS的表格存为EXcel表格即可.