Macro formula lo que funcione

18/11/2014 - 00:28 por regie78 | Informe spam
¡ Hola !

Buenas tardes pregunto como puedo lograr que dentro de un rango de seleccionadas, pueda seleccionar con el puntero de mouse la celda y al darle click me salga un numero..

Preguntas similare

Leer las respuestas

#1 Ignacio Perez
18/11/2014 - 20:09 | Informe spam
El martes, 18 de noviembre de 2014 00:28:19 UTC+1, regie78 escribió:
¡ Hola !

Buenas tardes pregunto como puedo lograr que dentro de un rango de
seleccionadas, pueda seleccionar con el puntero de mouse la celda y al darle
click me salga un numero..



Hola regie78,
Como vamos de VBA?
Suponiendo que la celda en cuestión esta dentro del rango A1:A10:

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, [A1:A10]) Is Nothing Then
Target = "numeroqiequierasasignar"
End If

End Sub

Estas lineas las tienes que pegar en el código de la hoja que contiene el rango-->click con el botón derecho sobre el nombre de la hoja-->Ver Código.
Saludos
Respuesta Responder a este mensaje
#2 Ignacio Perez
18/11/2014 - 21:09 | Informe spam
perdon, me he equivoacado:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Not Intersect(Target, [A1:A10]) Is Nothing Then
Target = "numeroqiequierasasignar"
End If

End Sub


Tendras que hacer doble click.
Saludos
Respuesta Responder a este mensaje
#3 regie78
20/11/2014 - 13:46 | Informe spam
Ignacio Perez escribió el 18/11/2014 21:09 :
perdon, me he equivoacado:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)

If Not Intersect(Target, [A1:A10]) Is Nothing Then
Target = "numeroqiequierasasignar"
End If

End Sub


Tendras que hacer doble click.
Saludos


Gracias me funciono a la perfeccion le agradesco un mundo......
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida