Excel vba - vider le presse papier

ccm81 Messages postés 11033 Statut Membre -  
 Utilisateur anonyme -
Bonjour,

Bonjour,

je suis sous excel 2002
je n'arrive pas à vider le presse papier, j'ai tenté
1. la simplicité
Application.CutCopyMode = False
2. une procedure donnée par eric
https://forums.commentcamarche.net/forum/affich-23747102-excel-ne-peut-vider-le-presse-papier
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     
Sub VidePP()     
    OpenClipboard 0     
    EmptyClipboard     
    CloseClipboard     
End Sub 

mais quand je quitte excel, mon presse papier n'est toujours pas vidé
y a t'il une solution?

merci

1 réponse

  1. Utilisateur anonyme
     
    Salut ccm81,

    C'est bien la bonne méthode ...
    http://www.cpearson.com/excel/Clipboard.aspx

     
    Public Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long 
    Public Declare Function EmptyClipboard Lib "user32" () As Long 
    Public Declare Function CloseClipboard Lib "user32" () As Long 
    
    Sub ClearClipboard() 
        OpenClipboard (0&) 
        EmptyClipboard 
        CloseClipboard 
    End Sub 
    


    sous Excel 2K7, ça fonctionne bien.

    Cdt

    Lupin
    0