作者：乔山办公网日期：
返回目录：excel表格制作
Hi，我直接告诉你，同时大家也都能分享到。
ActiveWorkbook.Path就获取到zdA.xls所在路径，不包括文件名本身。
所以，打开B.xls就一句话：
Workbooks.Open ActiveWorkbook.Path & "\B.xls"
用字符串连版接符&将路径与文件名连接为一个完整的路径。
下面是一个用VBA进行文件基本操作的参考：
http://blog.csdn.net/gxiyv/archive/2007/04/28/1588139.aspx
（文件的打开、保存权与关闭）
Sub dk()
Workbooks.Open Filename:="C:\Data\P\运营文件\日常运营\定单记录.xls"
Range("A1").Select
End Sub
能具体点吗？谢谢。我是菜鸟。
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