Impression d'une cellule par feuille

Résolu
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   -  
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai besoin d'aide concernant une impression de code barre présents dans une feuille Excel.
En effet, j'ai réalisé 500 codes EAN13 à imprimer.
Ils sont tous dans la même colonne.
Un code barre par cellule.
En fait le but est d'imprimer des codes sur des cartes de fidélité.
Un code au dos de chaque carte.
Comment faire pour obtenir de façon "plus ou moins automatique" une impression d'une cellule au dos de chaque carte de fidélité.
Voici la structure actuelle de mon fichier Excel :
http://cjoint.com/data3/3Hrk7W3KKF7.htm

Merci d'avance pour votre aide,

Bonne journée

4 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

impression d'une cellule colonne G par page:

Sub Bouton1_Cliquer()
With Worksheets("feuil1")
derlig = .Range("G" & Rows.Count).End(xlUp).Row
Set plage = .Range("G1:G" & derlig)
For Each cel In plage
If cel <> "" Then
cel.PrintOut Copies:=1, Collate:=True
End If
Next cel
End With
End Sub
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
Bonjour,
Je te remercie vivement.
Juste une question :
Comment faire pour paramétrer marge et taille du papier et dans quelle cassette de l'imprimante prendre les cartes (ce sont des cartes en papier mat le recto est imprimé par une société d'édition sur internet), il me reste donc à imprimer le verso avec le code barre que j'ai généré.
Merci d'avance,
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
Autre question : Est-ce possible d'imprimer la cellule dans une autre position : exemple retourner le code barre et le mettre en vertical pour imprimer sur la carte de fidélité dans le sens de la hauteur de la carte.
Merci pour ton aide,
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

Vous pouvez parametrer l'imprimante en selectionnant une cellule code a barre et allez dans les parametres de l'imprimante pour reglage papier, marge et selection tiroir. Je n'ai pas votre imprimante, donc je ne peux pas le faire
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
J'ai réussi à faire ce que je souhaitais en utilisant le publipostage.
Merci pour les conseils.
Bonne fin de journée,
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Le plus simple est d'utiliser un publipostage avec Word :
https://www.cjoint.com/?DHrmupNRPkv
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
Bonjour Patrice,
Merci pour ton message : en fait je souhaite imprimer seulement un code barre par feuille (sachant que le format de mes cartes de fidélité est 54*85mm) est ce possible de faire une impression de code barre par document du coup ?
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bien sur, il suffit de changer le format du document, pour l'exemple, j'ai pris un format d'étiquettes mais tous les formats sont possibles.

PS : dans le fichier Excel, j'ai mis un calcul du code EAN sans macro.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour Patrice33740,

Tres bonne idee le publipostage.
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
Bonjour à tous les deux et merci pour l'idée du publipostage.
J'ai réussi en le faisant comme cela par contre j'aimerai que le code barre soit dans l'autre sens. C'est à dire qu'il soit selon le sens de la hauteur.
Je voudrais faire une rotation de celui-ci tel qu'il est sur le document ci-joint : comment m'y prendre ? car je ne vois pas comment le faire sous word ?
https://www.cjoint.com/?3HrsSOKzNJw
Merci d'avance;
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Re,

- Supprimes les retraits de paragraphe
- Changes l'orientation du papier.
- Redéfinis les marges
0
Grenadian Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   2
 
Merci pour l'idée ! j'ai réussi !

Super !!!!

MERCI encore !

Bonne fin de journée
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
De rien, au plaisir de te relire sur le Forum

Cordialement
Patrice
0