Declare Function EnumClipboardFormats Lib "USER32" (ByVal wFormat As Long) As Long
EnumClipboardFormats перечисляет все форматиы данных, доступных в буфере обмена. Эти данные хранятся в упорядоченном списке. Для получения данного списка нужно произвести серию вызовов функции. Перед вызовом данной функции буфер обмена должен быть открыт с помощью OpenClipboard.
В успешном случае возвращается формат данных, который следует за указанным форматов, т.е. следующий доступный формат буфера обмена. В случае ошибки возвращается 0. Для получения кода ошибки используйте GetLastError. Если буфер обмена не открыт, то функция потерпит неудачу. Если больше нет доступных для перечисления форматов данных, то возвращается 0, а GetLastError возвратит значение NO_ERROR, что позволяет различать ошибку функции и конец перечисления
Смотри пример clipboard.zip
CountClipboardFormats, OpenClipboard