VBA / Access /clipboard - Programmation
Marsh Posté le 17-01-2002 à 22:34:38
pour mettre dans le clipboard:
Clipboard.SetText "glut?", vbCFText
pour récuperer cette chaine
dim sqlstring as string
sqlstring = Clipboard.GetText(vbCFText)
Marsh Posté le 17-01-2002 à 22:47:09
t'as réussi à faire marché ton exemple sous Access ? (j'ai la verison 97 SR2)
Marsh Posté le 17-01-2002 à 22:51:50
m**** moi c'est en VB et pas VBA , wait j'installe office
Marsh Posté le 17-01-2002 à 23:29:48
bon désoled j'ai pas trouved , enfin ça marche pas
j'ai esayer ça :
Private Declare Function SetClipboardData Lib "user32" Alias "SetClipboardDataA" (ByVal wFormat As Long, ByVal hMem As Long) As Long
Private Declare Function GetClipboardData Lib "user32" Alias "GetClipboardDataA" (ByVal wFormat As Long) As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function LocalAlloc Lib "kernel32" (ByVal wFlags As Long, ByVal wBytes As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Sub main()
Dim ptrS As Long
Dim f As String
f = "glut?"
ptrS = LocalAlloc(0, Len(f))
CopyMemory ptrS, f, Len(f)
OpenClipboard vbNull
SetClipboardData 1, ptrS
MsgBox GetClipboardData(1)
CloseClipboard
End Sub
l'utilisation des API windows est la voie vers la solution a ton probleme car VBA ne connait pas l'objet clipboard.
par contre mon prog marche pas , il me dit qui trouve pas la déclaration SetClipboarddata dans user32.dd
bon courage
Marsh Posté le 17-01-2002 à 23:34:41
merci de m'avoir montré la voie
je continue mon bonhomme de chemin avec le clipboard !
je cherche tjs sur le net au cas ou ... des liens interessants
http://www.cathyastuce.com/index.htm
http://www.namani.net/
http://www.excel-vba-access.com/access/index.htm
http://www.barasch.com/excel/xlvba.htm
Marsh Posté le 17-01-2002 à 22:17:00
en VBA sous Access
j'ai une variable nommée sqlstring qui contient une chaine de caractères
j'aimerais récupérer cette chaine de caractère dans le presse papier connaissez-vous la procédure en VBA ?