Chrisfs

non pas de patch de dispo, normalement pour avoir Revit, tu as du passé par un revendeur agrée Autodesk :casstet: , a voir avec eux pour obtenir une version française

j'crois que je faire comme toi, car, j'ai mis une routine lisp que j'ai récupéré dans le fichier acaddoc.lsp, et à chaque ouverture de dessin, c'est long (surtout quand c'est un gros plan avec plein de xref :casstet:

Bonjour, Étant responsable BE, je pense qu'il ne faut pas se baser trop sur ses compétences AutoCAD, mais plus sur sa formation professionnel, le logiciel AutoCAD étant juste un outil de travail (ce que beaucoup de jeunes arrivant on tendance à oublier). C'est bien de savoir manipuler le logiciel, mais encore faut-il savoir et comprendre ce que l'on dessine. Dans mon cas, je demande à l'intérimaire de connaitre les compétences techniques du bâtiment, si on ne sait pas lire un plan et détails gros-œuvre d'un projet de bâtiment, ça sert a rien que je continue avec. J'ai déjà eu des intérimaires, qui certes, manipulait bien AutoCAD, mais qui ne comprenait de rien a rien le métier, et c'est une grosse perte de temps et d'argent pour l'entreprise. Bon après, en bureau d'études, suivant les conventions collectives, il y a une hiérarchisation des postes, en bas de l'échelle, il y a le simple dessinateur exécution, et ça monte en passant dessinateur études, dessinateur projeteur, projeteur, etc... un bon tremplin est de passer soit par des boites d'intérim spécialisée bureau d'études, ou des SSII prestataires de services autocad, ou autres, qui permet a un jeune débutant de commencer. Pour ma part, j'ai une formation en électrotechnique, j'ai commencé dans une SSII où on m'envoyais en mission chez divers clients variées, et c'est là que j'ai commencé à plutôt m'orienté vers les bureaux d'études dans le bâtiment et BTP, certes au début, c'était pas simple, mais comme j'en voulais, j'ai pris le temps d'apprendre. ça fait quelques années que je suis dans la boite actuelle, étant assez consciencieux sur le taf, je suis passé responsable BE depuis peu :-) voila, Christophe

Bonsoir, j'ai pour habitude en vba de ne pas trop utiliser les fonctions if else avec plusieurs conditions, je pense qu'il faut plus choisir la fonction 'Select case' qui est plus simple : select case x case "CH9" select case OptionButton1 case true Call prog_etiqCAB case else end select case "Toto" case else select case OptionButton1 case true Call prog_PLT_traceur case else end select end select j'ai fait les quelques lignes de tête mais ça devrait te donner la trame de base pour comprendre le fonctionnement de la fonction. slt

salut, en même temps, y a une forte baisse d'activité en bureau d'études, je constate que dans ma branche (Bâtiment) j'ai beaucoup moins de taf qu'il y a 1 an. ça doit être pareil dans les autres branches d'activités. juste assez de travail pour moi, j'ai dû interrompre la mission d'intérim de mon dessinateur. et c'est un peu pareil dans les autres agences de la boite où je bosse. Pour prendre de l'expérience, rien ne vaut les prestataires de services, ou les agences d'intérim spécialisé BE, c'est ce que j'ai fait pour débuter, et maintenant j'ai pas trop à me plaindre.

il suffit de paramétrer le style de cote pour qu'ils prennent en compte l'échelle de la présentation (onglet "Ajuster" - "Échelles des objets de cotes"). dans la présentation, pensez à verrouiller la fenetre, ensuite utilisez la fonction de mises a jour des cotes, cela devrait ajuster la cotation a l'échelle de la fenêtre. Sinon, la solution de Rebcao est celle qui est le plus souvent utilisé dans les plans de batiments, 1 calque par échelle de cotation.

