Pasar valor de un listview a la celda que tenga activa en la hoja

[Benito Bartolomé]

Buenas días a todos;

-Estoy intentando pasar el valor de un listview a la celda que tengo activa y no he sido capaz.

He intentado encontrar algo en San Google pero no he encontrado nada similar.

Adjunto macro.

 

Un saludo para todos.

 

CeldaActiva.xlsm

[Antoni]

Private Sub ListView1_Click()
ActiveCell = ListView1.SelectedItem.SubItems(1)
End Sub

Tienes un San Google de mala calidad, en el mío, con poner Listview click vba, solución en la primera entrada.

[Benito Bartolomé]

Hola e gracias Antoni;

Había intentado algo similar a tú código pero me sobraba un "Item" y me daba error. 

En cuanto  a San Google lo que pasa es que tú tienes vía libre y el mío solo llega hasta Cangas del Morrazo ???.

Se nota que no se me da bien buscar, me falta el olfato. 

Moitas grazas como sempre Antoni.