Método Window.RangeFromPoint (Excel)
Devuelve el objeto Shape o Range que se coloca en el par de coordenadas de pantalla especificado. Si no hay una forma ubicada en las coordenadas especificadas, este método devuelve Nothing.
Sintaxis
expresión. RangeFromPoint (x, y)
Expresión Variable que representa un objeto Window .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
x | Obligatorio | Long | Valor (en píxeles) que representa la distancia horizontal desde el borde izquierdo de la pantalla, empezando por la parte superior. |
y | Obligatorio | Long | Valor (en píxeles) que representa la distancia vertical desde la parte superior de la pantalla, empezando por la izquierda. |
Valor devuelto
Objeto
Ejemplo
En este ejemplo se devuelve el texto alternativo para la forma situada bajo el puntero del mouse (ratón) si dicha forma es un gráfico, una línea o una imagen.
Private Function AltText(ByVal intMouseX As Integer, _
ByVal intMouseY as Integer) As String
Set objShape = ActiveWindow.RangeFromPoint _
(x:=intMouseX, y:=intMouseY)
If Not objShape Is Nothing Then
With objShape
Select Case .Type
Case msoChart, msoLine, msoPicture:
AltText = .AlternativeText
Case Else:
AltText = ""
End Select
End With
Else
AltText = ""
End If
End Function
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.