2024年10月23日
VBA批量打印PDF
摘要： Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpszOp As String, _ ByVal lpszFile As Strin 阅读全文
posted @ 2024-10-23 09:29 tec2019 阅读(32) 评论(0) 推荐(0) 编辑
vba批量添加文件夹
摘要： Sub createFolder() Dim wks As Worksheet On Error Resume Next Set wks = ThisWorkbook.Worksheets(1) basepath = ThisWorkbook.Path & "\" Max = wks.Range(" 阅读全文
posted @ 2024-10-23 09:12 tec2019 阅读(8) 评论(0) 推荐(0) 编辑