Comment rendre invisible la barre d'outils de windows (démarrer, +heure,...) ?

Tu peux utiliser le code ci-dessous, après l'avoir recopié dans un module standard. Il cache (ou réaffiche) la barre des tâches mais ne permet pas d'en récupérer l'emplacement, comme lorsqu'on coche "Masquer automatiquement" dans les Propriétés de la barre des tâches.

'=================== Private Declare Function FindWindowA Lib "user32" _  
(ByVal lpClassName As String, _  
ByVal lpWindowName As String) As Long  
Declare Function SetWindowPos Lib "user32" _  
(ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _ 
 ByVal x As Long, ByVal y As Long, ByVal cx As Long, _ 
 ByVal cy As Long, ByVal wFlags As Long) As Long  
Public Const SWP_SHOWWINDOW = &H40 
Public Const SWP_HIDEWINDOW = &H80  

Function HideTaskbar()
 Dim hdle As Long
 
 hdle = FindWindowA("Shell_traywnd", "")
 SetWindowPos hdle, 0, 0, 0, 0, 0, SWP_HIDEWINDOW
 End Function

Function UnhideTaskbar()
 Dim hdle As Long
 
 hdle = FindWindowA("Shell_traywnd", "")
 SetWindowPos hdle, 0, 0, 0, 0, 0, SWP_SHOWWINDOW
 End Function

Une fois que tu as recopié le code dans un module standard, tu peux appeler les fonctions HideTaskBar et UnhideTaskbar comme tu le ferais d'une procédure que tu aurais créée toi-même. Si par exemple tu veux cacher la barre des tâches à l'ouverture d'un classeur, dans le module ThisWorkbook du classeur :

Private sub Workbook_Open()
 HideTaskbar
 end sub

et en le refermant :

Private sub Workbook_BeforeClose(Cancel As Boolean)
 UnhideTaskbar
 end sub

Tu peux aussi les appeler dans le courant d'une macro :

sub Macro1()
 'instructions
 HideTaskbar
 'autres instructions
 UnhideTaskbar
 'autrecode si besoin
 end sub