Compartir a través de


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.