Declare Function GetClipboardFormatName Lib "user32" Alias "GetClipboardFormatNameA" (ByVal wFormat As Long, _ ByVal lpString As String, ByVal nMaxCount As Long) As Long
GetClipboardFormatName возвращает имя заданного зарегистрированного формата из буфера обмена. Функция копирует имя в заданный буфер
В успешном случае возвращается длина строки, скопированной в буфер. В случае ошибки возвращается 0 (используйте GetLastError для получения кода ошибки), показывающее, что запрошенный формат не существует.
смотри пример clipboard.zip
CloseClipboard, EmptyClipboard