This is a visual description:
And again, this is the code to paste:
The following example paste any data from the clipboard. If there is no data, a message is shown Sub ClipboardData() If Not Clipboard.Empty Then ActiveLayer.Paste Else MsgBox "There is no data in the clipboard." End If End Sub
The following example paste any data from the clipboard. If there is no data, a message is shown
Sub ClipboardData()
If Not Clipboard.Empty Then
ActiveLayer.Paste
Else
MsgBox "There is no data in the clipboard."
End If
End Sub
The following example removes any data from the clipboard. Sub ClipboardClear() Clipboard.Clear End Sub
The following example removes any data from the clipboard.
Sub ClipboardClear()
Clipboard.Clear
The following example checks to see there is valid data in the clipboard. If there is valid data present, it is pasted into the active layer. If there is no valid data in the clipboard, a message displays in a message box. Sub ClipboardValid() If Clipboard.Valid Then ActiveLayer.Paste Else MsgBox "There is no valid data currently in the clipboard." End If End Sub
The following example checks to see there is valid data in the clipboard. If there is valid data present, it is pasted into the active layer. If there is no valid data in the clipboard, a message displays in a message box.
Sub ClipboardValid()
If Clipboard.Valid Then
MsgBox "There is no valid data currently in the clipboard."