используйте vba, чтобы создать word-document label.list и заполнить его - PullRequest
0 голосов
/ 12 мая 2019

Я использую свой лист Excel, чтобы использовать макрос VBA. Макрос создает новый текстовый документ и использует идентификатор почтовой метки. Теперь я хочу заполнить этикетку некоторыми данными из моего листа exel. Я попробовал это с массивом. Моя идея выглядит так: 1. создать объект Word 2. создать mailing.label 3. Загрузите мой VBA-массив Excel в цикле в mailing.label

мой код для создания документа

Sub test()

Dim oDoc As Object
    On Error Resume Next
    Set appwd = GetObject(, "Word.Application")
    If Err Then
        Set appwd = CreateObject("Word.Application")
    End If
    On Error GoTo 0
    With appwd
        If .Documents.Count = 0 Then
            .Documents.Add
        End If
        Set oDoc = .MailingLabel.CreateNewDocumentByID(LabelID:="1359804674")
        .Visible = True
        .Activate
        'Do stuff with oDoc here
    End With

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...