Re : Test sur Presse papier
Me revoilà, avec un énorme merci!!
Ca marche!!
Juste pour ma culture générale j'aimerais bien comprendre les instructions suivantes (mais seulement si tu as quelques minutes à perdre pour m'expliquer...)
=====================
Declare Function CountClipboardFormats Lib "user32" () As Long
? pourquoi Lib "user32"
Function IsClipboardEmpty() As Boolean
IsClipboardEmpty = (CountClipboardFormats = 0)
? que veut dire countClipboardFormats=0
End Function
'=====================
Tu peux l'utiliser dans une feuille de calcul :
=IsClipboardEmpty()
?J'ai essayé cette fonction dans un cellule ds ma feuille de calcul, excel me répond 'Nom#', j'en déduis que je n'ai pas compris comment utiliser cette fonction...
Si non, pour résoudre mon problème, j'ai suivi tes instructions en mettant la fonction IsClipBoard dans un module, puis dans ma macro j'ai dit à excel:
If IsClipboardEmpty = True Then
xxx
Else
xxx
Formidable et sincèrement merci car je ne voyais pas comment m'en sortir!
Bien à toi,
Mireille