title image


Smiley Lege dir einen Command-Button an!
Hallo Jens,



Private Sub CommandButton1_Click()

'In Zelle A1 kommt die IP-Adresse!

Exec ([A1])

End Sub



Die Funktion bleibt im Modul:



Function Exec(IP As String)

Dim a

a = Shell("C:\Programme\Remote Desktop\mstsc.exe" & " /v:" & IP & " /console", 1)

End Function



dann sollte es funktionieren!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: