Copy multiple ne fonctionne pas

[lesourd2]

Salut à tous ,

 

La commande copie depuis le bouton de barre d'outils AutoCad fonctionne uniquement en "unique", aucune possibilite d'avoir l'option multiple

 

COPYMODE est à 0

 

En selectionnant le mOde de copie sur Multiple rien n'y fait.

 

La macro associe ( dans l'interface personnaliser ) est

 $M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) 

=> identique à un autre poste, qui lui fonctionne.

 

Des idées ???

 

merci d'avance

[lesourd2]

Salut à tous

 

Toujours pas d'infos, d'Idées ?

 

Ah la la...

[lili2006]

Bonjour à toutes et tous,

 

Chez moi (Civil 3D 2011), la macro est :

 

 $M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) 

 

Donc pareil,..

 

Dans l'attente, ce lisp peux te dépanner,...

 

;;; MCOPY 
;;; Effectue des copies multiples d'une sélection suivant le décalage spécifié par 2 points

(defun c:mcopy (/ mcopy_err AcDoc Space pt1 pt2 nb)
 (vl-load-com)

 (defun mcopy_err (msg)
   (if	(= msg "Fonction annulée")
     (princ)
     (princ (strcat "\nErreur: " msg))
   )
   (vla-endUndoMark AcDoc)
   (setq *error* m:err
  m:err	nil
   )
   (princ)
 )

 (setq	AcDoc (vla-get-ActiveDocument (vlax-get-acad-object))
Space (if (= (getvar "CVPORT") 1)
	(vla-get-PaperSpace AcDoc)
	(vla-get-ModelSpace AcDoc)
      )
 )
 (vla-StartUndoMark AcDoc)
 (if (and (= 1 (getvar "pickfirst"))
   (setq ss (cadr (ssgetfirst)))
     )
   (sssetfirst nil nil)
   (setq ss (ssget))
 )
 (initget 1)
 (setq	pt1 (getpoint "\nSpécifiez le décalage, premier point: "))
 (initget 1)
 (setq pt2 (getpoint pt1 "\nDeuxième point: "))
 (initget 1)
 (setq nb (getint "\nNombre d'éléments: "))
 (foreach obj (vl-remove-if 'listp (mapcar 'cadr (ssnamex ss)))
   (setq obj (vlax-ename->vla-object obj))
   (repeat (1- nb)
     (vla-Copy obj)
     (vla-move obj (vlax-3d-point (trans pt1 1 0)) (vlax-3d-point (trans pt2 1 0)))
     )
 )
 (vla-endUndoMark AcDoc)
 (setq	*error*	m:err
m:err nil
 )
 (princ)
) 

[lesourd2]

merci lili 2006 de ta réponse

 

Pour l'instant je me depanne comme ça

[bryce]

Bonjour,

 

Ça n ne m'a pas l'air d'un problème de variable.

Il faudrait peut-être tenter une réparation de l'install ?

[lesourd2]

Salut

 

Bryce: bizarrement, j'utilise souvent ce lisp : un xed comme xorro v 1.1

adaptation par usegomme de XEDIT auteur inconnu => enregistré dans un chemin de recherche de fichier de support.

 

Des que je lance la commande copier, je perds la main sur toute autre commande, ECHELLE ,ROTATION, DEPLACER, etc...