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 :

Impression d'une selection


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    64
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 64
    Par défaut Impression d'une selection
    Bonjour,
    Je souhaiterai à l’aide d’un code Vba faire imprimer la sélection suivante : de la cellule A1 à la dernière cellule non vide de la colonne I.
    Merci d’avance pour votre aide.

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France, Rhône (Rhône Alpes)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 40
    Par défaut
    Salut,
    Regarde du coté de

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("A1:I" & Range("I65536").End(xlUp).Row).PrintOut
    PS: Je suis sous Excel2000

    Voilà j'espère que cela t'aide un peu

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    64
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 64
    Par défaut
    Serait il possible de modifier la formule pour qu'ils fasse la même selection mais qu'il imprime 5 lignes de plus vers le bas.
    Par exemple votre formule selectionne la plage de données A1:I850
    Je souhaiterais qu'il selectionne A1:I850.
    Ce n'est pas évident à expliquer pourquoi je souhaite rajouter ces 5 lignes.
    J'avais penser à cette formule:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("A1:I" & Range("I65536").End(xlUp).Row)+5).PrintOut
    Est-ce possible?
    Merci d'avance pour votre aide

  4. #4
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France, Rhône (Rhône Alpes)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 40
    Par défaut
    Salut,
    Tu ne penses pas que le mieux serait encore d'essayer?

    Le code que tu proposes a l'air correct.

    @+

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    64
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 64
    Par défaut
    Je préferé vous demander avant car si je test le code cela va lancer l'impression d'environ 40pages, sa évite de gaspiller de l'encre et des feuilles.
    Merci pour votre aide qui ma été précieuse.
    La formule a l'air de fonctionner
    Merci

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

Discussions similaires

  1. Réponses: 2
    Dernier message: 04/03/2013, 10h19
  2. Impression d'une selection multicriteres
    Par captainamerica75 dans le forum Access
    Réponses: 10
    Dernier message: 13/01/2006, 19h33
  3. [BPW] Impression d'une image BMP
    Par Alcatîz dans le forum Turbo Pascal
    Réponses: 13
    Dernier message: 21/08/2003, 14h34
  4. [Sybase] Select dans une select loop en C
    Par Claudio dans le forum Sybase
    Réponses: 2
    Dernier message: 29/04/2003, 18h06
  5. Impression dans une MDI Application
    Par Andry dans le forum Composants VCL
    Réponses: 8
    Dernier message: 19/12/2002, 08h45

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