XL 2013 Définir ma zone d'impression avec un nombre de ligne qui n'est pas fixe

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Quitus

XLDnaute Nouveau
Bonjour je souhaite enregistrer un Excel en pdf à l'aide d'une macro et généralement je le fais avec cette fonction:

ActiveWorkbook.Worksheets(3).PageSetup.PrintArea = "$A$1:$H$42"

Sauf que je dois maintenant faire un enregistrement avec un nombre de ligne ( je crée des graphiques les uns en dessous des autres ) qui change avec ma macro. Je souhaiterais donc obtenir une zone d'impression tant qu'il y a un graphique. Quelqu'un aurait il une solution?

Je vous remercie par avance! 🙂
 
Re, à adapter à ton contexte
VB:
Option Explicit

Sub CoordonneesGraphes()
Dim Ch As ChartObject
Dim sNomGraphe As String
Dim Graphe As ChartObject
    ShDatas.Activate
    For Each Ch In ShDatas.ChartObjects
        sNomGraphe = Ch.Name
        Set Graphe = ShDatas.ChartObjects(sNomGraphe)
        With Graphe
            Debug.Print .TopLeftCell.Address, .BottomRightCell.Address
        End With
    Next Ch
    Set Graphe = Nothing
End Sub

ShDatas étant le CodeName de la feuille concernée.
 

Pièces jointes

  • coordonnees.png
    coordonnees.png
    99.6 KB · Affichages: 40
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
2 K
Retour