t.erie

Salut ! Tu as essayé de lancer Autocad en tant qu’administrateur ? Sinon essaie de réparer ton installation. Thierry

J'ai trouvé cette solution : Un paramètre linéaire avec emplacement de base au milieu. Inversion sur le carré et le paramètre linéaire. Nouveau bloc Si ça peut aider. Thierry

Merci Gile, En fait les états de visibilités me servent à autre chose (dans le bloc officiel). Merci d'avoir pris le temps de me répondre Thierry

Bonjour, Ci-après le fichier test Fichier test Merci

Bonjour,

Bonjour, Je n'ai pas trouvé de topic sur le sujet,c'est pourquoi je vous demande de l'aide. J'ai mis un paramètre linéaire sur lequel j'ai appliqué un étirement + une inversion + un déplacer(avec variateur de distance à 0.5). Quand j'étire mon bloc puis je réalise l'inversion, pas de problème, j'obtiens bien le résultat attendu. Si je fais l'inversion avant l'étirement, là par contre ce n'est pas la même histoire, c'est le bazar. Si une personne à la solution, je suis preneur. Je n'ai pas trouvé la solution pour joindre mon fichier, je peux vous l'envoyer par mail Thierry

Bonjour, j'ai essayé de faire une table de consultation double, mais je ne suis pas arrivé à le faire ! Quelqu'un peut me donner la solution ? Merci par avance Thierry

Bonjour, Je m'excuse pour ma réponse tardive, je rentre de déplacement. Je vais aller voir le post. Merci pour cette réponse. Thierry

Bonjour à tous, Mon client me demande de modifier tous les plans que je lui ai faits l'année passée (avec les normes, tous va bien !) Le souci est que dans chaque local j'ai mis un bloc contenant 8 attributs. Au final il veut que le nom du bloc change et que les étiquettes soient presque toutes renommées. J'ai 25 bâtiments avec une moyenne de 3 niveaux le tout multiplié par x pièces vous imaginez le boulot de titan ... Ma question est : est-il possible de le faire automatiquement avec un programme ? Pour information je suis équipé avec la version 2012. D'avance je vous remercie de vouloir étudier ma requête Thierry

merci d'avoir pris le temps de me répondre, je vais de ce pas suivre tes conseils

j'ai oublié de préciser, je ne connait rien du tout à la programmation, non par manque d'envies mais par manque de temps.. Ce code m'avait été fait par un collègue qui par manque de disponibilité ne peut le modifier rapidement. Thierry

Bonjour, Ci-après un bout de code qui tourne sans problème sur un poste équipé de Windows 7 32bits mais qui ne fonctionne pas sur un poste équipé de Windows 7 64, d'Autocad 2011 64 + le pack vba 64. Est-ce qu'un âme charitable peut m'aiguiller sur les modifications que je doit apporter. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Public valid As Boolean Sub surf_POLYLIGNE() 'cette procédure permet de placer automatiquement un texte simple contenant un champ liéé à une polyligne fermée à sélectionner Dim textString As String Dim objet_TEXTE As AcadText Dim texte As String Dim height As Double Dim returnPnt As Variant Dim returnObj As AcadObject Dim basePnt As Variant Dim pb As Boolean On Error Resume Next pb = True While pb pb = False ThisDrawing.Utility.GetEntity returnObj, basePnt, "Cliquez sur polyligne : " If Err = 0 Then If returnObj.ObjectName = "AcDbPolyline" Then textString = "%<\AcObjProp.16.2 Object(%<\_ObjId " & returnObj.ObjectID & ">%).Length \f ""%lu2%pr0%ps[,cm]%ct8[1]"">%" returnPnt = ThisDrawing.Utility.GetPoint(, "Point d'insertion de la longueur : ") height = 8 Set objet_TEXTE = ThisDrawing.ModelSpace.AddText(textString, returnPnt, height) objet_TEXTE.Layer = "Vérification" objet_TEXTE.Alignment = acAlignmentMiddleCenter objet_TEXTE.TextAlignmentPoint = returnPnt objet_TEXTE.StyleName = "ARIAL" ThisDrawing.Regen (True) Else MsgBox "Je t'avais dis une polyligne .... rejoue encore une fois ...." pb = True End If End If Wend End Sub Merci d'avance Thierr

En renommant certains paramètre cela doit être possible non ?

Je viens de tester votre lisp, du tonnerre, merci beaucoup d'avoir bien voulu consacrer du temps pour moi. J'espère que cela profitera à d'autres personnes. Merci encore

Ci après un bloc test: http://file.ahst.fr/get.php?id=4d3417b32731d

Dans l'ordre: Mes blocs: Porte réglable Porte double réglable Porte tierce réglable --------------------------------------------------------- Mes états: Sans trait de calcul 1 trait Loi Carrez

Comment vous envoyer un bloc exemple ?

Je vais essayer d'être plus clair: Mes menuiseries contiennent une polyligne qui est visible grâce à un état de visibilité. Cette polyligne me sert à fermer une zone afin que je puisse insérer une hachure dans une pièce. L'idéal serait que je puisse ajouter dans un lisp le nom de mes blocs, et grâce à une commande activer ou pas cet état de visibilité. Dans tous mes bloc cet état de visibilité porte le même nom. Ce message d'erreur: Erreur: valeur d'argument incorrecte: mode angtos: 16. dans le lisp de gile est-il du ma config ?

Bonjour, J'avais bien récupéré ce LISP mais j'obtiens ce message: Erreur: valeur d'argument incorrecte: mode angtos: 16. Pour vous éclairer un peu je vais vous expliquer mes besoins: Dans mes blocs menuiseries j'ai une polyligne accessible par un état de visibilité qui me ferme le trou dans le mur afin de pouvoir hachurer une zone. L'idéal pour moi serait d'avoir la possibilité via un bouton de pouvoir à souhait activer tel ou tel état de visibilité. Début pièce, Fin pièce par exemple. Merci de m'avoir répondu. Cordialement Thierry

Bonjour, je recherche une routine qui par le biais d'une liste de blocs (modifiable) me permettrai d'attribuer tel ou tel état de visibilité. Merci de bien vouloir m'aider. Au fait meilleurs vœux à tous. Thierry

Merci pour vos réponses, je vais tester le LISP edit-att. Thierry

Bonjour et merci de ta réponse. En fait je voudrais par sélection de mes ref de blocs pouvoir modifier en une seule opération le ou les attributs de mon choix. -Pourquoi le forum Routines LISP, car je ne pense pas que cela soit possible de manière traditionnelle de modifier les hauteurs d'attributs dans des ref de bloc.

Désolé je croyais que c'était pour autocad. Dans Autodesk Architectural Desktop il faut créer un bloc à vue multiples composé d'un bloc autocad. Thierry

Bonjour, de façon automatique oui par le biais d'un vba, sinon dans ta valeur d'attribut tu fait un clic droit, insérer un champ, Objet, (Je te conseil une hachure car cela déduit d'éventuels poteaux, trémies),et dans format supplémentaire mettre un facteur de conversion. Thierry

Super cela fonctionne, une simple réouverture et sa roule, merci beaucoup de ton aide. Thierry