Masquer message pdt execution MACRO

[TOFatJOB]

Bonjour,

j'ai une macro qui ouvre lit puis ferme 8 fichiers pour faire une consolidation. Le souci :

à chaque fermeture, j'ai une fenêtre avec message :

"Le presse papier contient ..." auquel je répond "NON"

Comment : ne pas afficher ce message, ou y répondre "NON" automatiquement ?

Merci de votre aide.

 

[JNP]

Re : Masquer message pdt execution MACRO

Bonjour TofAtJob 🙂,

application.DisplayAlerts = False

en début de macro, à remettre à True en fin de macro 😉.
Bonne journée 😎

 

[TOFatJOB]

Re : Masquer message pdt execution MACRO

Bonjour JNP,

c'est OK, je n'ai plus l'affichage, toutefois, le temps de traitement est considérablement augmenté, je pense que la mémoire reste pleine entre 2 fichiers .

Comment peut-on vider le presse papier entre 2 lectures ?

Mes fichiers sont très lourds.... le fichier de synthèse fait 30.000 lignes


Merci encore

 

[pierrejean]

Re : Masquer message pdt execution MACRO

Bonjour TOFatJOB

Apres copie vider le presse-papier

Methode
En debut de module:

Private Declare Function OpenClipboard Lib "user32" _
    (ByVal hwnd As Long) As Long
Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function CloseClipboard Lib "user32" () As Long

puis la sub:

Sub ViderPresse_Papier()
    OpenClipboard 0
    EmptyClipboard
    CloseClipboard
End Sub

Edit:Salut JNP