Just nu i M3-nätverket
Jump to content

Hur kör jag VBA i "makrodesign"-läget?


Shape_sthlm

Recommended Posts

Hur kan jag anropa en funktion i Access makrodesign? Jag vill alltså innan Avsluta (se bild) anropa EmptyClipboard.

 

Private Declare Function apiOpenClipboard Lib "User32" _
Alias "OpenClipboard" _
(ByVal hWnd As Long) _
As Long

Private Declare Function apiEmptyClipboard Lib "User32" _
Alias "EmptyClipboard" _
() As Long

Private Declare Function apiCloseClipboard Lib "User32" _
Alias "CloseClipboard" _
() As Long

Function EmptyClipboard()
' för att kunna anropa EmptyClipboard för att tömma urklipp.

If apiOpenClipboard(0&) <> 0 Then
Call apiEmptyClipboard
Call apiCloseClipboard
End If

End Function

 

 

/M

post-50730-126631103543_thumb.jpg

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...