如何用excel宏打开另一个excel文件

如何用excel宏打开另一个excel文件,第1张

Sub test_hello()

MsgBox "hello"

End Sub

这个文件中的模块是被调用的对象。

再建立一个Excel文件,创建下面的宏用来调用上面的对象。

Sub test_calling()

Dim xl_wb As ExcelWorkbook

Dim xl_wb_name As String

With ApplicationFileDialog(msoFileDialogFilePicker)     '使用文件对话框选取要调用宏所在的文件

AllowMultiSelect = False

If Show = -1Then

xl_wb_name =SelectedItems(1)

End If

End With

调用程序:

Sub openfile()

WorkbooksOpen ("被调用文件xls")

Workbooks("被调用文件xls")Sheets("Sheet1")test

End Sub

被调用文件,Sheet1代码:

Public Sub test()

Beep

End Sub。

excel中数字为外部链接的函数一点击就d出文件解决方法如下:

1、当d出数据链接属性窗口时,先关闭掉这一窗口,然后把界面切换到桌面,这样excel程序就是最小化了,然后鼠标右键刷新下桌面(或者按住F5刷新)。刷新几次后再回到excel的界面重新 *** 作一遍数据链接的步骤即可。通过这一方法可以解决大部分d出属性窗口d出的问题。

2、桌面刷新的次数不设限制,可以多刷新几次,若刷新后切换回excel还是不行那么也可以重复几次上面的 *** 作。

对Excel插件的开发,目的是在工具栏中添加一个外部程序,点击这个外部程序,可以将当前的Sheet数据获取到并保存到另外一个sheet里面;主要注意两方面:

一、Excel插件外部程序建立向导,具体步骤是:

>

1、创建连接到excel应用的ole对象

OleObject ole_excel

ole_excel = create OleObject

If ole_excelConnectToNewObject("ExcelApplication") > 0 Then

MessageBox('连接到Excel错误','请确认是否已经安装了Excel!',Exclamation!)

Destroy old_excel

Return

End If

2、打开指定的excle文件

ole_excelApplicationWorkbooksOpen("excel文件")

3、 *** 作excel单元格

excel单元格有一系列的 *** 作,它们的使用格式一般如下:

ole对象ActiveWorkBookSheets("工作表名") *** 作对象动作或属性

SP_CONFIGURE 'SHOW ADVANCED OPTIONS',1

RECONFIGURE

EXEC SP_CONFIGURE 'Ad Hoc Distributed Queries',1

RECONFIGURE

插入的代码:

INSERT INTO dboResources(ResourcesUrl,ResourcesLink,ResourcesText) SELECT FROM OPENROWSET('MicrosoftJetOLEDB40',

'Excel 80;HDR=YES;Database=F:\Book1xls', [sheet1$])

以上就是关于如何用excel宏打开另一个excel文件全部的内容,包括:如何用excel宏打开另一个excel文件、excel中数字为外部链接的函数一点击就d出文件、如何用C#开发Excel扩展插件等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/9590798.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-29
下一篇 2023-04-29

发表评论

登录后才能评论

评论列表(0条)

保存