【软件】WPS撤销自动编号并保留文本

Sub 撤销自动编号_转为普通文本()    ' 全文档自动编号 → 纯文本（保留数字，不再自动变）    ActiveDocument.Content.ListFormat.ConvertNumbersToText    MsgBox "完成：所有自动编号已转为普通文本，不再自动变号。", vbInformationEnd Sub