XL 2019 Changer l'écran de démarrage Excel 2019 au lancement

[YAP32]

Bonsoir à tous,

Je voulais savoir y a-t-il une possibilité de changer l'écran de démarrage Excel 2019 pour un fichier bien spécifique je me suis dit si DoneEx avec (Splash image) parvient à le faire il y a peut-être une possibilité de le réaliser avec nos propres moyens.

PS: Je ne veux pas utiliser un userform car celui-ci vient après le démarrage et même si je désactive l'option "Activer l'écran de démarrage au lancement" c'est un userform avec titre je l’ai fait mais pas trop beau

Merci et bonne soirée

Yap32

 

[TooFatBoy]

Le raccourci du zip de #2 ne fait pas l'affaire ?

 

[patricktoulon]

re
serieux c'est si compliqué que ça a comprendre ?
tu le met dans tes documents OK
ben alors met le chemin complet dans le vbs et le vbs reste sur le bureau
c'est pas compliqué

 

[TooFatBoy]

Je pense que tous dépendent du classeur Thisworkbook et du Private Sub Workbook_Open()

Non, le splashscreen n'a rien à voir avec le classeur à mon avis, puisqu'il est affiché avant.

Quand j'essaie sur un fichier vide ça fonctionne parfaitement comme dans l'exemple mais avec mon classeur j'ai la fenêtre Execel avec les cellules passe en premier plan.

Là en revanche je pense que ça dépend du fichier, en particulier du temps de chargement.
Et c'est aussi pour ça que je demandais : "Ta Workbook_Open() commence bien par Application.Visible = False dès la première instruction, suivie de l'affichage de ton UserForm ?.

 

[TooFatBoy]

Je suis OK pour le fichier mais pour le temps de chargement mon fichier comme n'importe quel fichier Excel s'ouvre immédiatement càd le userform passe après.

Non, tous les fichiers Excel ne se chargent pas à la même vitesse.

Mais si ton fichier se charge instantanément, tu ne devrais pas avoir de problème.
C'est vraiment étrange.

 

[patricktoulon]

dans mon exemple
le application .visible=false c'est le vbs qui s'en charge
le visible=true c'est a la fermeture du userform dans le xlsm
pigé? ou i faut que je face les deux fichiers exemple ?

 

[TooFatBoy]

C'est ce que je suis en train d'expliquer.

C'est pas flagrant.


Bonne chance pour la suite
@+

 

[patricktoulon]

re
dézipe ca dans tes documents ou ou tu veux (les deux au même endroit)
ensuite dans le dossier ou tu les a mis ,clique droit sur le vbs / envoyer vers / raccourci vers le bureau
le raccourci sur le bureau tu peux lui mettre l'icon que tu veux après
terminé

 

[patricktoulon]

re

c=wscript.ScriptFullname
c=mid(c,1 ,instrrev(c,"\"))


with createobject("excel.application")
.visible=false
set w=.workbooks.open(c &"No_Splash.xlsm")
'wscript.sleep 300
w.sheets(1).activate

end with

 

[fanch55]

re
dézipe ca dans tes documents ou ou tu veux (les deux au même endroit)
ensuite dans le dossier ou tu les a mis ,clique droit sur le vbs / envoyer vers / raccourci vers le bureau
le raccourci sur le bureau tu peux lui mettre l'icon que tu veux après
terminé

Salut Patrick,

Un petit phénomène avec le vbs, tout au moins sur mon pc: le splashscreen reste en backstage
L'appel via cmd fonctionne correctement

 

[patricktoulon]

Bonjour
@fanch55 je ne sais pas chez moi(2013) le userform se ferme âpres un moment il reste pas en backstage

je vois pas trop ce que le vbs a a voir la dedans il lance juste une app instance et le classeur


le reste c'est le fichier

chez moi le cmd même avec le splach (écran de demarrage") décoché (sur 2013)
le splach apparaît quand même mais moins longtemps

le but avec le vbs c'est d'ouvrir d'abords une instance de excel (en invisible)
et d'ouvrir le fichier dans cette instance
de la même manière que on le ferait dans vba (le code c'est le même)

il ne fait rien d'autre
le vbs

1. ouvre un instance excel (invisible)
2. ouvre le fichier dans l'instance
3. il se ferme aussitôt

le fichier

1. ouvre le userform dans le workbook open

le userform

1. dans son queryclose rend visible l'application

 

[TooFatBoy]

@fanch55 je ne sais pas chez moi(2013) le userform se ferme âpres un moment il reste pas en backstage

Oui, comme chez tout le monde, logiquement.
Le monsieur n'a pas dit le contraire, ou alors j'ai pô pigé quoi qu'il a dit...

 

[patricktoulon]

Oui, comme chez tout le monde, logiquement.
Le monsieur n'a pas dit le contraire, ou alors j'ai pô pigé quoi qu'il a dit...

Bonjour @TooFatBoy
ben si justement il dit le contraire

 

[TooFatBoy]

Bonjour @TooFatBoy
ben si justement il dit le contraire

Non, je ne crois pas qu'il dise que le splashscreen ne se ferme pas.

Ah, mais je vois qu'il est là. Il va pouvoir t'expliquer lui-même.

 

[fanch55]

Bonjour @TooFatBoy
ben si justement il dit le contraire

Non,non,
je veux dire qu'en Vbs, Excel reste en backstage tant qu'on n'a pas cliqué dessus,
la fenêtre active reste l'explorateur contenant le vbs .

 

[patricktoulon]

re
le cmd ne fait pas le travail puisque le splatch d'origine apparait quand même chez moi
comme il ne met pas l'application visible à false (c'est le code dans le classeur qui le fait) alors effectivement le getwindowlong de l'app reste on top
mais chez moi j'ai les deux splatch