Salut, ci joint un exemple de code que j'utilise de temps en temps : Sub DessinEEPTronc() Dim Cota As Double Dim Cotb As Double Dim Cotc As Double Dim Cotd As Double Dim Alpa(0 To 7) As Double Dim Mirr1(0 To 2) As Double Dim Mirr2(0 To 2) As Double Dim Lin1(0 To 3) As Double Dim Lin2(0 To 3) As Double Dim Lin3(0 To 3) As Double Dim Polyline01 As AcadLWPolyline Dim Polyline02 As AcadLWPolyline Dim Polyline03 As AcadLWPolyline Dim Polyline04 As AcadLWPolyline Dim Polyline05 As Variant Cota = CDbl(InputBox("Diamêtre 'd' de l'EEP tronconique")) Cotb = 1.5 * Cota Cotc = 2 * Cota Cotd = 0.5 * Cota Alpa1 = ThisDrawing.Utility.GetPoint Alpa(0) = Alpa1(0) - 120 Alpa(1) = Alpa1(1) Alpa(2) = Alpa1(0) Alpa(3) = Alpa1(1) Alpa(4) = Alpa1(0) + Cotd Alpa(5) = Alpa1(1) - Cotb Alpa(6) = Alpa1(0) + Cotd Alpa(7) = Alpa1(1) - Cotb - 300 Mirr1(0) = Alpa1(0) + Cota Mirr1(1) = Alpa1(1) Mirr1(2) = 0 Mirr2(0) = Alpa1(0) + Cota Mirr2(1) = Alpa1(1) - Cotb Mirr2(2) = 0 Lin1(0) = Alpa1(0) Lin1(1) = Alpa1(1) Lin1(2) = Alpa1(0) + Cotc Lin1(3) = Alpa1(1) Lin2(0) = Alpa1(0) + Cotd Lin2(1) = Alpa1(1) - Cotb Lin2(2) = Alpa1(0) + Cotd + Cota Lin2(3) = Alpa1(1) - Cotb Set Polyline01 = ThisDrawing.ModelSpace.AddLightWeightPolyline(Alpa) Polyline01.ConstantWidth = 3 Set Polyline02 = Polyline01.Mirror(Mirr1, Mirr2) Set Polyline03 = ThisDrawing.ModelSpace.AddLightWeightPolyline(Lin1) Set Polyline04 = ThisDrawing.ModelSpace.AddLightWeightPolyline(Lin2) Polyline05 = Polyline04.Offset(300) End Sub tu verra, dans le code, il y a la creation d'une polyligne, de son mirroir et il y a une fonction offset à la fin.

il me semble que sur AutoCAD 2006, il existe la fonction publier, qui permet justement d'imprimer tout les onglets des dessins ouvert.

oui, y a plein de méthodes pour arriver au même résultat. Dans mon taf, j'ai des type de ligne personnalisés dans différents fichiers .lin (donc faut toutes les charger avant). Par contre, je vais regarder ton lisp pour la partie concernant le "formatage" de tes fichiers de réglages de calques (1 ligne par calque, c'est mieux que moi).

oui, on en rêve, lisp le fait... en cas de purge, je relance la routine, c'est plus simple :) et ça remets tous d'équerre si quelqu'un à bidouillé les propriétés des calques. quand j'aurais un peu de temps, je rajouterai quelques fonctions lisp qui puisse m'alléger le taf de mettre les plans conforme au centaines de chartes graphique qu'il puisse exister (comme mettre les cotes dans le calques "cotation", les textes dans "texte", remettre tout en "ducalque" etc...), mais le boulot me prends trop de temps pour l'instant !!!

oui, j'avais pas pensé à ce cas :( . Voici les valeurs a mettre : -3 = "ParDefaut" -2 = "DuBloc" -1 = "DuCalque" ensuite les épaisseurs : 0, 5, 9, 13, 15, 18, 20, 25, 30, 35, 40, 50, 53, 60, 70, 80, 90, 100, 106, 120, 140, 158, 200, 211 merci pour le compliment, le plus dur a été de le convertir en lisp, car à la base je suis plus fan du VBA, mais, je suis en train de passer toutes mes routines VBA en Lisp, et c'est pas simple de se replonger dans le code...

