The infamous zoom extent drawing gone simple solution.

We have all had the zoom extent and dwg disappear and spend a couple of minutes looking for the dots on the screen to find the stray object.

I can not believe all these years overlooked a simple solution.

With your drawing visible ie done a couple of zoom previous to get it back, just do zoom C pick somewhere and look at the scale value displayed.

Ok now

Zoom E dwg disappears

type EXTMAX using mouse copy the x,y value

then ZOOM C paste the x,y value and type in the scale you found before.

either your dwg will appear or hopefully the stray object, you can try a different scale bigger or smaller.

Dwg appears type EXTMIN copy x,y and redo zoom C

+1 Nice, of course it does depend on your object being top right or bottom left, but it would be easy to set up a macro (or lisp) that cycles through the four corners to find the offending object

that's handy to know. I always have in the past zoom extents then blindly dragged a region trying to find it....good tip

I thought I would wait a little while before adding the actual 4 solutions to see how many realised that I made a little error. Watch this space for 4 corners. Steven can you do the macro I wil do the lisp.

Just happened to find exactly what I was looking for the other day.

Here's the macro

^C^C^Cz;c;$M=$(index,0,$(getvar,extmin)),$(index,1,$(getvar,extmin));1000;delay;\z;c;$M=$(index,0,$(getvar,extmin)),$(index,1,$(getvar,extmax));1000;delay;\z;c;$M=$(index,0,$(getvar,extmax)),$(index,1,$(getvar,extmax));1000;delay;\z;c;$M=$(index,0,$(getvar,extmax)),$(index,1,$(getvar,extmin));1000;

It will cycle through the four corners of the drawing extents, and uses the delay command to pause at each one, pressing enter goes to the next corner. The macro also uses an arbitrary zoom factor of 1000 in each corner to try and give a view of any objects there (this will no doubt need altering depending on your own units). If at any point you do see an object that needs deleting you can break the macro by pressing the escape key.

Nice steven

; find the missing object of a zoom extent
; By Alan H Jan 2016
(defun zoomy ( / pt1 pt2 pt3 pt4)
(setq sc (getint "\nEnter a scale factor "))
(setq pt1 (getvar "extmax"))
(setq pt3 (getvar "extmin"))
(setq pt2 (list (car pt1)(cadr pt3)))
(setq pt4 (list (car pt3)(cadr pt1)))
(command "zoom" "C" Pt1 sc)
(if (/= (setq ans (Getstring "\nPress enter for next any key to exit")) nil)
(command "zoom" "C" Pt2 sc)
(exit)
)
(if (/= (setq ans (Getstring "\nPress enter for next any key to exit")) nil)
(command "zoom" "C" Pt3 sc)
(exit)
)
(if (/= (setq ans (Getstring "\nPress enter for next any key to exit")) nil)
(command "zoom" "C" Pt4 sc)
(exit)
)
(princ)
)
(zoomy)