[Catégorie modifiée VB6 --> VBA] lance un terminal avec des parametres
cs_stephane2010
Messages postés4Date d'inscriptiondimanche 24 janvier 2010StatutMembreDernière intervention28 septembre 2010
-
23 août 2010 à 22:07
cs_stephane2010
Messages postés4Date d'inscriptiondimanche 24 janvier 2010StatutMembreDernière intervention28 septembre 2010
-
30 août 2010 à 23:53
Bonjour,
Avec ce code, je peux lancez Putty avec login et mot de passe.
Dim oPutty
Set wshShell = WScript.CreateObject("WScript.Shell")
Set oPutty = wshShell.Exec("C:\Program Files\OpenSource\PuTTY\putty.exe -load monserveur")
WScript.Sleep 3000
WScript.Sleep 100
wshShell.SendKeys "loginmoit"
wshShell.SendKeys "{ENTER}"
WScript.Sleep 200
wshShell.SendKeys "motdepasse"
wshShell.SendKeys "{ENTER}"
End Sub
Ce que je souhaite faire en vba un peut la même chose, j'explique:
sur une feuille excel
- cellule A1 contient un bouton dont le nom est une machine "monserveur"
- cellule B2 contient le login
- cellule B3 contient le password
lorsque l'on clic sur le bouton le script vba va récupérer le contenu de chaque cellule de la ligne puis lance putty avec le contenu
Dans ma feuille excel il y a plusieurs lignes.
Mon vbs fonctionne mais en vba je ne sais pas comment faire via un bouton lancer putty en récupérant les paramètres
avec Shell "C:\Program Files\OpenSource\PuTTY\putty.exe" cela lance bien putty mais...??
Quelqu'un peut il m'aider ?
Merci d'avance pour toutes réponses.
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 23 août 2010 à 23:59
Salut
En fait, ce que tu ne sais pas faire, c'est récupérer le contenu d'une cellule ?
Roulement de tambour :
Sheets("Feuil1").Range("A1").Value
Ça, le moindre exemple de code présent dans l'aide de Excel te le dira !
Pas très curieux ...
Ensuite, comment mettre ce contenu dans ta chaine de commande ?
maChaine = "Coucou " & Sheets("Feuil1").Range("A1").Value
Pas compliqué non plus à découvrir, toujours en consultant l'aide ...
Vraiment pas curieux ...
AVANT de poser des questions sur le forum, il y a quand même un peu de recherche personnelle à faire, que ce soit dans l'aide du logiciel ou dans les précédentes questions du forum.
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)