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 :

VBA/xl/97 Application.ActivePrinter Ok /Ok...


Sujet :

Macros et VBA Excel

  1. #1
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 546
    Points
    15 546
    Par défaut VBA/xl/97 Application.ActivePrinter Ok /Ok...
    J'ai un problème de paramétrage d'imprimante
    Ça, ça marche !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim ImprimanteActive 
        ImprimanteActive = Application.ActivePrinter
        MsgBox ImprimanteActive
    Mais ça, ça marche pas !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
        Set ImprimanteActive = Application.ActivePrinter
        With ImprimanteActive 
            '....
        End With
    Ça, ça marche !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    With Application
          ImprimanteActive = .ActivePrinter
    End With
    Mais ça, ça marche pas !
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
        With Application
            Set ImprimanteParDéfaut = .ActivePrinter
            With ImprimanteParDéfaut
                '....
            End With
        End With
    Message d'erreur dans les deux cas "Objet requis" sur ActivePrinter

    Alors que dans l'aide j'ai bien ça :
    Utilisez la propriété Application pour renvoyer l'objet Application
    De quoi "il" parle ?

    Merci par avance de me donner vos impressions (!)

  2. #2
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Pourquoi cherches-tu à faire un Set là où, visiblement, VBA n'en veut pas???

  3. #3
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 040
    Points
    20 040
    Par défaut
    Bien .activePrinter c'est une string.. tu ne peu donc pas utiliser Set pour l'affecter comme un objet...


    Citation Envoyé par Aide en ligne VBA
    ActivePrinter, propriété


    Cette propriété renvoie ou définit le nom de l'imprimante active. Type de données String en lecture-écriture.

  4. #4
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 546
    Points
    15 546
    Par défaut
    Salut la Belgique !
    Pourquoi cherches-tu à faire un Set là où, visiblement, VBA n'en veut pas???
    Pour configurer mon impression "comme j'ai envie".
    Maintenant, si tu connais la bonne raison pour qu'Excel ne veuille pas de mon Set, je te serais trééés reconnaissant de m'expliquer. Ça pourrait servir à d'autres (ou à moi-même dans d'autres cas de figure).

    Le bonjour à Bruxelles

  5. #5
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 546
    Points
    15 546
    Par défaut
    Merci bbil, là, j'ai ma réponse. J'aurais dû te demander à toi...

    Maintenant, comme Printer n'est pas un objet VBA, comment puis-je configurer la mienne ?

    A+

  6. #6
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 040
    Points
    20 040
    Par défaut
    Citation Envoyé par ouskel'n'or
    Maintenant, comme Printer n'est pas un objet VBA, comment puis-je configurer la mienne ?
    qu'appelle tu configuer ? .. si c'est le formatage pour lpar exemple imprimer une feuille excel tu as l'objet :

    ActiveSheet.PageSetup
    ..

  7. #7
    Membre averti
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    290
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Septembre 2005
    Messages : 290
    Points : 374
    Points
    374
    Par défaut
    Bonsoir, ouskel'n'or
    Celà m'étonnerais beaucoup que tu ne saches pas, mais pour imprimer la page en cours, c'est:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
    jpleroisse

  8. #8
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 546
    Points
    15 546
    Par défaut
    Non, il ne s'agit pas d'une feuille mais de lancer du texte directement sur imprimante.
    Je teste une solution (VB) que tu as données, bbil, à méphistopheles samedi. Ayant déjà eu besoin d'imprimer directement sur imprimante, et n'ayant pas trouvé de solution à l'époque, j'aurais voulu être prêt si l'occasion se re-présentait
    Et puis, j'ai fait ça sur Apple IIe (en 1790...) et je n'accepte pas de ne pouvoir le faire aujourd'hui.

    Rien d'urgent mais j'aimerais bien savoir

    Si tu as une solution je t'enverrai des fleurs...

    A+

    NB - http://www.developpez.net/forums/vie...416720#2416720

    PS - En effet, leroissejp, ce n'est pas une feuille... Mais je pressents que mon cas est désespéré en VBA...

Discussions similaires

  1. [VBA] Test d'application excel ouverte
    Par Rayno1979 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/07/2009, 20h38
  2. [VBA] Priorité ddes applications
    Par merenptah44 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 01/06/2007, 12h41
  3. [VBA-E] commander application exterieur.
    Par zoumzoum59 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 28/05/2006, 22h30
  4. [VBA-E] lancer application exterieur
    Par zoumzoum59 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 28/05/2006, 18h23
  5. [VBA-E]Fermeture Application Excel
    Par malloc_92 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 11/04/2006, 12h46

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