Oui, c'est vrai que c'est un peu complexe, mais bon, j'aime bien me prendre la tête :P et c'est adaptable suivant les chartes graphiques demandées sur les differents chantiers.

Salut, J'ai fait une petite routine lisp qui permet d'importer d'un fichier texte, une liste de calque vers autoCAD. ça se décompose en 1 fichier lisp : ; PathCC => chemin d'acces au dossier racine des routines (setq PathCC "C:/ACADLISP/") ; PathLT => chemin d'acces au Dossier des Fichiers .LIN (setq pathLT "C:/ACADLISP/") (princ "\nTapez cr_cal pour creer les calques.") (defun charge_linetype () ; Routine pour charger les types de lignes (setq pathfiltl (strcat PathCC "linetype.ini")) (setq fic2 (open pathfiltl "r")) (while (setq tl1 (read-line fic2)) (setq tl2 (read-line fic2)) (if (= (tblsearch "ltype" tl1) nil) (command "_linetype" "_l" tl1 (strcat pathLT tl2) "")) ) (close fic2) (terpri) ) (defun C:cr_cal (/ Dcl_Id% Return#) ; Routine de creation des calques (charge_linetype) (setq Dcl_Id% (load_dialog (strcat PathCC "chriscad2009.dcl"))) (new_dialog "CreationLayer" Dcl_Id%) (action_tile "Edit1" "(setq preflay $value)") (action_tile "Radio1" "(setq typlay $value)") (action_tile "accept" "(done_dialog 1)(creation_layer preflay typlay)") (action_tile "cancel" "(done_dialog 0)") (setq Return# (start_dialog)) (unload_dialog Dcl_Id%) ) (defun creation_layer (preflay typlay) (vl-load-com) (setq acadobject (vlax-get-Acad-Object)) (setq activedocument (vla-get-activedocument acadobject)) (setq LayerTable (vla-get-layers activedocument)) (setq pathfilay (strcat PathCC "layer.ini")) (setq fic (open pathfilay "r")) (while (setq t1 (read-line fic)); t1 Nom du calque (setq t2 (read-line fic)); t2 Couleur du calque (setq t3 (read-line fic)); t3 Type de plan AutoCAD : PL TT ou DET (setq t4 (read-line fic)); t4 Type de ligne (setq t5 (read-line fic)); t5 Epaisseur du calque (setq t6 (read-line fic)); t6 si calque imprimé ou non (if (= preflay "") (setq layername t1)) (if (/= preflay "") (setq layername (strcat preflay "-" t1))) (if (= t3 "TT") (progn (setq anewlayer (vla-add LayerTable layername)) (vla-put-color anewlayer t2) (vla-put-linetype anewlayer t4) (vla-put-lineweight anewlayer t5) ) ) (if (= t3 typlay) (progn (setq anewlayer (vla-add LayerTable layername)) (vla-put-color anewlayer t2) (vla-put-linetype anewlayer t4) (vla-put-lineweight anewlayer t5) ) ) (if (/= t6 "X") (vla-put-plottable anewlayer :vlax-false) ) ) (close fic) (terpri) ) puis le fichier CHRISCAD2009.DCL pour la petite boite de dialogue (ou un autre nom, suffit de le renommer et de modifier la ligne concernée dans le lisp) : CreationLayer : dialog { key = "Title"; label = "Création de calques";//Title$ from lsp file initial_focus = "Edit1"; spacer; : row { : column { width = 5.09; fixed_width = true; spacer; : text { key = "Prompt"; label = "Préfixe des Calques :";//Prompt from lsp file } } : edit_box { key = "Edit1";//Edit1$ from lsp file edit_width = 26.42; fixed_width = true; } } spacer; : boxed_radio_column { key = "Radio1"; label = "Type de Document AutoCAD :"; : radio_button { key = "PL"; label = "Plan de Repérage"; } : radio_button { key = "DET"; label = "Carnet de détails"; } } spacer; : row { fixed_width = true; alignment = centered; : ok_button { width = 11; } : cancel_button { width = 11; } } }//CreationLayer ensuite il faut créer 2 fichiers a mettre dans le même dossier que le lisp (ou ailleurs en bidouillant un peu le lisp) : linetype.ini qui comportera la liste des type de ligne a charger layer.ini qui comportera la liste des calques avec leurs reglages chaque fichier doit être formater dans ce sens : linetype.ini : nom du type de ligne fichier .lin par exemple : AXES ACADISO.LIN CACHE ACADISO.LIN BORDURE ACADISO.LIN DIVISE ACADISO.LIN FANTOME ACADISO.LIN INTERROMPU ACADISO.LIN POINTILLE ACADISO.LIN TIRETPT ACADISO.LIN pour le fichier layer.ini : Nom du calque Code couleur Type de calque => ça c'est par rapport a ma boite de dialogue soit TT, DE ou PL (TT ça apparait quelque soit le cas) Type de ligne Épaisseur du calque (faut multiplier par 100x la valeur indiqué sur AutoCAD pour que ça passe en vlisp) Imprimer ou pas => X= calque imprimé vide=calque non imprimé exemple de fichier layer.ini : AXES 1 DET AXES 9 X COTATION 3 TT CONTINUOUS 9 X HACHURE 8 TT CONTINUOUS 9 X TEXTE 5 DET CONTINUOUS 9 X FEN 9 TT CONTINUOUS 20 JD 150 PL AXES 20 X Pour l'instant j'ai pas encore eu le temps d'optimiser le principe de la routine, mais ça me suffit pour mon taf. petit fichier zip avec les 4 fichiers Fichier routine creation calque.zip pensez à modifier les 2 lignes PathCC et PathLT, indiquez le dossier où sont les routines et les fichier .LIN Voila ma petite contribution

