Macro pour définition zone d'impression

Qhes Messages postés 180 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
J'ai une feuille Excel et j'aimerais pouvoir faire 2 sélections de cellules avec 2 noms distincts genre "travail" et "diffusion" et pouvoir imprimer l'une ou l'autre juste en lui disant si je veux imprimer "travail" ou "diffusion"...

Je ne suis pas sure d'avoir été super claire... mais je reste dans le coin pour répondre à toutes vos questions :)

Merci d'avance

1 réponse

  1. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Bonjour

    Quelque chose comme ça

    Const imprimer1 = "plage1"  ' nom de la plage 1
    Const Imprimer2 = "plage2" ' nom de la plage 2
    Const celimp = "E2" ' cellule contenant le nom de la plage à imprimer

    Sub Imprime()
    Dim nomplage As String
    nomplage = ActiveSheet.Range(celimp)
    ActiveSheet.PageSetup.PrintArea = Range(nomplage).Address
    ActiveWindow.SelectedSheets.PrintOut
    End Sub

    Cdlmnt
    0