XL 2010 [Résolu]Ouverture de Excel sans aucune barre ni bleue, ni de titre

patricktoulon

XLDnaute Barbatruc

• 8 Décembre 2019

• #2

bonsoir

regarde ce fichier ,clique droite n'importe ou dans une des feuille et clique sur le menu fullscreen
reclique droite puis nofullscreen pour remettre en mode fenêtre

ps; c'est sans api windows!!!!)

 

Pièces jointes

• application fullscreen sans api.xls

  43 KB · Affichages: 30

Vote positif 0 Vote négatif

Valtrase

XLDnaute Occasionnel

• 8 Décembre 2019

• #3

Toubabou à dit:

Bonjour à tous,
Je cherche à ouvrir un fichier excel sans aucunes barres de titre ni ruban. Dans lequel je serais malgré tout obliger de mettre un bouton de fermeture.
Ceci afin de créer un sommaire me permettant d'ouvrir d'autres fichiers.
Merci par avance,
Toubabou

Cliquez pour agrandir...

Salut le fil
En utilisant Application.DisplayFullScreen

VB:

Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 8 Décembre 2019

• #4

re
bonsoir @valtrase pas suffisant le displayfullscreen

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 9 Décembre 2019

• #5

Bonsoir.
Une idée: un UserForm qui fait Application.Visible = False

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 9 Décembre 2019

• #6

bonjour @Dranreb
bonne idée
ou mettre le userform en plein ecran et a - caption de top
les menus seraient effectivement dans le userform
un exemple sans api

 

Pièces jointes

• userform menu plein ecran sans api sans caption ctrl resize.xlsm

  22.4 KB · Affichages: 21

Vote positif 0 Vote négatif

T

Toubabou

XLDnaute Impliqué

• 9 Décembre 2019

• #7

patricktoulon à dit:

bonsoir

regarde ce fichier ,clique droite n'importe ou dans une des feuille et clique sur le menu fullscreen
reclique droite puis nofullscreen pour remettre en mode fenêtre

ps; c'est sans api windows!!!!)

Cliquez pour agrandir...

Bonsor patricktoulon,

C'est exactement ce que je cherche, sauf que j'aurais aimé que cela ce fasse automatiquement à l'ouverture du fichier
Merci par avance

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 9 Décembre 2019

• #8

re
bonjour
ben alors ??
tu lance fullscreen dans le workbook_open

 

Vote positif 0 Vote négatif

Valtrase

XLDnaute Occasionnel

• 9 Décembre 2019

• #9

Salut Toubabou
Tu appelles ton Userform1 dans WorkBook_Open

VB:

Private Sub Workbook_Open()
UserForm1.Show True

End Sub

 

Vote positif 0 Vote négatif

T

Toubabou

XLDnaute Impliqué

• 9 Décembre 2019

• #10

Bonsoir à tous,
Je vous remercie pour vos réponses, mon problèmes est résolu
Merci beaucoup
Toubabou

 

Vote positif 0 Vote négatif