Copiar y pegar celda activa

[jesus miguel]

En mi hoja menu tengo un listado, lo que necesito es que al ubicarme en la fila de cualquier dato de la columna C, mediante macro, copiar el dato de la columna B de la celda activa de la columna C (donde estoy ubicado) copie y pegue el valor de dicha celda a la celda F1.

Desde ya muchas gracias por su tiempo

Jesús

[Héctor Miguel]

es probable que se pueda SIN macros, todo depende de los cálculos que necesites hacer con el dato (copiado/traspasado/pegado) en la celda [F1]

procura ser (muy) especifico y detallado si hay implicaciones posteriores con ese dato

saludos,

hector.

[jesus miguel]

O sea tengo mi hoja menu  y tengo un listado en la columna A esta el numero en la B su codigo y en la C el nombre y bueno al desplazarme en la columna c si necesidad de tener que elegir lo que esta en la celda de la columna B  copie esa celda y lo ubique  a la celda que te indico

Saludos

Jesús

[Héctor Miguel]

me he quedado (casi) "en las mismas"... no se que harás después con el dato copiado en [F1] ?

si entiendo bien, lo que buscas es que cada vez que selecciones una celda de la columna "C", en la celda [F1] se copie el contenido de la columna "B" según la fila de la selección activa (correcto ?)

op1: copia/pega (o escribe) lo siguiente en el modulo de código de "esa hoja":

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Column = 3 Then [f1] = Cells(Target.Row, 2)
End Sub

toma nota que cada vez que se ejecuta código como el anterior, se vacía la pila de niveles para deshacer/undo/ctrl+Z

op2: pon en [F1] la siguiente formula: =indirecto(direccion(celda("row"),2))

copia/pega (o escribe) lo siguiente en el modulo de código de "esa hoja" (en vez de lo anterior):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address <> "$F$1" Then [f1].Calculate
End Sub

conservas los niveles para deshacer/undo/ctrl+Z

saludos,

hector.

[jesus miguel]

mmmmm si si ya me di cuentas, gracias por la ayuda

Un abrazo

Jesús