IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Imprimer une zone à partir d'une USERFORM [XL-2007]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 25
    Par défaut Imprimer une zone à partir d'une USERFORM
    Bonjour à tous,

    Je me permets de vous déranger puisque j'ai un petit soucis, j'ai quasiment terminé l'application que j'étais en train de développer mais je bloque encore sur un petit truc super embêtant. J'ai beau regarder sur le net depuis hier je ne trouve aucune solution à mon problème...

    je souhaiterai imprimer deux page dans mon fichier excel hors deux zone bien distincte la page 1 serai : de la cellule A1 à F39.

    La deuxième page serai de la cellule H1 à T22...


    Pour l'instant j'ai ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Imprimer_Click()
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True
    End Sub


    Pouvez-vous me venir en aide s'il vous plait j'en ai marre c'est le dernier truc qui me bloque pour terminer totalement mon projet

    Merci d'avance cordialement Miska

  2. #2
    Membre Expert Avatar de aalex_38
    Inscrit en
    Septembre 2007
    Messages
    1 631
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 631
    Par défaut
    Pour trouver le code, à imprimer utilises l'enregistreur de macro et :
    - selectionne la zone
    - Puis Fichier / zone d'impression / Définir

    ...

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    7
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 7
    Par défaut Voici ma solution (qui fonctionne)
    Bonjour à Vous, MISKA

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    Private Sub CommandButton1_Click()
     
        ActiveSheet.PageSetup.PrintArea = "$A$1:$F$39"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
     
        ActiveSheet.PageSetup.PrintArea = "$H$1:$T$22"
        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
     
    End Sub

  4. #4
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 25
    Par défaut
    Merci pour vos réponses si rapide je viens d'essayé ta méthode momone18 mais le problème c'est que la deuxième zone d'impression contient un graphique et quelque cellule excel, Or avec ce bout de code, il n'y a que le graphique qui apparait sans les autres cellules et en plus il est couper :/

    Comment puis régler cela ?

  5. #5
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    7
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 7
    Par défaut message de momone18
    Même s'il y un graphique en page 2, cela fonctionne.
    il suffit de que le graphique appartienne à la zone $H1:$T22
    j'ai essayé et vérifié !
    Salutations et à Bientôt

  6. #6
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 25
    Par défaut
    Merci pour l'info mais le graphique est sur une deuxième page, Malheureusement lorsque je souhaite lancer une impression, sur la deuxième page j'ai mon graphique et en dessous dans d'autre cellules de la page. Il m'affiche le graphique (couper) et ne m'affiche pas les cellules :/

  7. #7
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2010
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2010
    Messages : 25
    Par défaut
    Bon je viens de réaliser un nouveau test, ça fonctionne ne me demandé pas à quoi cela était du, je n'en sais strictement rien :/, Par contre je voudrai savoir une dernière chose, comment puis-je centrer mes informations ? car la ça colle la marge de droite :/

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 2
    Dernier message: 18/06/2011, 20h06
  2. Réponses: 3
    Dernier message: 07/04/2011, 14h38
  3. [AC-2007] Executer une requête à partir d'une zone de texte
    Par keuthi dans le forum VBA Access
    Réponses: 9
    Dernier message: 06/07/2010, 16h21
  4. Réponses: 3
    Dernier message: 29/06/2007, 15h29
  5. Maj d'une table à partir d'une zone de liste
    Par farios dans le forum Access
    Réponses: 2
    Dernier message: 13/02/2007, 10h24

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo