Discussion :

[Excel_man]

Bonjour,
Je cherche a embellir la page de démarrage d'un fichier excel ou la principale action est de cliquer sur un bouton qui vas lancer une macro.
Pour faire plus "Pro", j'aimerais pouvoir mettre une image en fond et regrouper les quelques actions dans un bandeau supérieur du type MENU FICHIER.
Merci d'avance pour vos suggestions.
Edit: Comme je ne savais trop par ou commencer, j'attendais(naïvement) qu'on me propose un exemple.
Du coup, j'ai commencé une feuille en figeant les volet jusqu'en bas a droite pour avoir un affichage fixe. J'ai matérialiser un bandeau comme un menu (ça fait un ridicule d'avoir juste un gros bouton au milieu de la page) dans lequel je concentrerais mes actions. J'aimerais savoir comment lors de l'ouverture du fichier je pourrais forcer l'affichage en plein écran et désactiver barre de formule et titre. Je suis preneur de toute autres suggestions.

[Excel_man]

Bonjour,
Juste pour donner quelques nouvelles de mes recherches, j'ai finis par trouver les codes permettant un affichage minimaliste qui permettait de faire oublier a l'utilisateur l’environnement excel: plein écran + pas d'onglet + pas de barre de défilement + pas d'en-têtes.
Il faut lancer dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Workbook_Open()
' Masquer le quadrillage
    ActiveWindow.DisplayGridlines = False
' Masquer les en-têtes
    ActiveWindow.DisplayHeadings = False
' Masquer les barres de défilement
    ActiveWindow.DisplayHorizontalScrollBar = False
    ActiveWindow.DisplayVerticalScrollBar = False
' Masquer les onglets de classeur
    ActiveWindow.DisplayWorkbookTabs = False
' Mettre en plein ecran
Application.DisplayFullScreen = True
End Sub

et pour tout remettre en place, il faut lancer dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Workbook_BeforeClose(Cancel As Boolean)
' Démasquer le quadrillage
    ActiveWindow.DisplayGridlines = True
' Démasquer les en-têtes
    ActiveWindow.DisplayHeadings = True
' Démasquer les barres de défilement
    ActiveWindow.DisplayHorizontalScrollBar = True
    ActiveWindow.DisplayVerticalScrollBar = True
' Démasquer les onglets de classeur
    ActiveWindow.DisplayWorkbookTabs = True
' Sortir du plein ecran
Application.DisplayFullScreen = False
'Application.WindowState = xlMaximized 'pour maximiser la fenetre
End Sub

Après quelques essais, je me demande si l'utilisateur ne vas pas être pénaliser par toutes ces restrictions surtout si il travail sur plusieurs fichiers Excel en même temps.
L'autre solution envisagé c'est d'ouvrir en plein écran un useform avec mon bouton + un peu de déco J'ai pas finis mais je vous montre le code que j'ai trouvé sur le net:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Workbook_Open()
UserForm1.Show 0
End Sub
 
Private Sub UserForm_initialize()
Application.WindowState = xlMaximized
With Me
     .StartUpPosition = 3
     .Width = Application.Width
     .Height = Application.Height
     .Left = 0
     .Top = 0
End With
End Sub

Je me souhaite du courrage et je me remerci pour mon aide

[Excel_man]

Bonjour,
Je continu donc mon projet: afficher des l'ouverture un userform en plein écran avec des boutons permettant de lancer une macro ainsi que de paramétrer diverses options.
Pour occuper l'espace restant, j’affiche une image histoire de rejoindre l’utile à l’agréable. Enfin une vrai question pour les pros: Comment faire pour gérer le rapport d'aspect de cette image en fonction des différentes résolution? Est-il possible aussi de faire évoluer a taille des boutons et du texte?