Копирование-вставка (буфер обмена) - VBA

Формулировка задачи:

Народ не ругайтесь слишком сильно, есть код на VBA

  TextBox1.SelStart = 0
  TextBox1.SelLength = TextBox1.TextLength
  TextBox1.Copy

из которого ясно что данные текстового поля копируются в буфер обмена, меня интересует как в буфер можно скопировать переменную, например элемент массива. не пребегая к коду

 TextBox1.Text = Str(1)
  TextBox1.SelStart = 0
  TextBox1.SelLength = TextBox1.TextLength
  TextBox1.Copy

А еще если кто нибудь знает, как вставить в письме outlook в адресную строку то что находится в буфере Зарание благодарен.

Решение задачи: «Копирование-вставка (буфер обмена)»

textual
                            Листинг программы 
                        

                            Sub Процедура1()
If Not Application.Intersect(ActiveCell, Worksheets(1).Range("A1:A10")) Is Nothing Then
    MsgBox "Enter"
End If
End Sub
                        