supprimer le cadre excel

[tom]

Coucou,

G une macro qui permet de quitter excel en réinitialisant mes données pour une prochaine ouverture.

Je voudrais donc obliger les utilisateurs d'utiliser ceci et par conséquent les empecher à avoir accès à la croix de fermeture en haut à droite !

Est-ce possible ??

Merci d'avance

 

[gagletor]

Bonjour à tous, bonjour Tom

Google est ton ami

A bientôt

 

[Marc_du_78]

Bonjour tom, gagletor,
essaie ceci, trouvé sur ce Forum :

Coller ce code dans un module

Option Private Module
Declare Function GetWindowLongA Lib 'User32' _
(ByVal hWnd As Long, ByVal nIndex As Long) As Long
Declare Function SetWindowLongA Lib 'User32' _
(ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare Function FindWindowA Lib 'User32' _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long

'Moyen de ne pas avoir la CROIX DE FERMETURE sur les UserForms

Sub PasDeCroix(USF As UserForm)
Dim hWnd As Long
hWnd = FindWindowA('Thunder' & IIf(Application.Version Like '8*', _
'X', 'D') & 'Frame', USF.Caption)
SetWindowLongA hWnd, -16, GetWindowLongA(hWnd, -16) And &HFFF7FFFF
End Sub

Ensuite dans le procedure d'initialisation de ta userform tu mets ca :

Private Sub UserForm_Initialize()
PasDeCroix Me
End Sub

Si tu veux juste désactiver la croix tu peux faire (elle sera toujours visible mais ne fermera plus l'USF)

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then Cancel = True
End Sub

 

[gagletor]

bonjour Marc_du_78

mon fichier ne s'est pas join , mais ca ressemble fortement à ta solution

A bientôt [file name=x.zip size=1037]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/x.zip[/file]

 

[vekmort]

Bonjour,

Ci-joint un fichier exemple.
Bon courage,
Vekmort [file name=Classeur3_20060324104533.zip size=9676]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur3_20060324104533.zip[/file]

 

[tom]

Ouais j'avais trouvé ca aussi mais je m'en sors pas, ca me met des erreurs de partout ou ca ne change rien

Ca serait pas possible que vous me fassiez un exemple concret ?

Merci d'avance, à++

 

[tom]

Merci vekmort mais quand je clique sur ton bouton ca me ferme excel, ce n'est pas ce que je veux, je veux juste empecher qu'on voit la croix de fermeture car g déjà un bouton permettant de quitter mon classeur et de réinitialiser les données

Merci quand meme

Ca serait vraiment bien si qq'un me mettre un exemple concret

à++

 

[gagletor]

re bonjour


Voili voilou


@++ [file name=Classeur1_20060324105459.zip size=8802]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060324105459.zip[/file]

 

[gagletor]

re bonjour


Voili voilou


@++ [file name=Classeur1_20060324105508.zip size=8802]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060324105508.zip[/file]

 

[tom]

Merci mais on les appercoit toujours ces fichu croix de fermeture

 

[tom]

Ah oki on appercoit mais on peut plus fermer excel, c exactement ce que je veux mais pas pour excel mais pour le classeur !

J'espere que je suis pas trop embetant

 

[vekmort]

Re,

On voit la croix, mais on ne peut pas fermer le fichier sans passer par le bouton sur la feuille. Donc, il faudrait coller ta macro de fermeture dans le code de la feuille...
Regarde le code dans la feuille 1, l'annotation est indiquée pour toi...
Dans le classeur3.xls de Vekmort :S

 

[gagletor]

sur ce classeur j'ai tout enlever, barre de menu etc....
Avec un bouton qui permet de fermer excel

Sans oublier de remettre les barres à la fermeture du fichier sinon ca casse les :whistle: à tout le monde

tchuss [file name=Classeur1_20060324111133.zip size=14883]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060324111133.zip[/file]

 

[tom]

Merci beaucoup à vous 2, j'vous embete plus promis

Scuse Vekmort, effectivement ton fichier est pile poil ce que je veux, j'les regardé trop vite.

Bon et ben merci encore, et à ++ , bonne journée

 

[tom]

c dommage gagletor, je ne peux meme pas voir comment t'as fait tes macros