VBA AppActivate ohne Fenstertitel

[Gyro-Gearloose]

Ich möchte mit VBA aus Excel zum Spiel GTA online wechseln. GTA läuft schon, und zwar im Vollbildmodus. Was mache ich da ohne Fenster und ohne Fenstertitel? Weil ja AppActivate einen Fenstertitel erfordert. Ich spiele GTA und führe eine Statistik über Rennerfolge. Dafür wechsle ich aus dem Spiel mittels AHK zu Excel, trage dort mittels eines VBA-Programms schnell die Daten ein und will ebenso schnell wieder zurück zu GTA, weil das Spiel ja weiterläuft. Der Fenstertitel wäre "Grand Theft Auto V", wenn da ein Fenster wäre.

 

[till69]

Probier mal

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
Sub Test()
    SetForegroundWindow (FindWindow(vbNullString, "Grand Theft Auto V"))
End Sub

 

[Gyro-Gearloose]

 

[till69]

Deswegen vermeidet man das 64bit Office

Ungetestet:

Declare PtrSafe Function FindWindow Lib "USER32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPtr
Declare PtrSafe Function SetForegroundWindow Lib "user32" (ByVal hWnd As LongPtr) As LongPtr

 

[Gyro-Gearloose]

Tut leider gar nichts

 

[till69]

Dann findet "FindWindow" das Fenster-hwnd (Handle) auch nicht.

 

[Gyro-Gearloose]

Ich hab's mit AHK und WindowsSpy geschafft. Zwei Tastendrücke reichen. <ctrl>+<u> zu Excel aus GTA und <ctrl> + <i> wieder zurück zu GTA, auch im Fullscreen-Modus!