Discussion :

[flet le kid]

Bonjour,

Depuis mon application Access, j'exécute une requête et j'exporte le résultat dans Excel. Ensuite pour empêcher l'utilisateur de copier j'utilise le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Comment vider le presse papier ? [haut]  
 
auteur : SilkyRoad 
Utilisez cette procédure pour vider le contenu du presse papier. 


Vba 

Sub ViderPressePapier()
'Nécéssite d'activer la référence "Microsoft Forms 2.0 Object Library."
Dim Cible As dataObject

Set Cible = New dataObject
Cible.setText ""
Cible.putInClipboard

Set Cible = Nothing
End Sub

Malheureusement, Malgré la référence activée, en compilant j'ai une erreur au niveau de la syntaxe en rouge. L'erreur est la suivante!:

Erreur de compilation:
Utilisation incorrecte du mot clé New

J'ai même regardé dans l'aide sur le presse papier et j'ai utilisé le code fournit (qui d'ailleurs est semblable à celui que j'ai mis là haut) mais j'ai la même erreur.

Comment faire donc pour vider le presse papier depuis ACCESS?

NB: Je ne savais pas si je devais poster depuis le forum Excel ou celui d'Access. j'ai choisi Excel car le code que j'ai pris provient de la faq de ce forum. Je m'excuse auprès de tous si je me suis trompé, surtout auprès des modérateurs qui vont bien vouloir m'envoyer un message privé en cas d'erreur

[scully2501]

As tu activé la référence comme dite?
Nécéssite d'activer la référence "Microsoft Forms 2.0 Object Library."

[flet le kid]

Oui, j'ai activé la référence.

[aalex_38]

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub test_dataobject()
Dim cible As DataObject
Set cible = New DataObject
With cible
    .SetText ""
    .PutInClipboard
End With
Set cible = Nothing
 
End Sub

Je viens de tester ce code et il fonctionne parfaitement avec 3 références :
visual basic For Application
Microsoft Excel xx.x Object Library
Microsoft Form xx.x Object Library

[flet le kid]

Ben, je dois avoir un gros soucis alors, parce je viens de tester et ça ne passe pas quand je compile. Pourtant j'ai les mêmes références activées chez moi.

[flet le kid]

OK, je vais laisser cette possibilité et chercher une autre méthode que je mettrai dans un nouveau post. Merci