Progress Bar sur fichier

[jemiflo]

Voilà mon petit soucis.
Ouverture d'un fichier .CSV que j'importe par "Données" + "Données externes" + Importer des données.
Mon fichier est assez volumineux et donc rien ne se passe sur l'écran. Je désirerais donc inclure dans ma macro une barre de progression.
J'ai beaucopu chercher sur le forum des exemples mais ceux-ci ne correspondent pas à ==> ouverture de fichier.....
Quelqu'un a-t-il un tuyau .... non perçé évidement...!!!

 

[Robby]

Re : Progress Bar sur fichier

Voici la solution que j'utilise.
Bonne chance ;-)

 

[THE CAT 2007]

Re : Progress Bar sur fichier

Bj,

Affiche un texte dans la barre grise en bas à gauche d'excel ....

application.statusbarExemple
Cet exemple montre comment imposer le texte « Please be patient... » à la barre d'état avant l'ouverture du classeur Large.xls, puis rétablir le texte par défaut.

oldStatusBar = Application.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "Please be patient..."
Workbooks.Open filename:="LARGE.XLS"
Application.StatusBar = False
Application.DisplayStatusBar = oldStatusBar

 

[jemiflo]

Re : Progress Bar sur fichier

Merci pour le trés bon tuyau...

 

[jemiflo]

Re : Progress Bar sur fichier

Merci pour ta réponse... c'est quand même dommage que cette status bar ne peut être employée en plein écran...!!!

 

[Excel_lent]

Re : Progress Bar sur fichier

Salut à tous

Vois si tu peux exploiter le fichier joint (Macro Démo, @+Thierry)