Dernière ligne imprimée

[RONIBO]

Bonsoir le forum,

J'aimerais imprimer une feuille Excel, mais j'aimerais déterminer la dernière ligne imprimée avant de lancer l'impression

Je vous joint un fichier exemple très simple, dans ce fichier la dernière ligne imprimée est : 52.

Comment trouver cette ligne ?

PS : J'ai posté le sujet sur un autre site, mais pas de retour 🙁

merci d'avance 🙂

a+

 

[DoubleZero]

Re : Dernière ligne imprimée

Bonjour, RONIBO, le Forum,

...dans ce fichier la dernière ligne imprimée est : 52...

😕

Selon mes yeux 🙄, la dernière cellule non vide est en b13.

Voici un code permettant de localiser la dernière cellule renseignée :

Option Explicit
Sub Où_qu_elle_est()
Cells.Find("*", , , , xlByRows, xlPrevious).Select
MsgBox "Ligne " & Selection.Row & " - Colonne " & Selection.Column
End Sub

A bientôt 🙂

 

[camarchepas]

Re : Dernière ligne imprimée

Bonjour 00, Ronibo ...

Et oui B52 , lol en juin confusion avec les bombardiers ........

Moi aussi je vois B13, le fichier exemple aurait-il glissé .....

Cordialement

 

[Modeste]

Re : Dernière ligne imprimée

Bonjour RONIBO 🙂, 00 🙂, camarchepas 🙂 ... et puis tous les autres!

Je me suis posé la même question que vous ... puis je me suis aperçu que le premier saut de page se faisait sous la ligne 52 ... mais ça risque de varier tellement que je ne sais si c'est une bonne idée de repérer l'emplacement dudit saut de page 😕

 

[DoubleZero]

Re : Dernière ligne imprimée

Re-bonjour, bonjour, camarchepas 🙂,

@ camarchepas :

...Moi aussi je vois B13...

Merci, camarchepas, de me rassurer 😀 car je m’apprêtais à consulter... en urgence... un ophtalmo 😎

@ RONIBO :

La présente discussion est-elle liée à celle-ci ?

A bientôt 🙂

P. S. : 😀😀 Modeste 😀😀

 

[RONIBO]

Re : Dernière ligne imprimée

re,

Merci à tous pour votre aide 🙂

Dès je clique sur aperçu avant impression puis ferme l'aperçu, j'ai des pointillés qui délimite ma feuille
J'aimerais trouver cette dernière ligne.
Je sais pas si sa s'appel Hpagebreack

Double0 : oui c'est pour le même problème, je me suis dit que je devais ouvrir un nouveau sujet, désolé si c'est pas le cas.

 

[Modeste]

Re : Dernière ligne imprimée

Re à tout le monde,

@RONIBO: le saut de page horizontal correspond bien à HPageBreak. Le problème est que le saut de page en question semble n'acquérir d'existence qu'à partir du moment où une seconde page existe. Si, dans la feuille de calcul, tu encodes n'importe quoi sous la ligne pointillée que tu évoques, alors ceci fonctionne et permet de repérer l'adresse du premier saut de page:

MsgBox ActiveSheet.HPageBreaks(1).Location.Address

Mais tant qu'il n'y a qu'une seule page, cela provoque une erreur, puisque le premier saut de page n'existe pas.

Pour ce qui me concerne, je ne saurais t'en dire plus, ni évoquer d'autres pistes. Je présume que tu ne veux pas simplement insérer un pied de page??

 

[RONIBO]

Re : Dernière ligne imprimée

Re le fil,

Je me douté bien que le Hpagebreack y été pour quelque chose,

en faite je souhaite mettre une image (pied de page) sur la dernière ligne utilisable d'une feuille, avec mon logiciel de facturation je peux créer des factures sur plusieurs pages. J'aimerais pouvoir identifier la dernière ligne puis utiliser offset pour placer l'image 🙂

a+

 

[DoubleZero]

Re : Dernière ligne imprimée

Bonjour, le Fil 🙂, le Forum,

... oui c'est pour le même problème, je me suis dit que je devais ouvrir un nouveau sujet, désolé si c'est pas le cas.

Pour quelle raison la solution proposée ici ne convient-elle pas ?

Parce qu'elle place l'image en dessous de la dernière valeur saisie, au lieu de l'insérer juste avant le dernier saut de page ?

Si tel est le cas, je ne sais comment procéder 🙁 pour atteindre la position idoine.

A bientôt 🙂