Bonjour le Forum,
j'utilise la procédure suivante (avec raccourcis clavier) pour masquer ou réafficher la barre des taches Windows;
Private Declare Function FindWindowEx& Lib "user32" Alias "FindWindowExA" _
(ByVal hWnd1&, ByVal hWnd2&, ByVal lpsz1$, ByVal lpsz2$)
Private Declare Function ShowWindow& Lib "user32" (ByVal hwnd&, ByVal nCmdShow&)
Sub FullScreenControleF()
' Touche de raccourci du clavier: Ctrl+f
Application.DisplayFullScreen = True
ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 0
End Sub
Sub NormalScreenControleN()
' Touche de raccourci du clavier: Ctrl+n
Application.DisplayFullScreen = False
ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 5
End Sub
Lors du réaffichage de la barre avec (Ctrl+n), la feuille Excel n'a plus le focus, je dois le rétablir en cliquant dans la feuille...
et ça ne m'arrange pas ! Comment compléter le code pour réactiver le focus directement ??
Si qq'un connait une solution .....
Merci d'avance
Cordialement
WS