Amigos, encontrei várias dicas de como COLAR algo que já está na área de transferência, ou como COPIAR algo para a área de transferência.
PORÉM nada a respeito que previamente TESTE se existe algo na área de transferência.
Preciso testar ANTES de prosseguir com a operação, pois a operação DEPENDE de a área de transferência ser VERDADEIRA
Eu estava fazendo assim:
If Not IsNull(ClipBoard_GetData) Then
MsgBox ("V")
'Executa tal comando
Else
MsgBox ("F")
'Executa tal comando
End If
ClipBoard_GetData = Fonte de como recuperar: https://msdn.microsoft.com/pt-br/library/office/ff194373.aspx
ClipBoard_SetData = Fonte de como copiar: https://msdn.microsoft.com/pt-br/library/office/ff194373.aspx
PORÉM nada a respeito que previamente TESTE se existe algo na área de transferência.
Preciso testar ANTES de prosseguir com a operação, pois a operação DEPENDE de a área de transferência ser VERDADEIRA
Eu estava fazendo assim:
If Not IsNull(ClipBoard_GetData) Then
MsgBox ("V")
'Executa tal comando
Else
MsgBox ("F")
'Executa tal comando
End If
ClipBoard_GetData = Fonte de como recuperar: https://msdn.microsoft.com/pt-br/library/office/ff194373.aspx
ClipBoard_SetData = Fonte de como copiar: https://msdn.microsoft.com/pt-br/library/office/ff194373.aspx