Herbers Excel-Forum - das Archiv
call shell
Betrifft: call shell
von: axel
Geschrieben am: 28.11.2003 16:52:29
hallo,
wie kann ich eine applikation, die ich mit "call shell" geöffnet habe wieder in VBA schließen?
Betrifft: AW: call shell
von: Nepumuk
Geschrieben am: 28.11.2003 17:32:58
Hallo Axel,
was ist das für eine Application und auf welcher Windowsversion soll dein Programm laufen?
Gruß
Nepumuk
Betrifft: AW: call shell
von: axel
Geschrieben am: 30.11.2003 20:06:29
hallo,
es ist win2000 und die Applikation ist sqlplus!
Betrifft: AW: call shell
von: Nepumuk
Geschrieben am: 01.12.2003 18:42:41
Hallo Axel,
ich habe dich fast vergessen. Das geht so:
Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal Hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Sub CloseWindow()
SendMessage FindWindow(vbNullString, "Test.txt - Editor"), &H10, 0, 0
End Sub
Code eingefügt mit: Excel Code Jeanie
Das Beispiel ist für eine Textdadei. Den Namen den du einsetzen musst, findes du im Taskmanager - Anwendungen, wenn du das Programm sqlplus gestartet hast.
Gruß
Nepumuk