Problème d'impression

Résolu

amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention -
amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention - 12 juil. 2023 à 00:24

Bonjour,

J'ai un tableau excel de 7 colonnes et de nombre de lignes variable selon que les lignes sont vides ou non.

Maintenant colonnes 1 et 2 ont des données sur par exemples 40 lignes et les colonnes 3, 4, 5, 6 et 7 sont vides. Mais il y a une tête de ligne.

J'ai créé un code VBA pour imprimer les 7 colonnes et les 40 lignes.

Le problème est quand on exécute le code VBA l'aperçu ne montre que les entêtes de ligne
Alors pourquoi?

A voir également:

6 réponses

Réponse 1 / 6

PHILOU10120 Messages postés 6433 Date d'inscription Statut Contributeur Dernière intervention 822

Bonjour

Avez-vous définis une zone d'impression? Il faut certainement l'utiliser dans votre code VBA

Réponse 2 / 6

amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention

Bonsoir,

Je vous s le fichier et vous verrez vous même.

https://www.ct.com/c/MGkaIp5h6c8

Réponse 3 / 6

ccm81 Messages postés 10908 Date d'inscription Statut Membre Dernière intervention 2 432

Bonjour

ActiveSheet.PageSetup.PrintArea = "A1:H" & Range("H" & Cells.Rows.Count).End(xlUp).Row

La colonne H ne contenant rien après la ligne de titre (6), normal que l'aperçu s'arrête en ligne 6.

Cdlmnt

amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention

Bonsoir,

Mais alors vous proposez quelle solution?

Réponse 4 / 6

PHILOU10120 Messages postés 6433 Date d'inscription Statut Contributeur Dernière intervention 822

Bonjour

Une idée dans le fichier

Impression-PhC5.xlsm (ct.com)

amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention

Bonsoir,

j'aimerais une meilleur idée si possible

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 6

ccm81 Messages postés 10908 Date d'inscription Statut Membre Dernière intervention 2 432

Mais alors vous proposez quelle solution?

Remplacer la colonne H par une colonne renseignée par exemple colonne B

ActiveSheet.PageSetup.PrintArea = "A1:H" & Range("B" & Rows.Count).End(xlUp).Row

Cdlmnt

amar_7423 Messages postés 29 Date d'inscription Statut Membre Dernière intervention

Merci beaucoup. ça marche très bien

Merci aussi à tous les participants.

A bientôt

Réponse 6 / 6

Schawrazeneger Messages postés 25 Date d'inscription Statut Membre Dernière intervention

Bonjour,

Merci pour l'info ;)

Discussions similaires

Historique d'impression

Impression PDF incomplète

Ou trouver l'historique d'impression ?

Transparence en tete et bas de page

commenr trouver des document deja imprimer

Votre réponse

Discussions similaires