XL 2013 Sauter une ligne dans un transfert de donnees VBA

[dilank]

Bonjour,

J'ai besoin de vos lumières...

J'ai mémoriser 13 lignes de ma base, que je transfert vers une autre feuille.

Mais J'ai 2 problèmes.

Je n'arrive pas à commencer à partir de la ligne 2.

Puis les 13 lignes doivent être séparer d'une ligne; Ex : 2, 4, 6 jusqu'à 26


For page = 1 To 13
ligne = page
For col = 1 To 1
Sheets("TICKET").Cells(ligne, col).Value = tableau(page).casier
Sheets("TICKET").Cells(ligne, col + 1).Value = tableau(page).ref
Sheets("TICKET").Cells(ligne, col + 2).Value = tableau(page).design
Sheets("TICKET").Cells(ligne, col + 4).Value = tableau(page).niveau
Sheets("TICKET").Cells(ligne, col + 5).Value = tableau(page).casierdest
Sheets("TICKET").Cells(ligne + 2, col).Value = ""
page = page + 1
Next
page = page - 1
Next
Sheets("TICKET").PrintPreview

Merci de m'aider par avance

 

[pierrejean]

Bonjour dilank

Il nous serait bien plus aisé de t'aider si tu voulais bien créer un petit fichier exemple (sans données confidentielles )

 

[dilank]

Bonjour,

En pièce jointe, je parlais du 3ème onglet...

pour le 2ème onglet j'ai également un soucis

En faite je veux prendre 16 lignes de la base et les mettre sur le 2ème onglet, l'imprimer, et faire avec les 16 lignes suivantes etc... et qu'elle s'arrete quand il n'y a plus de ligne.

par contre ici j'ai des lignes et colonne vide à laisser entre (exemple ligne 3 et colonne D)

dites moi si je ne suis pas assez clair.

 

[pierrejean]

Re

Un debut d'essai

 

[dilank]

merci Pierrejean,

du coup je ne suis plus bloqué ^^

je vais pouvoir avancer, merci encore