Dentre os recursos disponíveis no VBA podemos encontrar uma biblioteca chamada DataObjects.

trata-se de um conjunto de objetos que, dentre outras funções, podem ser usados para manipular a area de transferencia do windows.

abaixo segue os métodos basicos da area de transferencia

Dim dto As New DataObject

'Envia um conteudo de texto para area de transferencia
Sub EnviaParaAreaTransferencia(sText As String)
    dto.SetText sText
    dto.PutInClipboard
End Sub

'Captura conteudo da area de transferencia
Sub PegaConteudo()
    dto.GetFromClipboard
    EnviaParaAreaTransferencia "teste"
    MsgBox dto.GetText
End Sub
'Limpa a area de transferencia
Sub LimpaAreaTransferencia()
    dto.Clear
End Sub

ate a proxima...