Botão COPIAR em VBA

Como escrever um código para copiar as informações de uma LABEL(exemplo) e manter na área de transferência do computador, até que eu cole essas informações noutro aplicativo, como o Bloco de notas, por exemplo, com um Ctrl+V ou botão direito do mouse?

VBA é Excel

LibreOffice é Basic.

Esta Macro, em Basic, copia da célula ativa.

'================================================|
sub Copiar
'================================================|
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())
end sub