-1

I'm trying to find a macro that will look for specific column(s) in a pretty big Excel file and export/copy them each to a new Microsoft Word file.

For instance, say I want columns H, I, J, and O from an Excel file, each with their own Microsoft Word document (hopefully with the document named as the first cell data of each column).

I usually work with Microsoft Word macros, but Excel seems a bit more tricky.

4

1 に答える 1

2

マクロを作成する場合は、 Reference を使用する必要がありますMicrosoft Word x.x Object Library。次に、そのWord.Application型を使用して Word を制御できます。

たとえば、これは Word のインスタンスを開いたり閉じたりします。

Dim w As Word.Application
Set w = CreateObject("Word.Application")
w.Visible = True ' if you want the user to see the window
w.Quit

必要な列のセルからデータにアクセスするには、テーブルを使用する必要がありWorksheet.Cellsます。たとえば、H 列 (H は 8 列目) を読み取るには、次のようにします。

Dim i As Integer
Dim s As String
i = 1

Do
    s = ActiveSheet.Cells(i, 8)
    If s = "" Then Exit Do
    MsgBox s
    i = i + 1
Loop

ここから始められると思います。

于 2012-04-26T10:13:39.420 に答える