по клику на ячейку дублировать содержимое

[johny_03]

Добрый день!
Подскажите пожалуйста, возможно ли в excel сделать следующее:
Имеется столбец А с заполненными текстом ячейками от 1 до 50 ( т.е. А1:А50)
Необходимо сделать так, чтобы по клику на любую из ячеек диапазона А1:А50 содержимое той ячейки дублировалось в ячейке например С1. Следующий клик по диапазону А1:А50 дублировал в ячейку С2 и т.д.
Цель этого всего сделать выборку из списка фамилий А1:А50 в столбец С.
Если возможно, чтобы в случае ошибочного клика можно было отменить выбранную фамилию повторным кликом или другим способом.
Заранее очень благодарен!

[IgorGO]

правой кнопкой мыши по ярлыку листа, исходный текст, положите туда этот

Private Sub worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Column = 1 Then
    If Target.Value <> "" Then
      Cells(Rows.Count, 3).End(xlUp).Offset(IIf([c1] = "", 0, 1), 0) = Target
      Cancel = True
    End If
  ElseIf Target.Column = 3 Then
    If Target <> "" Then Target.Delete shift:=xlShiftUp:  Cancel = True
  End If
End Sub

[johny_03]

Отлично работает! Огромное спасибо!