Re Pat5 et Celeda, Bonjour petchy,
Pour info, sur XL97 j'ai une erreur de syntaxe dans ce Sub :
Public Sub Hook(ByVal hControl_ As Long)
hControl = hControl_
lPrevWndProc = SetWindowLong(hControl, GWL_WNDPROC, _
AddressOf WindowProc)
End Sub
A+
José