OVH Cloud OVH Cloud

Bouton fermeture

3 réponses
Avatar
Jacquouille
Bonjour
Depuis le téléchargement d'un jeu de bowling sur Excel (merci Gilbert), j'ai
perdu le bouton de fermeture (le X) du logiciel, pas celui du fichier, qui
est dans le coin supérieur droit.
De plus, la barre (d'ascenseur ??) horizontale a disparu.
Je en pense pas que ce soit une différence de format d'affichage car tout le
reste a les même dimensions qu'avant.
Avez-vous une idée pour me rétablir cela?
Un tout grand merci à tous sauf à Gilbert.
Qu'il soit banni jusqu'à la centième génération des logiciels XL.-)
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

3 réponses

Avatar
anonymousA
Bonjour,

comme ca peut-être ?

Private Const MF_BYPOSITION As Long = &H400
Private Const mlNUM_SYS_MENU_ITEMS As Long = 9
Private Declare Function GetSystemMenu Lib "user32" _
(ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function DeleteMenu Lib "user32" _
(ByVal hMenu As Long, ByVal nPosition As Long, _
ByVal wFlags As Long) As Long
Private Declare Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, ByVal lpWindowName _
As String) As Long

'rétablit le menu sytème et les commandes de fenêtre (Réduire, Agrandir,
Fermer)
Public Sub EnableSystemMenu()
Dim lHandle As Long
On Error Resume Next
lHandle = FindWindowA(vbNullString, Application.Caption)
GetSystemMenu lHandle, True
End Sub

A+

Bonjour
Depuis le téléchargement d'un jeu de bowling sur Excel (merci Gilbert), j'ai
perdu le bouton de fermeture (le X) du logiciel, pas celui du fichier, qui
est dans le coin supérieur droit.
De plus, la barre (d'ascenseur ??) horizontale a disparu.
Je en pense pas que ce soit une différence de format d'affichage car tout le
reste a les même dimensions qu'avant.
Avez-vous une idée pour me rétablir cela?
Un tout grand merci à tous sauf à Gilbert.
Qu'il soit banni jusqu'à la centième génération des logiciels XL.-)


Avatar
anonymousA
pour les scrollbars, essayer

Application.DisplayScrollBars = True

A+

Bonjour
Depuis le téléchargement d'un jeu de bowling sur Excel (merci Gilbert), j'ai
perdu le bouton de fermeture (le X) du logiciel, pas celui du fichier, qui
est dans le coin supérieur droit.
De plus, la barre (d'ascenseur ??) horizontale a disparu.
Je en pense pas que ce soit une différence de format d'affichage car tout le
reste a les même dimensions qu'avant.
Avez-vous une idée pour me rétablir cela?
Un tout grand merci à tous sauf à Gilbert.
Qu'il soit banni jusqu'à la centième génération des logiciels XL.-)


Avatar
Jacquouille
Bonsoir
Ben voilà, tout est rentré dans l'ordre.
Suffisait d'un peu d'autorité !
Merci pour ce bon renseignement
Jacques.

--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"anonymousA" a écrit dans le message de news:
44bd2c91$0$894$
pour les scrollbars, essayer

Application.DisplayScrollBars = True

A+

Bonjour
Depuis le téléchargement d'un jeu de bowling sur Excel (merci Gilbert),
j'ai perdu le bouton de fermeture (le X) du logiciel, pas celui du
fichier, qui est dans le coin supérieur droit.
De plus, la barre (d'ascenseur ??) horizontale a disparu.
Je en pense pas que ce soit une différence de format d'affichage car tout
le reste a les même dimensions qu'avant.
Avez-vous une idée pour me rétablir cela?
Un tout grand merci à tous sauf à Gilbert.
Qu'il soit banni jusqu'à la centième génération des logiciels XL.-)