willsonlincake 发表于 2022-4-10 22:37:46

Word VBA粘贴无格式文本

Sub PasteUnfText()
On Error GoTo err_Handler
Selection.PasteSpecial _
DataType:=wdPasteText, _
Placement:=wdInLine
lbl_Exit:
Exit Sub
err_Handler:
Beep
GoTo lbl_Exit
End Sub
页: [1]
查看完整版本: Word VBA粘贴无格式文本