Excel et MS DOS

romain -  
Bonjour,

Je voudrais créer un fichier excel avec : 3 boutons de commande et 1 zone de texte.
Lorsque je remplie la zone de texte, je voudrais que le bouton soit associé à la commande "net send".
Ainsi, je pourrai envoyer à 3 interlocuteurs des popup ...

Merci de m'apporter votre aide.
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. onesdf
    Salut 
    Private Sub CommandButton1_Click()
    Envoi = Shell("net send Utilisateur_ou_machine " & Chr(34) & TextBox1.Text & Chr(34), vbMinimizedNoFocus)
End Sub