pas simple ce cas. j'ai l'habitude d'avoir à poser (enfin sur mes plans) les caniveaux Multiline de chez aco drain, en forme courbe, ça n'existe pas. par contre, il existe en longueur 50cm et 1m. le site de Aco drain c'est http://www.aco.fr. A voir si il peut faire un modèle sur mesure à ton projet, on sait jamais. Par contre, ça m'arrive souvent, de réaliser des "faux" caniveaux, c'est a dire, de réaliser le caniveau dans l'aménagement, et juste poser une grille au dessus. A noter, je crois, que pour les établissements scolaire, il y a une réglementation concernant les dimensions des ouvertures dans les grilles (pour les enfants en bas age, il faut pas qu'ils puissent pas passer les doigts).

si c'est une dalle béton avec une étanchéité prévue dessus, le DTU impose une pente de 2% mini pour une terrasse accessible aux véhicules.

salut, moi j'avais un souci identiques entre copier/coller d'un fichier a un autre, depuis, j'ai trouver la solution en vidant la liste des échelles d'annotations (commande "_scalelistedit"). Depuis, j'ai plus ce problème. je suis sur la version complète d'Autocad, mais je pense que ça doit être pareil sur la version LT

Je conseille de laisser la commande Base à 0,0,0, et de mettre le SCU en général avant d'insérer l'XREF.

Il y a dû avoir une routine lisp ou VBA qui gère cela. L'idée que AutoCAD puisse détecter l'indice est faisable via une routine, mais comme le précise silversurfer78, il ne faut pas que le fichier soit utiliser ailleurs en XREF.

ça a l'air de correspondre à la moyenne nationale mesurée en 2006 (selon le moniteur ).

Intéressant comme site. En France, il n'existe pas l'équivalent, en cherchant un peu, on trouve les salaires moyen par métier. C'est pas simple de le calculer, car il y a beaucoup de paramètre qui rentre en compte : - Ton niveau dans une grille de salaire concernant la branche d'activité de l'entreprise. - La Convention collective du secteur d'activité de l'entreprise. En effet, elle donne des charges plus ou moins variable. - Si l'entreprise donne un 13e mois. - Les cotisations sociales. - Si c'est une entreprise du privée ou public. - La région où se trouve l'entreprise. En effet, dans les conventions collective, il y a des avenants pour tel ou tel département. Par exemple, la C.C. du Bâtiment (c'est mon cas, je travaille dans le groupe Bouygues), il existe un chapitre concernant les entreprises en région parisienne et un chapitre pour le reste de la France. Et dans la partie Région Parisienne, il y a des avenants concernant les ouvriers d'un des départements. - etc... Il est quasiment impossible de synthétiser pour obtenir rapidement le calcul. Le plus simple est de partir sur le principe d'enlever 20 à 25% du salaire brût. De plus en France, les employeurs raisonnent en salaire brut annuel. Dans mon cas, cela donne un salaire net correspond à environ 73% du salaire brut.

Salut, En gros le salaire net correspond à 75% du salaire brut. C'est comme cela que je calcule. Après, faut voir les "avantages" comme les ticket resto., prime, 13e mois, etc... voila,

Salut, Tous dépend de comment est géré le projet BTP. En général sur les gros projet, il y a une armoire à plan qui impose à tous les intervenant de travailler par niveaux (bien que suivant les corps d'état, cela ne soit pas tous le temps respecté). Sur les très gros projet, ils est déconseillé de travailler sur Autocad avec plusieurs niveaux sur le même fichiers. Je vais prendre l'exemple de 2 chantiers où je réalise l'étude de l'étanchéité, sur la Tour T1, j'ai voulu faire 1 fichier Autocad avec tous les niveaux où mes ouvriers vont bosser, et ben, c'est la galère pour ouvrir le fichier. Je ne parle même pas de la mise sur l'armoire à plan, vu que les XREF sont banni (tous mettre en blocs). Sur la Tour Granite, j'ai opté pour 1 fichier par niveau, et cela me pose plus le même problème. Sur des petits projets de logement, j'opte plutôt pour 1 fichier pour le RDC (c'est souvent le plus compliqué), puis 1 fichier pour les étages & par type d'étanchéité. Je gère plutôt les niveaux de bâtiments par rapport aux répertoire dans Windows : Département Nom projet Originaux Archi NIV01 NIV02 RDC SS1 SS2 GO NIV01 NIV02 RDC SS1 SS2 Plombier NIV01 NIV02 RDC SS1 SS2 Etanchéité NIV01 NIV02 RDC SS1 SS2 dans le BTP, généralement, 90% des corps d'états fait un fichier AutoCad par niveaux. Mais récemment, je suis tombé sur un architectes qui m'as transmis 1 fichiers AutoCAD avec tous le projet (Coupes et plans de tous les niveaux de tous les bâtiments).

C'est une bonne question, Moi je bosse dans une société d'étanchéité et généralement ce type d'aménagement est confié à l'étancheur dans les CCTP, lors de la construction d'un bâtiment. Généralement les architectes lors de la conception du projet ne se prennent pas trop la tête et utilise soit les hachures de type "Sand" ou "Grass". Moi, comme je n'ai pas encore trouvé d'hachures de terrasse végétalisée, quand je conçois le calepinage de la terrasse (suivant les règles DTU ), j'utilise la hachure "Grass". Voila, Christophe

Salut, A l'époque j'ai du zappé ce message, ci joint le code que j'utilise. En effet, j'utilise ce principe de liaison Autocad -> Excel pour une gestion de "cartouche" pour les impressions automatiques de carnets de détails : Le fichier Xls n'a qu'une feuille (d'ou la raison du activesheet), et la ligne 1 du fichier Xls est le titre des colonnes (i+1) . Voila, -- Christophe Rosé [Edité le 11/10/2006 par Chrisfs]

si c'est juste recuperer des données pour les mettre dans Excel, la solution de Bred et JUJUZAZA est plus pratique. :) en VBA, tu peux faire des selections d'objets (methode thisdrawing.selectionssets), cliquez sur un objet (thisdrawing.utility.getentity) ou carrement tu recherche tous les objets de l'espace objet ou papier (for each variable in thisdrawing.modelspace). :casstet: Voila, bonne journée