XL 2019 Masquer message "Téléchargement"

[YGBerard]

Bonjour à tous
J'ai une macro qui ouvre des fichiers dans un repertoire pour en extraire des informations.
J'ai reussi à ne pas avoir à l'ecran le fichier qui s'ouvre.
Par conte, j'ai toujours le message : "Telechargement de ..... en cours" qui apparait.
Comment faire pour ne plus le voir ?

 

[patricktoulon]

Bonjour
Attends 2 minutes que j'astique ma boule de cristal
non sérieux comment veux tu que l'on t'aide si tu donne pas plus de detail
le répertoire il est ou?
le type de fichier c'est quoi?
le code que tu utilise il est ou ?
etc..etc...

 

[YGBerard]

Bonjour
Je travail en VPN dans le repertoire de ma boite
Le fichier est un fichier EXCEL
Et j'utilise du VBA

Voici une partie du code

Fichier = Dir(Repertoire & "*.xls*") 'Mémorisation du type de fichier à lire (EXCEL)
While Not Fichier = "" 'Comptabilise le nombre de fichiers à traiter
Nb_fic = Nb_fic + 1

info.Show 0
info.Txt_info.Caption = "Comptage des fichiers à traiter " & ": " & Nb_fic

Set Source = Workbooks.Open(Repertoire & Fichier) 'Ouverture et memorisation du fichier à analyser
Call Conforme 'Verification du formatage du fichier
Source.Close False 'Fermeture du fichier source

Fichier = Dir
Wend

 

[patricktoulon]

le code !!!

 

[YGBerard]

Fichier = Dir(Repertoire & "*.xls*") 'Mémorisation du type de fichier à lire (EXCEL)
While Not Fichier = "" 'Comptabilise le nombre de fichiers à traiter
Nb_fic = Nb_fic + 1

info.Show 0
info.Txt_info.Caption = "Comptage des fichiers à traiter " & ": " & Nb_fic

Set Source = Workbooks.Open(Repertoire & Fichier) 'Ouverture et memorisation du fichier à analyser
Call Conforme 'Verification du formatage du fichier
Source.Close False 'Fermeture du fichier source

Fichier = Dir
Wend

 

[patricktoulon]

a oui mais non!!!!!
on ne modifie pas un fichier dans une boucle dire
réfléchi un peu
tu ouvre ton fichier dans la boucle dir , tu le modifie, et tu le ferme il n'a donc plus la meme place dans le disque dur selon l'ordre de l'attribut lastmodified
c'est pas comme sela que l'on fait
on boucle dir et stock les chemin dans un tableau ou un array et apres seulement !!!!! on boucle sur le tableau(array) pour modifier les fichiers
tu m’étonne que ton acces vba disque souffre le martyr et te met un message d'attente de téléchargement pour peu que ton resau avance comme une tortue ben ....t'es chocolat
voila

 

[YGBerard]

Ah ok, tu viens de repondre à un autre probleme merci...
Mais cela ne me dit pas comment ne pas avoir à l'ecran le message "Telecharchement de....en cours"

 

[patricktoulon]

fait comme je te dis et tu l'aura déjà moins souvent après il n'y a rien qui puisse accélérer ton réseau a part le webmaster de ta boite
le message que tu a est un message windows et n'a donc rien a voir avec VBA

 

[YGBerard]

Ah ok
Je vais modifier mon code...
Merci