Word
spajanje pošte s crtičnim kodovima

Korištenje crtičnog koda u Wordovoj objedinjenoj pošti

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

Otvorite postojeći dokument spajanja pošte ili stvorite novi.


Dodajte objekt crtičnog koda u dokument spajanja pošte. Postavite ga na mjesto po želji u dokumentu i postavite svojstva objekta, poput vrste i veličine crtičnog koda.

Ovo će, na primjer, izgledati kao sljedeći snimak zaslona. Obratite pažnju na naziv objekta crtičnog koda – ovdje istaknut žutom bojom. Obično je to Barcode1.




Za spajanje pošte potreban je makro. Možete dodati sljedeći makro. Kopirajte ga u međuspremnik i zalijepite ga odatle u uređivač Visual Basic for Applications u Wordu:

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

Rezultat izgleda ovako. Na snimci zaslona također možete vidjeti gdje je makro umetnut.




Sada prilagodite makro dokumentu spajanja pošte:

Ako naziv vašeg objekta barkoda nije Barcode1, promijenite ga u makrou – lijeva žuta oznaka na snimci zaslona.

Sada promijenite naziv polja u vašem izvoru podataka koji će se koristiti za barkod. U ovom primjeru koristi se Productcode – žuta oznaka desno na snimci zaslona. Promijenite naziv unutar navodnika.




Spremite dokument i pokrenite makro za probni ispis.

Savjet: Započnite probni ispis s malom količinom podataka kako bi u slučaju pogreške bilo manje grešaka u ispisu.




Gotovo.

Ako ste smjestili makro u Normal.dot umjesto u sam dokument, dokument ne smije biti u načinu dizajna kada pokrenete makro. To će rezultirati greškom. Stoga isključite način dizajna prije pokretanja makra.