endeesfritpt

Word
Fusion du courrier avec les codes à barres

Comment ajouter un code-barres à une fusion de courrier existante
Word 365, 2019, 2016, 2013, 2010, 2007, 2003

1

Ouvrez un document de fusion de courrier exisiting ou créez-en un nouveau.

2


Ajoutez l'objet de code à barres à votre document de fusion de courrier. Insérez l'objet de code à barres dans votre document de fusion de courrier. Placez-le où vous le voulez dans le document et définir les propriétés de l'objet, telles que le type de code à barres et la taille.

Cela ressemblera à la capture d'écran suivante, par exemple. Notez le nom de l'objet de code à barres (surligné ici en jaune). Habituellement, ce sera Barcode1.

Barcode, Word

3

Une macro est nécessaire pour la fusion du courrier. Vous pouvez ajouter la macro suivante. Copiez-le au clipboard et collez-le à partir de là dans l'éditeur Visual Basic for Applications de 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


Le résultat ressemble à ceci. Dans la capture d'écran, vous pouvez également voir où la macro est insérée.

Barcode, Word

5

Maintenant, ajustez la macro à votre document de fusion de courrier :

Si le nom de votre objet de code à barres n'est pas Barcode1, modifiez-le dans la macro (marque jaune gauche dans la capture d'écran).

Maintenant, vous modifiez le nom de champ à partir de votre source de données, qui doit être utilisé pour le code à barres. Dans cet exemple, "Productcode" est utilisé (marque jaune droite dans la capture d'écran). Changez le nom dans les guillemets.

Barcode, Word

6

Enregistrez le document et démarrez la macro pour une impression de test.

Conseil : Commencez l'impression de test avec très peu d'ensembles de données, de sorte qu'il n'y ait pas trop de erreurs d'impression en cas d'erreur ou d'erreur.

Barcode, Word

7

fini.

Info Si vous avez placé la macro non pas dans le document lui-même, mais, par exemple, dans Normal. point, le document ne doit pas être en mode de conception lorsque vous exécutez la macro. Cela entraînera une erreur. Par conséquent, éteignez le mode de conception avant d'exécuter la macro.

Si vous avez besoin de soutien ou d'une solution individuelle pour la personnalisation à vos besoins, nous pouvons vous offrir un soutien.

Comme un facile d'accès, nous vous suggérons de télécharger et d'utiliser la démo ci-dessus qui contient déjà tout ce dont vous avez besoin:

  • Mail fusionne Demo
    fermer avec une fermeture
    pour Word 2007-2019 (archives ZIP)
    Un document Word avec un contrôle de code à barres est utilisé pour l'impression en série. Le code-barres est modifié pendant l'impression en série en conséquence.