Sub test_hello()
MsgBox "hello"
End Sub
这个文件中的模块是被调用的对象。
再建立一个Excel文件,创建下面的宏用来调用上面的对象。
Sub test_calling()
Dim xl_wb As Excel.Workbook
Dim xl_wb_name As String
With Application.FileDialog(msoFileDialogFilePicker) '使用文件对话框选取要调用宏所在的文件
.AllowMultiSelect = False
If .Show = -1Then
xl_wb_name =.SelectedItems(1)
End If
End With
调用程序:
Sub openfile()
Workbooks.Open ("被调用文件.xls")
Workbooks("被调用文件.xls").Sheets("Sheet1").test
End Sub
被调用文件,Sheet1代码:
Public Sub test()
Beep
End Sub。
1、首先,我们打开我们电脑上面的excel
2、然后我们点击开发工具
3、之后我们就可以看到宏了,我们点击录制宏;
4、d出的界面,我们点击确定;
4、然后我们就可以录制宏了,录制完成后,我们点击停止录制就可以了。就可以打开excel未启用宏但包含启用宏的文件了
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)