Copy paste

[Anonymous]

First ddedit command pick the text then copy text and again ddedit command pick another text paste text.

But condition copy "Ram" and paste "Shyam"
Pls give me solution / editable lisp file

[ВeekeeCZ]

Not really sure what you want, but try this, or adjust yourself.

(vl-load-com)

(defun c:CopyTextRS ( / fr to)
  
  (if (and (setq fr (ssget '((0 . "*TEXT"))))
           (setq fr (ssname fr 0))
           (setq to (car (entsel "\nCopy text to: ")))
           (wcmatch (cdr (assoc 0 (entget to))) "*TEXT")
           )
    (vla-put-textstring
      (vlax-ename->vla-object to)
      (vl-string-subst "Shyam" "Ram" (vla-get-textstring (vlax-ename->vla-object fr)))))
  (princ)
  )