Weed Text

[AndyWalker]

Does anyone know of a way to weed text? I have thousands of individual text boxes (which actually show depth values for contours) I'd like to try delete every second value in a line for example. Basically to thin out Any ideas

[Pointdump]

Andy,
Please post a Screen Shot, or even better, your drawing, to better explain the situation.
Dave

[troma]

Sounds like a custom type of job.
Maybe ask over here: https://forums.autodesk.com/t5/autocad-customization/ct-p/AutoCADTopic1

[tcorey]

It's crude, but this LISP does what you're asking.

(defun c:WeedText ( / texts len incr ctr tx )
(vl-load-com)
(prompt "\nSelect text objects: ")
(setq texts (ssget)
	  len (sslength texts)
	  incr (getint "Deletion increment: ")
	  ctr incr)
	  
	  
	  (while (< ctr len)
			   (setq tx (ssname texts ctr))
			   (vl-cmdf "Erase" tx "")
			   (setq ctr (+ incr ctr))
			   )
(princ)
)

[Joe-Bouza]

Welcome back 👍

[troma]

---

@Joe-Bouza wrote:

Welcome back 👍

---

Thanks @Joe-Bouza  😁

I was searching for an answer to a problem and thought I should try to help someone else while I'm here.

So I accidentally posted a reply to a question that's over 9 months old! Oops. Maybe it was useful.

I drop in from time to time but I can't promise to be here every day.