expression.ClipboardFormats(Index)
expression Required. An expression that returns one of the objects in the Applies To list.
Index Optional Variant. The array element to be returned. If this argument is omitted, the property returns the entire array of formats that are currently on the Clipboard. For more information, see the Remarks section.
Remarks
This property returns an array of numeric values. To determine whether a particular format is on the Clipboard compare each element of the array with one of the following XlClipboardFormat constants:
| xlClipboardFormatBIFF
xlClipboardFormatBIFF2 xlClipboardFormatBIFF3 xlClipboardFormatBIFF4 xlClipboardFormatBinary xlClipboardFormatBitmap xlClipboardFormatCGM xlClipboardFormatCSV xlClipboardFormatDIF xlClipboardFormatDspText xlClipboardFormatEmbeddedObject xlClipboardFormatEmbedSource xlClipboardFormatLink xlClipboardFormatLinkSource xlClipboardFormatLinkSourceDesc xlClipboardFormatMovie xlClipboardFormatNative |
xlClipboardFormatObjectDesc
xlClipboardFormatObjectLink xlClipboardFormatOwnerLink xlClipboardFormatPICT xlClipboardFormatPrintPICT xlClipboardFormatRTF xlClipboardFormatScreenPICT xlClipboardFormatStandardFont xlClipboardFormatStandardScale xlClipboardFormatSYLK xlClipboardFormatTable xlClipboardFormatText xlClipboardFormatToolFace xlClipboardFormatToolFacePICT xlClipboardFormatVALU xlClipboardFormatWK1 |
Example
This example displays a message box if the Clipboard contains a rich-text format (RTF) object. You can create an RTF object by copying text from a Word document.
aFmts = Application.ClipboardFormats
For Each fmt In aFmts
If fmt = xlClipboardFormatRTF Then
MsgBox "Clipboard contains rich text"
End If
Next