masquer le déroulement d'une macro

Question

Bonjour,
est-il possible de masquer le déroulement d'une macro sous excelpendant son exécution, cad qu'on ne voit pas les cellules sélectionnées, les déplacements dans la feuille...et par exemple de faire afficher une boite disant que c'est en execution
Merci d'avance

orion · Answer

-------------------------------
 Réponse au message :          
-------------------------------

Bonjour,
est-il possible de masquer le déroulement d'une macro sous excelpendant son exécution, cad qu'on ne voit pas les cellules sélectionnées, les déplacements dans la feuille...et par exemple de faire afficher une boite disant que c'est en execution
Merci d'avance

orion · Answer

-------------------------------
 Réponse au message :          
-------------------------------
Oui en faisant 
oldStatusBar = Application.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "En Cours..." 'dans la barre d'etat

application.screenupdating=false
et a la fin:application.screenupdating=true
Application.StatusBar =oldStatusBar 

-------------------------------
 Réponse au message :          
-------------------------------

Bonjour,
est-il possible de masquer le déroulement d'une macro sous excelpendant son exécution, cad qu'on ne voit pas les cellules sélectionnées, les déplacements dans la feuille...et par exemple de faire afficher une boite disant que c'est en execution
Merci d'avance

MxAxNxUx · Answer

Bonjour,
je rencontre des petits soucis
VBA sous Excel 97
Pas moyen d'utiliser FileSearch "convenablement" dans une boucle
Voilà,j'ai 

filesearch.lookin="c:"
filesearch.filename="fichier1

Au premier passage, pas de soucis  
Filesearch.execute()
Que le fichier soit présent ou pas l'execute fonctionne
formidablement

Après ca se complique dès que je veux faire une modif :
filesearch.lookin="c:\Folder1"
filesearch.filename="fichier2"

Le debuggeur m'indique que le .filename est modifié par contre le .Lookin, et ben pas moyen
même après un .NewSearch.

Peut être que ....
Merci d'avance 
Emmanuel

Orion · Answer

une idee comme ça vite fait:

With Application.FileSearch
    .NewSearch
    .LookIn = "C:"    .SearchSubFolders True     .Filename "tesfichiers"
End With

'avec SearchSubFolders tu n'as pas besoin de 
'changer le lookin

Masquer le déroulement d'une macro

4 réponses

Discussions similaires