Discussion :

[Arnaud41]

Bonjour,

Sur un premier onglet j'ai un listing sur des produits (références, code etc...)

Une ligne par produit...

Sur un deuxième onglet je voudrais faire un tableau exclusivement pour l'impression.
Lors du lancement d'impression sur cet onglet il imprimerait une feuille avec des infos de la première ligne, puis une autre feuille avec la deuxième ligne etc.....

Est ce possible ?

@+ Arnaud

[Marc-L]

Bonjour,

oui car B-A-BA d'Excel : insertion de saut de page …

[Arnaud41]

Merci je vais regarder de ce coté la ;-)


Bon je viens de regarder, et c'est pas vraiment ce que je voudrai...

[Menhir]

c'est pas vraiment ce que je voudrai...

J'adore quand un demandeur fait autant d'efforts pour expliquer sa problématique.
Attend, j'attrape ma boule de cristal...

[Arnaud41]

Bonjour,

En fait pour etre plus clair:

Je voudrai dans l'onglet 2 faire un seul tableau avec des cellules vides.

Lors de l'impression il faudrait qu'il m'imprime le tableau avec dans les cellules vides les valeurs de la ligne 1 de l'onglet 1, puis imprime un autre tableau avec la ligne 2 etc.... jusqu'a la derniere ligne de longlet 1.

Je ne veux pas 500 tableau rempli sur l'onglet 2...

Suis je clair cette fois ci ?

@+ Arnaud

[Menhir]

Suis je clair cette fois ci ?

Désolé mais non.
Il faudrait peut-être que tu mettes ton fichier en pièce jointe pour comprendre.

Est-ce que tu voudrais dire que tu as un modèle de tableau vide et que tu voudrais le remplir successivement avec les données de chaque ligne de ton onglet 1 ?

[Arnaud41]

Oui c'est ça.

En fait le tableau vide tient sur une feuille A4

Ce qui donnerait lors de l'impression autant de feuilles A4 que de ligne de l'onglet 1, et chaque aurait un tableau avec certaines valeurs de la ligne 1 de l'onglet 1, le suivant valeurs de la ligne 2 de l'onglet 1 etc...

@+ Arnaud

[Menhir]

Tu peux essayer de faire ça par publipostage dans Word en utilisant ces données Excel.

Si tu veux le faire par macro, ça donnerait quelque chose comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim Ligne as integer
worksheet("Feuil1").activate
For Ligne = 2 to Cells(Rows.count,1).end(xlUp).Row
 
    Worksheet("Feuil2").cells(2,3).value = cells(Ligne,1)
    Worksheet("Feuil2").cells(3,3).value = cells(Ligne,2)
    ... etc...
 
    Worksheet("Feuil2").PrintOut
 
Next Ligne

[Arnaud41]

Merci je test dès lundi ;-)