T
Thomas®
Guest
Bonjour le forum,
j'ai un USF ou je souhaite sup le cadre avec le bouton 'la croix',
alors j'y suis arrivé mais ce qui est etrange c'est qu'apres avoir retouché mon USF le cadre est revenu.
je suis desolé de ne pouvoir joindre mon fichier car il est trop gros.
je vous joint le code que j'ai utilisé pour sup le cadre
CODE dans l'initializ de l'USF
CODE dans la declaration de mon module
si quelqu'un connait une autre méthode ce serait super
je suis sous excel 97 avec windows XP
D'avance merci
Thomas®
j'ai un USF ou je souhaite sup le cadre avec le bouton 'la croix',
alors j'y suis arrivé mais ce qui est etrange c'est qu'apres avoir retouché mon USF le cadre est revenu.
je suis desolé de ne pouvoir joindre mon fichier car il est trop gros.
je vous joint le code que j'ai utilisé pour sup le cadre
CODE dans l'initializ de l'USF
Code:
Dim hWnd As Long, Style As Long
hWnd = FindWindow(vbNullString, Me.Caption)
Style = GetWindowLong(hWnd, -16) And Not &HC00000
SetWindowLong hWnd, -16, Style
DrawMenuBar hWnd
Etiquette '
CODE dans la declaration de mon module
Code:
Public Declare Function FindWindow Lib 'user32' Alias 'FindWindowA' _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function GetWindowLong Lib 'user32' Alias _
'GetWindowLongA' (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Public Declare Function SetWindowLong Lib 'user32' Alias 'SetWindowLongA' _
(ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Declare Function DrawMenuBar Lib 'user32' (ByVal hWnd As Long) As Long
si quelqu'un connait une autre méthode ce serait super
je suis sous excel 97 avec windows XP
D'avance merci
Thomas®