Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

VBA et presse papier

8 réponses
Avatar
Christian.L
Bonjour à tous et bon dimanche

Quelqu'un peut t'il m'indiquer comment vider le presse papier en VBA

Merci d'avance

Christian

8 réponses

Avatar
Anacoluthe
Bonjour !

'Christian.L' nous a écrit ...
Quelqu'un peut t'il m'indiquer comment vider le presse papier en VBA


Le plus simple est d'y copier ... rien

Anacoluthe
« Pourquoi faire simple quand on peut faire compliqué ? »
- Jacques ROUXEL

Avatar
Denis Liégeois
"Anacoluthe" a écrit dans le
message news:

'Christian.L' nous a écrit ...

Quelqu'un peut t'il m'indiquer comment vider le presse
papier en VBA


Le plus simple est d'y copier ... rien


Ça ne marche pas. Une tentative de copier un objet range
vide ou une sélection nulle donne un message d'erreur.


Avatar
Circé
Bonjour anacoluthe,

Anacoluthe a couché sur son écran :
Bonjour !

'Christian.L' nous a écrit ...
Quelqu'un peut t'il m'indiquer comment vider le presse papier en VBA


Le plus simple est d'y copier ... rien


Ta réponse me laisse perplexe...;)
Car il y a deux presse-papiers... Le presse papier Windows et le pp
Office, ce dernier pouvant contenir jusqu'à 24 éléments...

Euh... On a le droit de faire compliqué ?... :D

Circé

Anacoluthe
« Pourquoi faire simple quand on peut faire compliqué ? »
- Jacques ROUXEL



Avatar
AB
Bonjour,
Avec ce code, ça m'a l'air de marcher :
Sub vidage()
Set Vide= New DataObject
Vide.SetText ""
Vide.PutInClipboard
End Sub

AB

"Denis Liégeois" a écrit dans le message de
news:
"Anacoluthe" a écrit dans le
message news:

'Christian.L' nous a écrit ...

Quelqu'un peut t'il m'indiquer comment vider le presse
papier en VBA


Le plus simple est d'y copier ... rien


Ça ne marche pas. Une tentative de copier un objet range
vide ou une sélection nulle donne un message d'erreur.





Avatar
Anacoluthe
Bonjour Circé !

'Circé' nous a écrit ...
Bonjour anacoluthe,
Le plus simple est d'y copier ... rien
Ta réponse me laisse perplexe...;)

Car il y a deux presse-papiers... Le presse papier Windows et le pp
Office, ce dernier pouvant contenir jusqu'à 24 éléments...
Euh... On a le droit de faire compliqué ?... :D


Ouahhh t'es sans pitié le dimanche toi !!! :-D )

Primo quand on veut vider le PP c'est en principe celui de Oui-une-dose
et André a répondu parfaitement à la question
(précision toutefois : un DataObject demande la référence de MS Forms
sinon le compilateur VBA va hurler )

Deuxio le presse-papiers d'Office aussi curieux que ça puisse paraître
n'a PAS de modèle objet dans VBA !!!
Pour vider le PP-Office, c'était assez facile dans WD2000 : il suffisait
d'exécuter le bouton de la barre d'outils du PP. Depuis WD2002 c'est
plus compliqué : il faut exécuter le bouton 'Effacer tout' du volet PP.
Si tu y tiens VRAIMENT, je peux essayer d'en retrouver l'ID ... :-)

Bon dimanche !

Anacoluthe
« Je n’oublie pas les presse-papiers massifs
en verre de couleur, riches objets que personne
jusque là ne s’avisait d’appeler sulfures. »
- COLETTE


Avatar
Circ
Hello anacoluthe !

Anacoluthe a utilisé son clavier pour écrire :
Bonjour Circé !

'Circé' nous a écrit ...
Bonjour anacoluthe,
Le plus simple est d'y copier ... rien
Ta réponse me laisse perplexe...;)

Car il y a deux presse-papiers... Le presse papier Windows et le pp Office,
ce dernier pouvant contenir jusqu'à 24 éléments...


Ouahhh t'es sans pitié le dimanche toi !!! :-D )


Y a pas de dimanche pour les braves !!! :D
.
Si tu y tiens VRAIMENT, je peux essayer d'en retrouver l'ID ... :-)


Personnellement, non je n'y tiens pas, et même que je m'en fiche
totalement !! :D
C'était juste pour ajouter un grain de sel ! :D))

Circé

Bon dimanche !

Anacoluthe
« Je n’oublie pas les presse-papiers massifs
en verre de couleur, riches objets que personne
jusque là ne s’avisait d’appeler sulfures. »
- COLETTE




Avatar
Daniel.j
Bonjour
Avec Excel j'utilise ceci est çà marche bien
Maintenant avec Word ... pourquoi pas ?

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
Daniel

--
FAQ MPFE
FAQ du forum microsoft.public.fr.excel
http://dj.joss.free.fr/faq.htm

"Christian.L" a écrit dans le message de news:

Bonjour à tous et bon dimanche

Quelqu'un peut t'il m'indiquer comment vider le presse papier en VBA

Merci d'avance

Christian





Avatar
Christian.Bernard
Bonjour Daniel

J'ai récupéré ta réponse sur le forum Excel, et cela fonctionne très bien

Je remercie les autres intervenants pour leur attention

Christian