Discussion :

[Hef-aîr]

Bonjour,

J'ai créé une macro qui prend des informations d'un tableau d'une feuille et les met dans une autre feuille en incrémentant d'une ligne du tableau à chaque impression.
Cependant, j'aimerais arranger cette macro pour remplir 2 cellules à partir de 2 lignes du tableau successives, tout en incrémentant au fur et à mesure, mais je n'y parviens pas.

Voilà la macro que j'ai créé pour l'instant :

Code :

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

1
2
3
4
5
6
Sub Macro1()
For i = 2 To Sheets("données").[A65000].End(xlUp).Row
Range("compteur") = i
Sheets("final").PrintPreview
Next
End Sub

Je vous remercie d'avance de vos réponses.

Bonne journée!

[NEC14]

Bonjour,

Désolé, mais je ne comprends pas la question ou le but recherché, pouvez-vous être plus explicit ?

Merci par avance

[Hef-aîr]

En fait, j'ai 1 colonne sur 658 lignes dans une feuille.
Dans l'autre feuille, j'ai 2 fiches avec 2 cases que je souhaite remplir avec les informations de la 1ère feuille, pour les imprimer.
Le truc, c'est que j'aimerais remplir la 1ère case avec la ligne 1 et l'autre case avec la ligne 2 pour l'imprimer.
A l'impression suivante, il me faudrait la 1ère case avec la ligne 3 et l'autre case avec la ligne 4, puis l'imprimer.
Et etc...

je sais pas si c'est assez clair et si c'est possible surtout...

[NEC14]

Pouvez-vous mettre un modèle en exemple ?
Merci

[Hef-aîr]

1ère feuille :
ligne 1 : Nico
ligne 2 : Yann
ligne 3 : Bernard
ligne 4 : Luc
ligne 5 : François
ligne 6 : Jo

et je souhaiterais obtenir, sur la 2ème feuille

1ère case : Nico //// 2ème case : Yann
==> Imprimer

1ère case : Bernard //// 2ème case : Luc
==> Imprimer

1ère case : François //// 2ème case : Jo
==> Imprimer
etc

[pastis.vi]

Salut,

Il faudrait utiliser copy/paste ... mais je vois pas où tu coinces parce que c'est pas très compliqué..

Si tu veux qu'on comprenne encore mieux envoie nous ton fichier