摘要：
'WORD 加载项 代码模板 Dim cmdBar As CommandBar, cmdBtn As CommandBarControl Const cmdBtnCap As String = "批量提取操作步骤" Sub AutoExec() Call DelCmdBtn Call AddCmdBtn End Sub Sub AutoExit() ... 阅读全文
摘要：
Public Sub ImportPicturesBaseOnExcel() Dim shp As Object Dim xlApp As Object Dim Wb As Object Dim Rng As Object Dim FolderPath As String Dim ImgFolder As String Dim Excel... 阅读全文