Partage
  • Partager sur Facebook
  • Partager sur Twitter

[VBA] Plusieurs Range() dans un tableau et export

    30 juillet 2018 à 18:19:45

    Bonjour à tous !

    J'ai une feuille Excel avec des valeurs dans une zone que j'ai nommé "plage_impression", toutes reliées à une case "E3": si je change la valeur de "E3", toutes les valeurs de "plage_impression" changent.

    J'aimerai donc exporter en PDF:

    - page 1 -> "plage_impression" quand "E3" = 1

    - page 2 -> "plage_impression" quand "E3" = 2

    - ...etc

    Voici mon code actuel après toute une après-midi x)

    Sub Macro2()
        
        Dim test(10) As Range
        
        For nombre = 0 To 10
            Range("E3").Select
            ActiveCell.FormulaR1C1 = nombre
            
            Set test(nombre) = Range("plage_impression")
        Next nombre
        
        test().ExportAsFixedFormat _
            Type:=xlTypePDF, _
            Filename:="TEST.pdf", _
            Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, _
            OpenAfterPublish:=True
            
    End Sub


    Mon idée est de créer un tableau avec les différents Range("plage_impression"), puis de l'exporter en PDF.

    Est ce que la logique est bonne ? Qu'y a-t-il à changer pour arriver à un résultat valable ?

    Merci beaucoup d'avance,

    Guillaume NICOLAS.

    • Partager sur Facebook
    • Partager sur Twitter

    [VBA] Plusieurs Range() dans un tableau et export

    × Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié.
    × Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
    • Editeur
    • Markdown