excel - Excel スプレッドシートからの条件付き Word ドキュメントの自動生成?

Question

Word でスプレッドシート (Excel) からデータを取得し、各セルの値を確認します。その値が特定のものである場合、Word は対応する段落を提示 (印刷、挿入、任意の呼び方) します。

私は何時間もグーグルをしていましたが、役に立ちませんでした。私が知る限り、私が必要としているのは単語の逆向きの条件付き差し込み印刷です。基本的にブール値から段落を生成できるプログラム。

Answer 1

あなたはこのようなものを探しています:

Option Explicit

Sub Test_ExcelCalcFromWord()

Dim oExcel                      As Excel.Application
Dim oBook                       As Excel.Workbook

Dim sString                     As String
Dim oParagraph                  As Word.Paragraph


Set oExcel = CreateObject("Excel.application")
Set oBook = oExcel.Workbooks.Open("U:/Book1.xlsx")
oExcel.Visible = True

sString = oBook.Sheets("Errors").Range("A1")

If sString = "Haha" Then
    Set oParagraph = ThisDocument.Content.Paragraphs.Add
    oParagraph.Range.Text = sString
End If

End Sub

Excel オブジェクトを呼び出す前に、Microsoft Excel Object Library を参照する必要があります。
このコードを必要に応じてさらにカスタマイズできます (段落オブジェクトをさらに作成する、書式を追加するなど)。