mon code en plein ecran est:
Application.DisplayFullScreen
= True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein
ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir
egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
LSteph
Bonsoir, Si tu veux tout cacher tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me .StartUpPosition = 1 .Width = Application.Width .Height = Application.Height End With End Sub
lSteph
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
Bonsoir,
Si tu veux tout cacher
tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me
.StartUpPosition = 1
.Width = Application.Width
.Height = Application.Height
End With
End Sub
lSteph
"PHIL" <PHIL@discussions.microsoft.com> a écrit dans le message de news:
A527BF9E-D207-4972-B9AB-E793FA7E9FAD@microsoft.com...
bonjour,
mon code en plein ecran est:
Application.DisplayFullScreen
= True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le
plein
ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas
voir
egalement qand je suis en plein écran le menu(fichier, edition,
insrtion....)
Bonsoir, Si tu veux tout cacher tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me .StartUpPosition = 1 .Width = Application.Width .Height = Application.Height End With End Sub
lSteph
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
PHIL
je peux pas mettre un userform, je veux juste maquer fichier insertion supprimer..... ou tout mettre en plein ecran
merci
Bonsoir, Si tu veux tout cacher tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me .StartUpPosition = 1 .Width = Application.Width .Height = Application.Height End With End Sub
lSteph
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
je peux pas mettre un userform,
je veux juste maquer fichier insertion supprimer.....
ou tout mettre en plein ecran
merci
Bonsoir,
Si tu veux tout cacher
tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me
.StartUpPosition = 1
.Width = Application.Width
.Height = Application.Height
End With
End Sub
lSteph
"PHIL" <PHIL@discussions.microsoft.com> a écrit dans le message de news:
A527BF9E-D207-4972-B9AB-E793FA7E9FAD@microsoft.com...
bonjour,
mon code en plein ecran est:
Application.DisplayFullScreen
= True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le
plein
ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas
voir
egalement qand je suis en plein écran le menu(fichier, edition,
insrtion....)
je peux pas mettre un userform, je veux juste maquer fichier insertion supprimer..... ou tout mettre en plein ecran
merci
Bonsoir, Si tu veux tout cacher tu peux creer un userform et mettre ceci dedans
Private Sub UserForm_Initialize()
With Me .StartUpPosition = 1 .Width = Application.Width .Height = Application.Height End With End Sub
lSteph
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
ChrisV
Bonjour Phil,
Dans la feuille de code de ThisWorkbook...
Private Sub Workbook_Open() Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = False Next cmdB With Application .DisplayFormulaBar = False End With End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = True Next cmdB With Application .DisplayFormulaBar = True End With End Sub
ChrisV
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
Bonjour Phil,
Dans la feuille de code de ThisWorkbook...
Private Sub Workbook_Open()
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = False
Next cmdB
With Application
.DisplayFormulaBar = False
End With
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = True
Next cmdB
With Application
.DisplayFormulaBar = True
End With
End Sub
ChrisV
"PHIL" <PHIL@discussions.microsoft.com> a écrit dans le message de news:
A527BF9E-D207-4972-B9AB-E793FA7E9FAD@microsoft.com...
bonjour,
mon code en plein ecran est:
Application.DisplayFullScreen
= True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le
plein
ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas
voir
egalement qand je suis en plein écran le menu(fichier, edition,
insrtion....)
Private Sub Workbook_Open() Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = False Next cmdB With Application .DisplayFormulaBar = False End With End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = True Next cmdB With Application .DisplayFormulaBar = True End With End Sub
ChrisV
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met bien en plein ecran,avec une boite de dialogue qui m'indique fermer le plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas voir egalement qand je suis en plein écran le menu(fichier, edition, insrtion....)
merci
Modeste
Haué Chris !! hépela ! itokaghata wichasha, yé shni yo kiphi "PHIL" !!! @+
-----Message d'origine----- Bonjour Phil,
Dans la feuille de code de ThisWorkbook...
Private Sub Workbook_Open() Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = False Next cmdB With Application .DisplayFormulaBar = False End With End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = True Next cmdB With Application .DisplayFormulaBar = True End With End Sub
ChrisV
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le
plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas
voir egalement qand je suis en plein écran le menu(fichier, edition,
insrtion....)
merci
.
Haué Chris !!
hépela !
itokaghata wichasha, yé shni yo kiphi "PHIL" !!!
@+
-----Message d'origine-----
Bonjour Phil,
Dans la feuille de code de ThisWorkbook...
Private Sub Workbook_Open()
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = False
Next cmdB
With Application
.DisplayFormulaBar = False
End With
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim cmdB As CommandBar
For Each cmdB In Application.CommandBars
cmdB.Enabled = True
Next cmdB
With Application
.DisplayFormulaBar = True
End With
End Sub
ChrisV
"PHIL" <PHIL@discussions.microsoft.com> a écrit dans le
message de news:
Haué Chris !! hépela ! itokaghata wichasha, yé shni yo kiphi "PHIL" !!! @+
-----Message d'origine----- Bonjour Phil,
Dans la feuille de code de ThisWorkbook...
Private Sub Workbook_Open() Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = False Next cmdB With Application .DisplayFormulaBar = False End With End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cmdB As CommandBar For Each cmdB In Application.CommandBars cmdB.Enabled = True Next cmdB With Application .DisplayFormulaBar = True End With End Sub
ChrisV
"PHIL" a écrit dans le message de news:
bonjour,
mon code en plein ecran est: Application.DisplayFullScreen = True
que je met dans le thisworkbook,mais à l'ouverture du classeur , il se met
bien en plein ecran,avec une boite de dialogue qui m'indique fermer le
plein ecran, je voudrai que celle ci soit désactiver, et que je ne puisse pas
voir egalement qand je suis en plein écran le menu(fichier, edition,
insrtion....)
merci
.
AV
Pffff... Mais qu'est ce tu fais là toi ? T'aurais pu envoyer un sms ! ;-)
AV
Pffff...
Mais qu'est ce tu fais là toi ?
T'aurais pu envoyer un sms ! ;-)
J'ai bien essayé durant décembre... mais apparemment, il y avait des perturbations sur MPFE !!! Pfff... :-(
ChrisV
"AV" a écrit dans le message de news: uW%23SMAY%
Pffff... Mais qu'est ce tu fais là toi ? T'aurais pu envoyer un sms ! ;-)
AV
Monique Brunel
Hau ChrisV :-) tokeske yaun he ?
-- Amicalement, Monique en campagne pour des sites conformes aux standards et accessibles... http://www.webmaster-hub.com/ et http://www.opquast.org/ avec des navigateurs évolutifs http://www.mozilla-europe.org/ Pour les amateurs d'athlétisme : http://users.skynet.be/osga/
Salut Alain,
J'ai bien essayé durant décembre... mais apparemment, il y avait des perturbations sur MPFE !!! Pfff... :-(
ChrisV
Hau ChrisV :-)
tokeske yaun he ?
--
Amicalement,
Monique
en campagne pour des sites conformes aux standards et accessibles...
http://www.webmaster-hub.com/ et http://www.opquast.org/
avec des navigateurs évolutifs http://www.mozilla-europe.org/
Pour les amateurs d'athlétisme : http://users.skynet.be/osga/
Salut Alain,
J'ai bien essayé durant décembre...
mais apparemment, il y avait des perturbations sur MPFE !!!
Pfff... :-(
-- Amicalement, Monique en campagne pour des sites conformes aux standards et accessibles... http://www.webmaster-hub.com/ et http://www.opquast.org/ avec des navigateurs évolutifs http://www.mozilla-europe.org/ Pour les amateurs d'athlétisme : http://users.skynet.be/osga/
Salut Alain,
J'ai bien essayé durant décembre... mais apparemment, il y avait des perturbations sur MPFE !!! Pfff... :-(