Copy()

Copia o texto previamente selecionado para a Área de Transferência. Utilize o método Paste para colar o texto no local indicado. Exemplo:

Sub CommandButton1_Click()
  Screen.Item("ComboBox1").Copy()
End Sub