Window.RangeFromPoint (Excel)

Retorna o objeto Shape ou Range que está posicionado no par de coordenadas de tela especificado. Se não houver uma forma localizada nas coordenadas especificadas, este método retornará Nothing.

RangeFromPoint (x, y)

Dim lngx As Long: lngx = 
Dim lngy As Long: lngy = 
Dim shpRangeFromPoint As Shape
Set shpRangeFromPoint = ActiveWindow.RangeFromPoint(x:=lngx, y:=lngy)

Arguments

O seguinte argumento é opcional

x (Long) - O valor (em pixels) que representa a distância horizontal a partir do limite esquerdo da tela, começando pela parte superior.

y (Long) - O valor (em pixels) que representa a distância vertical a partir da parte superior da tela, começando pela esquerda.