Shape.TopLeftCell (Excel)
Devuelve un objeto Range que representa la celda que se encuentra debajo de la esquina superior izquierda del objeto especificado. Solo lectura.
Dim shp As Shape: Set shp =
Dim rngTopLeftCell As Range
Set rngTopLeftCell = shp.TopLeftCell