摘要: Sub 另存为PDF() s = ActiveDocument.Name i = InStrRev(s, ".") - 1 ActiveDocument.SaveAs2 filename:=ActiveDocument.Path & "\" & Left(s, i) & ".PDF", FileFo 阅读全文
posted @ 2023-01-27 22:12 沭水之虾 阅读(438) 评论(0) 推荐(0) 编辑