0

私はvbaプロジェクトに取り組んでいます。要件は、複数の単語文書のコンテンツを 1 つの単語文書に結合することです。これは ContentControl タグによって行われます。一意のコンテンツ コントロール タグ ID を持つ 2 つの単語のドキュメントを既に作成しています。次に、コンテンツを 1 つにマージするためのロジックを構築する必要があります。

  Set WordDoc = WordApp.Documents.Open(FileName)

  With WordApp.ActiveDocument
          For i = 1 To .ContentControls.Count
                Select Case .ContentControls(i).Tag
                    Case "cc1": strEnding = "st"  -- word content including format and style
                    Case "cc2": strEnding = "nd"
                    Case "cc3": strEnding = "rd"
                    Case Else: strEnding = "th"
                End Select
          Next
        End With

ここで、すべてのデータ (テーブルがある場合はフォーマットとスタイルも含む) を 1 つのドキュメントにマージしたいと考えています。

どうすればこれを達成できるか教えてください。

4

2 に答える 2

0

一般的には、式の両側に Range.FormattedText を使用して機能するはずです。1 つのドキュメントでターゲット Range を取得し、個々のコンテンツ コントロールの Range の FormattedText をそれに割り当てます。

于 2015-11-20T16:15:06.043 に答える