Determine if clipboard is empty
For text data, try this:
Public Declare Function OpenClipboard Lib "user32" (ByVal hwnd As
Long) As Long
Public Declare Function CloseClipboard Lib "user32" () As Long
Public Declare Function GetClipboardData Lib "user32" (ByVal uFormat
As Long) As Long
Public Function isClipboardEmpty() As Boolean
OpenClipboard (0&)
isClipboardEmpty = (GetClipboardData(1) = 0)
CloseClipboard
End Function
On Nov 28, 1:28 pm, XP wrote:
Using Office 2003 and Windows XP;
Is it possible using VBA to determine if there are any contents in the
clipboard?
If so, could someone please post a generic example of how to do this?
Thanks much in advance.
|