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 :

Probleme Webbrowser quand clic


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Techicien Biologiste
    Inscrit en
    Août 2008
    Messages
    14
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France

    Informations professionnelles :
    Activité : Techicien Biologiste
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Août 2008
    Messages : 14
    Par défaut [Résolu] Probleme Webbrowser quand clic
    Bonjour à tous

    J'aurais voulu connaitre votre avis sur un petit soucis.

    J'ai créé un classeur excel dans lequel j'ai incorporé un webbrowser (controle ActiveX)

    voila le code très simple:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub Worksheet_Activate()
        WebBrowser1.Navigate "http://www.ladressedusite.fr"
    End Sub
    Le browser s'affiche le site aussi, mais lorsque j'interagit (lorsque je clique pour naviguer), il s'avère que j'ai une demande d'impression.
    comme si je faisait un Ctrl+P

    Il n'y a pas d'autre code que cela dans mon classeur.

    Merci de votre attention

    Bonne journée

  2. #2
    Membre Expert
    Profil pro
    Inscrit en
    Juin 2009
    Messages
    652
    Détails du profil
    Informations personnelles :
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Juin 2009
    Messages : 652
    Par défaut
    Bonjour,

    Une piste avec l'utilisation d'une procédure évènementielle.

    Copiez le code suivant dans la fenêtre de code de ThisWorkbook

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Cancel = True
    End Sub
    Cordialement.

    PMO
    Patrick Morange

  3. #3
    Membre averti
    Homme Profil pro
    Techicien Biologiste
    Inscrit en
    Août 2008
    Messages
    14
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France

    Informations professionnelles :
    Activité : Techicien Biologiste
    Secteur : Industrie Pharmaceutique

    Informations forums :
    Inscription : Août 2008
    Messages : 14
    Par défaut
    BOnjour,

    Le code que vous m'avez donné fonctionne , je n'ai plus de lancement de l'impression,

    Mais et il possible de m'expliquer à quoi cela était dû.

    Merci

    Cordialement

Discussions similaires

  1. Réponses: 8
    Dernier message: 27/12/2010, 22h01
  2. probleme Webbrowser et thread
    Par kurosama dans le forum ASP.NET
    Réponses: 8
    Dernier message: 20/04/2009, 14h58
  3. Renvoyer du texte quand clic
    Par Nounours1 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 10/02/2009, 13h14
  4. Réponses: 7
    Dernier message: 18/04/2007, 18h31
  5. Probleme webbrowser !
    Par Nutspower dans le forum Composants VCL
    Réponses: 3
    Dernier message: 20/03/2006, 20h51

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