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

YAP32

XLDnaute Occasionnel
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
 
Dernière édition:
Solution
Bonjour
un xla dans le xlstart ????
a ben ça c'est une drôle d'idée
ne te reste plus qu'a activer ton xla dans le fichier alors

met ceci dans un module
VB:
Sub AddRefXla()

    chemin_xla = environ("appdata")&"\Microsoft\Excel\XLSTART\samradapps_datepicker.xlam"

    On Error Resume Next
    ThisWorkbook.VBProject.References.AddFromFile (chemin_xla)


End Sub

et dans le workbook_open
VB:
AddRefXla

il faut que la référence
microsoft visual basic for application extensibility 5.x soit activée

fanch55

XLDnaute Barbatruc
@fanch55
on a quand meme l'ecran de demarrage excel
Salut Patrick,
Office 2019 pas de pb :
Lancement normal du classeur :
yap.gif
Lancement du classeur via le raccourci :
yap2.gif

Bien paramétrer le raccourci :
1669657056441.png
 

Deadpool_CC

XLDnaute Accro

Deadpool_CC

XLDnaute Accro
Sinon possible aussi de le désactiver dans les options d'Excel :
1669657973424.png


Et il n'y a plus qu'à faire ton propre "userform" qui s'affiche au démarrage. que tu peux glisser dans le répertoire de démarrage d'Excel pour qu'il s'ouvre à chaque fois et se referme après une tempo.
 

Deadpool_CC

XLDnaute Accro
re...
je suis sur 2016 et en effet le Splash apparait toujours, par contre cela cahrge un fichier vide par defaut aulieu de présenter le bel écran pour choisir le fichier de modèle à ouvrir ... ils ont détourné la fonction ... désolé pour la mauvaise info.
 

fanch55

XLDnaute Barbatruc
Bonsoir le forum,

Static AI - Suspicious Archive
Trojan.Link.CmdRunner
Regarde la pièce jointe 1156699
Est-ce que c'est dangereux ?

Merci
@+
VirusTotal considère les appel à Cmd comme un cheval de Troie potentiel .
Les macros Excel aussi sont dangereuses et n'ont pas été détectées par VirusTotal !!!
Norton ne détecte rien d'anormal dans le zip :
1669662141988.png
 

patricktoulon

XLDnaute Barbatruc
l'idée de fanch 55 est tres bien mais il faut déactiver l’écran d’accueil sur 2013
sur des gros fichiers un peu long a charger
on pourrait avoir l'impression que le fichier ne s'ouvre pas avant de voir le userform avec son image
je vais m'intérésser a cela voir ou se trouve ce popup dans les dll
 

Deadpool_CC

XLDnaute Accro
re...
ben dans le fil je pensais que c'était clair, après version 2013, il ont changer les écrans de démarrage avec Splash et fenêtre de choix d'un doc. ou modèle.
L'option dans Excel cache juste la fenêtre de choix mais plus aucun moyen d'intervenir sur le Splash sauf à utiliser le raccourci explqué en #5 mais c'est pour un Fichier.
Peut-être une bidouille possible en base de registre mais si c'est le cas je saisi pas :)
 

patricktoulon

XLDnaute Barbatruc
tiens je suis allé le chercher au fin fond de mes vielles archives
dans un blocknot colle ceci
bien sur met le bon chemin complet du classeur
VB:
with createobject("excel.application")
.visible=false
.workbooks.open("C:\Users\patrick\Desktop\No_Splash.xlsm")
wscript.sleep 300
.visible=true
end with
et enlève tout les visible = false du classeur c'est le vbs qui se charge de tout
quand tu a coller ça dans le blocknot sauve le en raccourciblablabla.vbs
n'oublie pas sélectionne tout fichier avant d'enregistrer sinon ca va t'enregistrer blablabla.vbs.txt
 

TooFatBoy

XLDnaute Barbatruc
Bonjour,

Cependant j'ai un souci qui continu. Juste avant l'affichage du Splash screen "userform" j'ai ma fenêtre du classeur Excel qui s'affiche quelques secondes puis disparaît et le splash screen arrive 4 secondes et mon classeur s'ouvre. Comment enlever l'affichage précoce du classeur.
Ta Workbook_Open() commence bien par Application.Visible = False dès la première instruction, suivie de l'affichage de ton UserForm ?
 

TooFatBoy

XLDnaute Barbatruc
Le Splash Screen c'est celui qui est présenté dès qu'on clique sur excel ou un classeur,
c'est à peu près l'image ci-contre qui chez moi est très rapide à disparaitre et je pense que c'est de celui-là dont on discute
Il est bien question su splashscreen au départ, mais en #21 il est question, je crois, de la fenêtre d'Excel (celle où on voit les feuilles) , c'est-à-dire celle qu'on peut apercevoir pendant le chargement du fichier :
Cependant j'ai un souci qui continu. Juste avant l'affichage du Splash screen "userform" j'ai ma fenêtre du classeur Excel qui s'affiche quelques secondes puis disparaît et le splash screen arrive 4 secondes et mon classeur s'ouvre. Comment enlever l'affichage précoce du classeur.
 

patricktoulon

XLDnaute Barbatruc
Bonjour
je répète
dans un blocknote et enregistré en ".VBS"
ce bloque not est au meme endroit que le classeur
VB:
c=wscript.ScriptFullname
c=mid(c,1 ,instrrev(c,"\"))


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

.visible=true
end with
démonstration du résultat
demo.gif
 

Discussions similaires

Statistiques des forums

Discussions
312 211
Messages
2 086 299
Membres
103 172
dernier inscrit
Aurelyan