多個(gè)文本框文字批量替換？為中的每個(gè)mshape創(chuàng)建以下宏子以替換單詞文本框內(nèi)容（）dim mshape as shape dim tmpstring as stringActiveDocument.形

多個(gè)文本框文字批量替換？

為中的每個(gè)mshape創(chuàng)建以下宏子以替換單詞文本框內(nèi)容（）dim mshape as shape dim tmpstring as stringActiveDocument.形狀如果M形狀類型=msoTextBox然后tmpString=mShape.TextFrame.TextRange文本范圍.文本mShape.TextFrame.TextRange文本范圍. text=replace（tmpstring，“find content”，“replace content”）end if next end sub用替換內(nèi)容替換搜索內(nèi)容

編輯---搜索*---在搜索框中替換要替換的內(nèi)容，在替換框中輸入要替換的內(nèi)容確認(rèn)。

如果你什么都不懂，請(qǐng)問。

爭(zhēng)取最佳答案。

如何在word中全部替換多個(gè)文本框中指定內(nèi)容？

選擇指定范圍內(nèi)的所有表格，用Ctrl h批量替換

Ctrl選擇要修改的多個(gè)文本框，然后單擊“文本工具”列調(diào)整文本框中的字體大小。