Désactiver croix rouge formulaire
Résolu
pou pouille
Messages postés
212
Statut
Membre
-
pou pouille Messages postés 212 Statut Membre -
pou pouille Messages postés 212 Statut Membre -
Bonjour,
je souhaiterais savoir s'il était possible d'enlever (visiblement nan) ou de désactiver la croix rouge en haut d'un formulaire, je souhaite quitter ce formulaire par un bouton et non la croix.
merci de vos réponses.
je souhaiterais savoir s'il était possible d'enlever (visiblement nan) ou de désactiver la croix rouge en haut d'un formulaire, je souhaite quitter ce formulaire par un bouton et non la croix.
merci de vos réponses.
A voir également:
- Désactiver croix rouge formulaire
- Whatsapp formulaire opposition - Guide
- Desactiver rond bleu whatsapp - Guide
- Formulaire de réclamation facebook compte désactivé - Guide
- Telecommande free clignote rouge - Forum Téléviseurs
- Formulaire de reclamation instagram - Guide
4 réponses
En effet (je cherchais dans le menu déroulant quelque chose comme exit...mais mes yeux ont du ratter le queryclose que je ne connaissais pas. Merci beaucoup c'est toujours utile ce genre d'astuce.
re,
je viens de retrouver ce truc sur le site de F.Sigonneau
A pu croix!
je viens de retrouver ce truc sur le site de F.Sigonneau
A pu croix!
'auteur: Laurent Longre
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
Private Sub CommandButton1_Click()
Unload UserForm1
End Sub
Private Sub UserForm_Initialize()
Dim hwnd As Long
hwnd = FindWindowA("Thunder" & IIf(Application.Version Like "8*", _
"X", "D") & "Frame", Me.Caption)
SetWindowLongA hwnd, -16, GetWindowLongA(hwnd, -16) And &HFFF7FFFF
End Sub
