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-E] comment faire net send en VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut [VBA-E] comment faire net send en VBA
    salut a tous
    voila, j'aimerais pouvoir faire du netsend a partir d'un petit userform avec
    1 listbox pour les destinataires.
    1 zone e text pour l'ecriture du message.
    et le tout sans afficher la fenetre dos

    alors Comment codé cette commande?
    ps : est il possible de recuperer directement le nom des pc connecté sur le reseau ou je doit les ecrire dans une page excel qui servira a mon listbox.



    merci beaucoup

  2. #2
    Inactif  
    Avatar de jmfmarques
    Profil pro
    Inscrit en
    Décembre 2005
    Messages
    3 784
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2005
    Messages : 3 784
    Par défaut
    alors Comment codé cette commande?
    en consultant tout simplement la de ce forum (les exemples ne manquent pas... et tu n'es pas nouveau ici...)
    ps : est il possible de recuperer directement le nom des pc connecté sur le reseau ou je doit les ecrire dans une page excel qui servira a mon listbox.
    quel réseau ? externe ou interne ?

  3. #3
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut
    en ce qui concerne le reseau , c 'est un reseau interne
    en fait j'aimerais recuperer les adresses ( nom des pc) comme dans outlook comme :pc1 - pc2 si possible.

    pour net send , ce qui me pose probleme , c'est de memoriser mon choix de destinataire et message , le code en lui meme pour l'envoie est simple , mais comment lui dire que le choix ds le listbox = destinataire.

    merci

  4. #4
    Inactif  
    Avatar de jmfmarques
    Profil pro
    Inscrit en
    Décembre 2005
    Messages
    3 784
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2005
    Messages : 3 784
    Par défaut
    Pour celà aussi : en recherchant un peu, on trouve des quantités d'exemples sur ce forum :
    Voilà un lien, entre autres :
    http://www.developpez.net/forums/vie...ghlight=reseau

  5. #5
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut
    alors voila , j'ai chercher un peu partout et suivi les liens mais c'est trop compliquer , ce que j'aimerais c'est trouvé une fonction de type :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    sub bouton1_click ()
    shell(net send & listbox.value & "textbox.value")
    End sub
    mais je n'arrive pas a codé exactement .
    merci de votre aide

  6. #6
    Inactif  
    Avatar de jmfmarques
    Profil pro
    Inscrit en
    Décembre 2005
    Messages
    3 784
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2005
    Messages : 3 784
    Par défaut
    Il y a alors la fonction BaguetteMagique (adaptable à tous les cas de figure et sans rien coder ni rien chercher à comprendre du tout). Elle est préférable à la fonction EcrireLeCodeDeMaFonctionAmaPlace !
    Il y a aussi, pour ceux que l'écriture de code rébute, les outils tous faits que l'on trouve pour pas cher partout !

  7. #7
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut
    et ben j'ai connu mieux comme aide
    donc je clos le sujet car tes remarques me paraissent hors sujet.
    Avant de juger , et mettre tt le monde ds le meme panier , tu devrais connaitre les gens .

    sur ce si qqun est volontaire pour m'expliquer je suis preneur, sinon merci qd meme jmfmarques pour le temps passé a me faire de l'ecriture, mais qui ne correspond en rien au sujet.

    merci

  8. #8
    Expert éminent


    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
    Par défaut
    Citation Envoyé par zouille
    alors voila , j'ai chercher un peu partout et suivi les liens mais c'est trop compliquer , ce que j'aimerais c'est trouvé une fonction de type :

    sub bouton1_click ()
    shell(net send & listbox.value & "textbox.value")
    End sub

    mais je n'arrive pas a codé exactement .
    merci de votre aide
    il te faut bouger les ""...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    sub bouton1_click ()
    Shell ("net send " & ListBox & " " & TextBox)
    End sub

  9. #9
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut
    super bbil
    merci a toi.

  10. #10
    Membre confirmé
    Inscrit en
    Décembre 2005
    Messages
    164
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 164
    Par défaut
    bon
    je viens de tester sur le reseau et rien ne se passe .
    il n'y a pas d'erreur vba ,mais je ne vois pas la fenetre dos s'ouvrir ( comme qd on tappe directement net send dans l'invite de commande)

    serait ce une erreur dans le code , je pense qu'il faudrait peut etre mettre "cmd" dans le code

    shell ( cmd & "net send" & combobox & textbox)
    qu'en pense tu

    merci a toi

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

Discussions similaires

  1. [VBA-E]Comment faire pour écrire dans une page excel existante ?
    Par pauletta22 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 24/05/2006, 13h54
  2. [VBA-W]Comment faire un fractionnement lorsque l'on veut?
    Par gusrom86 dans le forum VBA Word
    Réponses: 5
    Dernier message: 23/02/2006, 11h24
  3. [VBA-W]Comment faire suivre les macros d'un modèle?
    Par gusrom86 dans le forum VBA Word
    Réponses: 7
    Dernier message: 23/02/2006, 10h26
  4. [VBA][Excel] Comment faire pour faire une boucle?
    Par DonKnacki dans le forum Macros et VBA Excel
    Réponses: 29
    Dernier message: 19/12/2005, 14h48
  5. Comment faire un selon en vba
    Par Celia1303 dans le forum Access
    Réponses: 6
    Dernier message: 13/10/2005, 14h31

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