Impression bouton ligne par ligne

Brudy

XLDnaute Junior
Bonjour à tous !

Bonne année et bonne santé !


J'ai besoin de votre aide pour finaliser un projet, j'ai un tableau avec des données. Elles mêmes sont répartis par semaine de l'année, c'est mon critère de tri.

Cela me permet de sortir la semaine 51 par exemple. Et après, j'aimerais confectionner une macro bouton permettant de déclencher l'impression à la suite des infos triées. (Par OR, recherche dans la base ensuite)

J'ai donc 3 feuilles : La base, le tri et le modèle

Le tri prend dans la base les infos et les envois ligne par ligne dans le modèle pour impression.

C'était l'idée que j'en avais, mais si vous avez mieux aucun problème !

Je me permet de joindre mon fichier,

Il est composé de multiple macro, un bon nombre ont été réalisée ici

Merci d'avance à ceux qui passeront ici :)

Brudy
 

Pièces jointes

  • Test Excel Down .xlsm
    1.7 MB · Affichages: 84

Lone-wolf

XLDnaute Barbatruc
Bonjour Brudy et bonne année à toi aussi. :)

Je ne sais pas si le fichier correspond à ce que tu demande. Efface seulement la colonnes des quantités choisi ce que tu veux puis clique sur imprimer.
 

Pièces jointes

  • Impimer lignes non vides.xlsm
    29.9 KB · Affichages: 38

Brudy

XLDnaute Junior
Merci de ta réponse Lone,

J'ai bien regardé ton fichier mais il me semble mal adapté à ma demande,

Imagine que sur la base de ton fichier tu es en plus, une colonne date et une colonne Numéro de commande.
J'aimerais qu'après avoir sélectionner avec macro les N° de commande d'une semaine en particulier, je puisse lancer une impression Ligne par Ligne.
Ici l'impression est global sur l'ensemble des références contenant une information quantité en C.

Donc : Impression ligne par ligne des informations.

Mais je te remercie de ta contribution ! ça me permet de réfléchir à des idées plus adéquate de mon côté :D
 

Brudy

XLDnaute Junior
Je poste ici la macro que j'imaginais, je l'ai simplement enregistrée via excel

Mais je ne sais pas insérer à ça les conditions de Fin, Si C="" alors stop l'impression et fin de la macro

CSS:
Sub MacroImpr()
'
' MacroImpr Macro
'

'
    Range("C13").Select
    Selection.Copy
    Sheets("Récap OR").Select
    Range("A7").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True
    Sheets("Récap OR ").Select
    Range("C14").Select
    Selection.Copy
    Sheets("Récap OR").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Sheets("Récap OR ").Select
    Range("C15").Select
    Selection.Copy
    Sheets("Récap OR").Select
    Range("A7").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Sheets("Récap OR ").Select
    Range("C16").Select
    Selection.Copy
    Sheets("Récap OR").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub
 

Lone-wolf

XLDnaute Barbatruc
Bonsoir Brudy

Comment veut-tu avoir la feuille exacte imprimée, si les deux feuilles ont le même nom??? :rolleyes:

J'ai modifier le nom de la dernière feuille par Impression OR, j'y travaille dessus.

Encore une chose. Si j'ai bien compris, tu prend la ligne C13 et tu imprime - stop, tu prend la ligne C14 et tu imprime - stop. et ainsi de suite??? Si c'est comme ça, tu crée une liste déroulante pour les numéros OR et tu fait un autofilter critère numéro Or. Et il y a la formule en H8 à corriger, le résultat est erroné, regarde bien.
 
Dernière édition:

Lone-wolf

XLDnaute Barbatruc
Bonjour Brudy, le Forum :)

N'ayant pas eu de nouvelles, j'ai fait à ma façon. J'ai changé les formules de la feuille impression en mettant un nom aux cellules F8 et H8 et j'y ai fait référence dans la feuille Impression OR; supprimer la formule en H8 et mis une macro à la place. La macro pour l'impression est dans le module 3. Regarde si ça joue.
 

Pièces jointes

  • Test Excel Down .xlsm
    1.7 MB · Affichages: 63

Brudy

XLDnaute Junior
Bonjour Lone,

J'ai réétudié mon projet pour établir mon but final, des informations sont venu s'ajouter

Vis à vis de ce que tu me propose il y'a un soucis majeur, les lignes que tu vois peuvent être démultiplier et la sélection ligne par ligne me semble trop contraignante, il faudrait que la macro considère que les données affichées dans le Ré cap OR soit des informations à imprimer, ligne après ligne jusqu’à une ligne blanche.

Je te remerci pour la macro en H8 ^^
 

Lone-wolf

XLDnaute Barbatruc
Re

Si tu as 4 ligne avec 45629 par exemple, l'autofilter que j'ai mis va prende en considération toutes les lignes correpondante. Pour test, enregistre le fichier sous un autre nom, fais plusieures fois un copier coller des lignes, ensuite exécute la macro. Mais avant il faut que tu modifie la feuille d'impression.Comme tu la mise en forme pour 1 ligne seulement, comment veux-tu qu'elle en affiche 10???:rolleyes:
 

Brudy

XLDnaute Junior
Euh, si j'ai bien compris ta remarque :

le Numéro d'OR est unique. Quand j'évoquait le "démultipliage" des lignes c'est surtout qu'à l'impression ça peut être des centaines de lignes à imprimer dans Impression OR.
Donc l'idée c'était que la macro bouton réalise une impression en +1 jusqu'a ce que la ligne de donnée en Récap OR soit vide.
B13 Si pleine alors copier coller dans impression OR et impression
B14 si pleine alors copier coller dans impression OR et impression
B15 si vide alors stop.
 

Brudy

XLDnaute Junior
Effectivement j'avais mal compris ta remarque, je suis bloqué sur l'image que j'ai du résultat,
Seulement, ta proposition ne peu s'appliquer a mon besoin : Le numéro d'OR est associé à une facture et doit être envoyé avec celle ci.
C'est pour ça que le récap OR dans la feuille Impression OR comporte une seule ligne ;)

Je précise : l'impression doit être ligne par ligne, je ne peux pas grouper les informations,

1 OR = 1 récap = 1 impression
 
Dernière édition:

Brudy

XLDnaute Junior
Quelqu'un sait seulement comment modifier ma macro pour que l'installation de mon fichier actuel imprime ligne par ligne à partir d'une certaine ligne, et s'arrête dès que la case d'après est Blanche ?

B13 Si pleine alors copier coller dans impression OR et impression
B14 si pleine alors copier coller dans impression OR et impression
B15 si vide alors stop.
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 909
Membres
101 836
dernier inscrit
karmon