Dernière ligne imprimée

DoubleZero

XLDnaute Barbatruc

• 11 Juin 2014

• #2

Re : Dernière ligne imprimée

Bonjour, RONIBO, le Forum,

RONIBO à dit:

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

Cliquez pour agrandir...

😕

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

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

Code:

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

A bientôt 🙂

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 11 Juin 2014

• #3

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

 

Vote positif 0 Vote négatif

Modeste

XLDnaute Barbatruc

• 11 Juin 2014

• #4

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 😕

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 11 Juin 2014

• #5

Re : Dernière ligne imprimée

Re-bonjour, bonjour, camarchepas 🙂,

@ camarchepas :

camarchepas à dit:

...Moi aussi je vois B13...

Cliquez pour agrandir...

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 😀😀

 

Dernière édition: 11 Juin 2014

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 11 Juin 2014

• #6

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.

 

Vote positif 0 Vote négatif

Modeste

XLDnaute Barbatruc

• 11 Juin 2014

• #7

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:

Code:

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??

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 11 Juin 2014

• #8

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+

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 12 Juin 2014

• #9

Re : Dernière ligne imprimée

Bonjour, le Fil 🙂, le Forum,

RONIBO à dit:

... 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.

Cliquez pour agrandir...

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 🙂

 

Vote positif 0 Vote négatif