Pleine page
Résolu/Fermé
CRCA79
Messages postés
82
Date d'inscription
jeudi 16 juin 2016
Statut
Membre
Dernière intervention
8 décembre 2020
-
28 oct. 2019 à 17:01
JCB40 Messages postés 2878 Date d'inscription lundi 2 juillet 2018 Statut Membre Dernière intervention 14 avril 2024 - 29 oct. 2019 à 16:04
JCB40 Messages postés 2878 Date d'inscription lundi 2 juillet 2018 Statut Membre Dernière intervention 14 avril 2024 - 29 oct. 2019 à 16:04
A voir également:
- Pleine page
- Supprimer une page word - Guide
- Page d'accueil iphone - Guide
- Traduire une page web - Guide
- Boite mail pleine - Guide
- Créer une page facebook - Guide
4 réponses
Raymond PENTIER
Messages postés
58389
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
18 avril 2024
17 090
28 oct. 2019 à 17:08
28 oct. 2019 à 17:08
Bonjour.
La mise en page s'applique à toute la feuille ; toutes les pages composant cette feuille ont donc la même apparence et le même affichage.
La mise en page s'applique à toute la feuille ; toutes les pages composant cette feuille ont donc la même apparence et le même affichage.
JCB40
Messages postés
2878
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 avril 2024
461
Modifié le 28 oct. 2019 à 18:02
Modifié le 28 oct. 2019 à 18:02
Bonsoir
Code a mettre dans ThisWorkBooK de ton classeur
Cordialement
Private Sub Workbook_Open()
Worksheets(1).Activate
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Select Case Sh.Index
Case 2
Application.DisplayFullScreen = True
' Masquer les en-têtes
ActiveWindow.DisplayHeadings = False
' Masquer les barres de défilement
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Case Else
Application.DisplayFullScreen = False
' Masquer les en-têtes
ActiveWindow.DisplayHeadings = True
' Masquer les barres de défilement
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
End Select
End Sub
Code a mettre dans ThisWorkBooK de ton classeur
Cordialement
Private Sub Workbook_Open()
Worksheets(1).Activate
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Select Case Sh.Index
Case 2
Application.DisplayFullScreen = True
' Masquer les en-têtes
ActiveWindow.DisplayHeadings = False
' Masquer les barres de défilement
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Case Else
Application.DisplayFullScreen = False
' Masquer les en-têtes
ActiveWindow.DisplayHeadings = True
' Masquer les barres de défilement
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
End Select
End Sub
CRCA79
Messages postés
82
Date d'inscription
jeudi 16 juin 2016
Statut
Membre
Dernière intervention
8 décembre 2020
29 oct. 2019 à 09:46
29 oct. 2019 à 09:46
Bonjour, mais c'est quoi le "ThisWorkBooK" .....
JCB40
Messages postés
2878
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 avril 2024
461
29 oct. 2019 à 11:06
29 oct. 2019 à 11:06
Bonjour
Tu ouvres ton dossier tu cliques sur les touches Alt+ F11 ,une page blanche apparait sur sa gauche
tu vas voir le nom de tes feuilles et ThisWorkBooK ,tu cliques dessus ,tu colles le code dans la feuille blanche et tu enregistres ton fichier au format xlsm.
Tu reviens si problème
Cordialement
Tu ouvres ton dossier tu cliques sur les touches Alt+ F11 ,une page blanche apparait sur sa gauche
tu vas voir le nom de tes feuilles et ThisWorkBooK ,tu cliques dessus ,tu colles le code dans la feuille blanche et tu enregistres ton fichier au format xlsm.
Tu reviens si problème
Cordialement
CRCA79
Messages postés
82
Date d'inscription
jeudi 16 juin 2016
Statut
Membre
Dernière intervention
8 décembre 2020
29 oct. 2019 à 11:42
29 oct. 2019 à 11:42
Désolée mais cela ne fonctionne pas ... Le format xlsm c'est le format excel supportant les macros, c'est cela ... Par contre pour activer la macro, il ne faut pas faire quelque chose ...... Merci.
JCB40
Messages postés
2878
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 avril 2024
461
29 oct. 2019 à 11:59
29 oct. 2019 à 11:59
il n'y a rien a faire pour activer la macro change de feuille et tu verras que la feuille 2 va passer en plein écran
Le format xlsm c'est le format excel supportant les macros
Le format xlsm c'est le format excel supportant les macros
CRCA79
Messages postés
82
Date d'inscription
jeudi 16 juin 2016
Statut
Membre
Dernière intervention
8 décembre 2020
29 oct. 2019 à 14:20
29 oct. 2019 à 14:20
ok merci
JCB40
Messages postés
2878
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
14 avril 2024
461
>
CRCA79
Messages postés
82
Date d'inscription
jeudi 16 juin 2016
Statut
Membre
Dernière intervention
8 décembre 2020
29 oct. 2019 à 16:04
29 oct. 2019 à 16:04
Tu dis ok merci
C'est bien mais es-tu parvenu à ce que cela fonctionne?
C'est bien mais es-tu parvenu à ce que cela fonctionne?
28 oct. 2019 à 17:11