jmcr
XLDnaute Occasionnel
bonjour le forum
je tente d enlever la croix d un useform
j ai se code que je place au début de useform est t'il bon car la croix est toujours la ou cela provient d'une erreur de ma part
avec tout mes remercîments
Option Explicit
'*******************Supprime la croix du Userform****************
Private Declare Function GetWindowLongA Lib "user32" _
(ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLongA Lib "user32" _
(ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Private Declare Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
je tente d enlever la croix d un useform
j ai se code que je place au début de useform est t'il bon car la croix est toujours la ou cela provient d'une erreur de ma part
avec tout mes remercîments
Option Explicit
'*******************Supprime la croix du Userform****************
Private Declare Function GetWindowLongA Lib "user32" _
(ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLongA Lib "user32" _
(ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Private Declare Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long