Word
Mail merge met barcodes

Barcodes gebruiken in mailmerge in Word

Word 365, 2024, 2021, 2019, 2016, 2013, 2010, 2007, 2003

Open een bestaand samenvoegdocument of maak een nieuw document.

Voeg het barcodeobject toe aan je samenvoegdocument. Plaats het op de gewenste plaats in het document en stel de eigenschappen van het object in, zoals het type en de grootte van de streepjescode.

Dit ziet er bijvoorbeeld uit als de volgende schermafbeelding. Let op de naam van het barcodeobject - hier geel gemarkeerd. Meestal is dit Barcode1.

Een macro is vereist voor de samenvoeging. Je kunt de volgende macro toevoegen. Kopieer het naar het Klembord en plak het van daaruit in de Visual Basic for Applications editor van Word:

Sub MailMerge_example_with_ActiveBarcode()
 ' Macro shows how to print barcodes in a mail merge.
 if MsgBox("Do you want to print mail merged documents?", vbYesNo, "Question") = vbYes Then
   'counter to zero
   num = 0
   'first record is number one
   ActiveDocument.MailMerge.DataSource.ActiveRecord = 1
   Do
    ' Fill ActiveBarcode text property now
    ActiveDocument.Barcode1.Text = ActiveDocument.MailMerge.DataSource.DataFields("Productcode").Value
    ' do not prompt for printing...
    Options.PrintBackground = True
    ' print page
    ActiveDocument.PrintOut
    ' recognize old record
    lastone = ActiveDocument.MailMerge.DataSource.ActiveRecord
    ' select next record
    ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord
    'count
    num = num + 1
    ' check if there are new ones
   Loop While ActiveDocument.MailMerge.DataSource.ActiveRecord <> lastone
   ' notify user
   MsgBox (Str(num) + " pages printed!")
 End If
 End Sub

Het resultaat ziet er als volgt uit. In de schermafbeelding kun je ook zien waar de macro is ingevoegd.

Pas nu de macro aan je samenvoegingsbericht aan:

Als de naam van je barcodeobject niet Barcode1 is, wijzig je deze in de macro - gele markering links in de schermafbeelding.

Nu wijzigt u de veldnaam van uw gegevensbron die moet worden gebruikt voor de streepjescode. In dit voorbeeld wordt Productcode gebruikt - rechter gele markering in de schermafbeelding. Wijzig de naam binnen de aanhalingstekens.

Sla het document op en start de macro voor een testafdruk.

Tip: Begin de testafdruk met een kleine hoeveelheid gegevens zodat er minder misdrukken zijn in geval van een fout.

Gedaan.

Als je de macro in Normal.dot hebt geplaatst in plaats van in het document zelf, mag het document niet in de ontwerpmodus staan wanneer je de macro uitvoert. Als je dat wel doet, krijg je een foutmelding. Schakel daarom de ontwerpmodus uit voordat je de macro uitvoert.