Macro pour supprimer message du presse papier

BREBIOU · 27 Novembre 2006

bonsoir, j'ai une macro faite avec l'enregistreur, elle m'ouvre un fichier texte, copie le contenu et le colle dans une autre feuille.
Quand je ferme le fichier ca me dis que le presse papier contient une grande quantitée d'information et me demande si je veus conserver les données copier dans le presse papier ou si je veu les supprimer, je repond toujour "NON".
Que dois je rajouter à ma macro pour qu'elle reponde automatiquement "NON" ? merci à vous

denisR · 27 Novembre 2006

Re : Macro pour supprimer message du presse papier

bonsoir
as tu essayer de mettre un "displayalerts = false" en debut de macro

a+

BREBIOU · 27 Novembre 2006

Re : Macro pour supprimer message du presse papier

Je vien de rajouter le

displayalerts = false
au debut de la macro ,ca ne change rien
mémé en le mettant à la fin, jai aussi le message.

MichelXld · 27 Novembre 2006

Re : Macro pour supprimer message du presse papier

bonsoir

tu peux tester avant de fermer le fichier:

Code:

Application.CutCopyMode = False

ou en vidant le presse papier:

Code:

'necessite d'activer la référence Microsoft Forms 2.0 Object Library
  Dim oDataObject As DataObject
 
  Set oDataObject = New DataObject
  oDataObject.SetText ""
  oDataObject.PutInClipboard
  Set oDataObject = Nothing

Bonne soirée
MichelXld

Ti_ · 27 Novembre 2006

Re : Macro pour supprimer message du presse papier

salut

Salut
Tu peux aussi tout simplement écrire
Cells(1, 1).Copy: Application.CutCopyMode = False

et ça devrait suffire

BREBIOU · 27 Novembre 2006

Re : Macro pour supprimer message du presse papier

Merci Ti_, avec , Cells(1, 1).Copy: Application.CutCopyMode = False, je n'est plus de message.

bonne soirée

Macro pour supprimer message du presse papier

BREBIOU

XLDnaute Nouveau

denisR

XLDnaute Nouveau

BREBIOU

XLDnaute Nouveau

MichelXld

XLDnaute Barbatruc

Ti_

Nous a quitté

BREBIOU

XLDnaute Nouveau

Discussions similaires