当前位置: 代码迷 >> VBA >> VBA怎么将两个EXCEL工作表合并到当前工作簿中
  详细解决方案

VBA怎么将两个EXCEL工作表合并到当前工作簿中

热度:1971   发布时间:2013-02-26 00:00:00.0
VBA如何将两个EXCEL工作表合并到当前工作簿中
d:\My Documents\1.dbf和
d:\My Documents\2.dbf  这两个文件用excel可以直接打开,我想写段VBA程序,将这两个工作表复制到当前工作簿中,
分别为WorkSheets(2)和WorkSheets(3),如何操作?

VBA能自动获得系统“我的文档”所在的目录吗?

------解决方案--------------------------------------------------------
api的方法可以获得。VBA里可以调用一段脚本获得。


Sub GetMyDocumentsPath()

    dim Path as String

    Set Fso = CreateObject("Scripting.FileSystemObject")
    Set Ws = CreateObject("WScript.Shell")
    Path = Ws.SpecialFolders("MyDocuments")

    Debug.Print Path

End Sub


  相关解决方案