Fenster/Instanz vom Programm aktivieren?
06.06.2020 11:50:51
Sergej
ich habe hier im Forum ein Code von Nepumuk gefunden, das mir evtl. helfen könnte, den Fokus auf eine Instanz/ das Programm zu setzen bzw. zu aktivieren. So wie es erkennen könnte, wird die Instanz über den Titel aktiviert.
Wie kann ich bitte bei lngHwnd nur nach folgenden Teil-String suchen: P:\Daten\sergej\Desktop\Test.dwg
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Private Declare Function SetForegroundWindow Lib "user32.dll" ( _
ByVal hwnd As Long) As Long
Public Sub test()
Dim lngHwnd As Long
lngHwnd = FindWindow(vbNullString, "P:\Daten\sergej\Desktop\Test.dwg Vectorworks 2020 ( _
SELECTseries 8)")
If lngHwnd 0 Then Call SetForegroundWindow(lngHwnd)
End Sub
Gruß,
Sergej