Word
מיזוג דואר עם ברקודים

 Standard או יותר

השתמש בברקודים במיזוג דואר ב-Word

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

1


ActiveBarcode: השתמש בברקודים במיזוג דואר ב-Word.
פתח מסמך מיזוג דואר קיים או צור מסמך חדש.
2


הוסף את אובייקט הברקוד למסמך המיזוג שלך. מקם אותו במקום הרצוי במסמך והגדר את המאפיינים של האובייקט, כגון סוג הברקוד וגודלו.

זה ייראה כמו צילום המסך הבא, לדוגמה. שימו לב לשם אובייקט הברקוד - המודגש כאן בצהוב. בדרך כלל זה יהיה Barcode1. ActiveBarcode: Barcode, Word


3


נדרש מאקרו לצורך מיזוג הדואר. ניתן להוסיף את המאקרו הבא. העתיקו אותו ללוח והדביקו אותו משם לעורך Visual Basic for Applications של 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

4


התוצאה נראית כך. בצילום המסך ניתן לראות גם היכן הוכנס המאקרו. ActiveBarcode: Barcode, Word


5


כעת התאם את המאקרו למסמך המיזוג הדואר שלך:

אם שם אובייקט הברקוד שלך אינו Barcode1, שנה אותו במאקרו - סימן צהוב משמאל בצילום המסך.

כעת יש לשנות את שם השדה ממקור הנתונים, שישמש עבור הברקוד. בדוגמה זו, נעשה שימוש ב-Productcode - הסימון הצהוב מימין בצילום המסך. יש לשנות את השם בתוך המרכאות. ActiveBarcode: Barcode, Word


6


שמור את המסמך והפעל את המאקרו להדפסת ניסיון.

טיפ: התחל את ההדפסה הניסיונית עם כמות קטנה של נתונים, כך שיהיו פחות טעויות הדפסה במקרה של תקלה. ActiveBarcode: Barcode, Word


7


בוצע.

Info אם שמרת את המאקרו ב-Normal.dot ולא במסמך עצמו, המסמך לא צריך להיות במצב עיצוב כשאתה מפעיל את המאקרו. אם תעשה את זה, תופיע שגיאה. לכן, כבה את מצב העיצוב לפני שתפעיל את המאקרו.