Tireli-Pimpon

^C^C_-execvba;"CreaCalque" fonctionne parfaitement......tandis que ^C^C_runvba;"CreaCalque" ne fait absolument rien.... problème contourné..... Merci 1000 fois....

MDSV31 Il n'y a aucun problème, mais..... Comment faire.... Il n'est pas parfait mais c'est du "Open Source"..... ;)

Rectification : DXF signifi pas "Drawing Interchange Format" comme le dit l'aide de 2005 mais Drawing eXhange Format, d'où DXF....

Moi je fait comme suit: 1°) menu: Outils Autolisp Charger dans la fenetre je choisi "contenu" la je charge "CréationCalque.dvb" 2°) ^C^C_vbarun;"CréaCalque" Comme cela ton fichier dvb est toujours charger lorsque tu demarre Autocad, ainsi tu n'est pas obliger de mettre tout le chemin dans le bouton @+ MDSV31 GGGRRR ! ! ! C'est exactement ce que je fais ! ! ! Donc, je ne comprend plus rien.... Mais merci MDSV31....

Bon, alors c'est que j'ai un problème dans la déclaration de ma macro.... Dans la liste des macros (Alt+F8) j'ai : "c:\patati...\patata...\CréaCalque.dvb!Module1.CréaCalque" J'ai bon ? :casstet:

Il y a dans AutoCAD ce qui s'apelle : "NORME CAO" qui sert de passerelle entre plusieurs DWG. C'est ce que j'utilise pour fournir mes DWG à l'administration.... Avec leurs dénomination à la con comme FH1, ou FGT....... Bref, il fait un lien entre deux type de DWG.... Si çà a aidé quelqu'un.... J'ai bien fais...... Si non, Cà m'a occupé..... ;)

Salut, m'ayant aidé plusieurs fois, je tente de le faire à mon tour... Voici quelques App.VBA qui, je pense résoudront ce problème : Sub ad_AcadPath() ' This routine demonstrates the retrieval of the path ' of the AutoCAD executable. 'Demand load: -vbarun;ad_Utility.dvb!ad_AcadPath; Dim adAcad As AcadApplication Dim adAcadPath As String Set adAcad = AcadApplication adAcadPath = adAcad.Path MsgBox adAcadPath End Sub Je crois que j'en ai d'autres mais ça reste à voir....... Je cherche......

Merci pour cette astuce Maximilien, mais.... Je n'ai absolument rien trouvé avec DXF.... Sauf Drawing Interchange Format.....Je rame..... Hé M'sieur, j'pourrais avoir encore un peu d'aide ? ? Merci quand même....

Le code DXF ? ? Waow ! ! Le code du format de fichier d'échange d'AutoCAD ! ! Alors là, je n'y avais pas penser.... J'y vais de ce pas... Merci...

Rebonjour... Je cherche des outils topographiques, (carroyage, ....) en VBA pour pouvoir éventuellement les retoucher pour les personnaliser... Je met aussi à disposition une petite VBA qui créer des calques en série, à savoir : Pour un lotissement (par exemple): on entre, dans une fenêtre, le nombre de lot, et le type de "sous-calque" et ma VBA les créé, ex - Lotissement A - 18 lot - Contour - Texte - Superficie - Cotation - Zone constructible.......... Et la VBA créé les calques Lotissement A - Lot 01 - Contour Lotissement A - Lot 01 - Texte Lotissement A - Lot 01 - Superficie Lotissement A - Lot 01 - Cotation ...................................................... Un code couleur leurs sont associés et mes 'trames" (hachures de type solid" sont en couleur se terminant par 1 (171 bleu - 91 vert...) et un autre petit truc (qui me plait) s'il y a 5 lots, ils seront numérotés 1, 2, 3, 4 et 5 mais s'il y en a 46 ou 294, ils auront comme numéro 01, 02, 03, 04, 05, 06, 07, 08, 09, 10, 11, 12, 12 ou 001, 002, 003, 004...... Vous avez compris ? C'est uniquement pour que les calques du lot 2 soit triés avant ceux du lot 20, car les calques d'AutoCAD sont triés par ordre alphabétique.... Donc 1, 10, 11, 12, 13.....18, 19, 2, 20, 21, 22.....29, 3, 30, 31 C'est ce que mon humble expériance en VBA m'a permit de faire.... Bienvenue à toute suggestions..... Bien à vous...

Bonjours massieurs, Voilà, j'ai essayé plusieurs des astuces, si ce n'est pas toutes, et aucune ne fonctionne. C'est tout bête : Je clique sur un bouton et une macro s'exécute.... La macro se charge automatiquement au démarrage...

Bonjour messieurs, Voilà, comment faire pour créer un "multi-texte" avec son point d'insertion (ou justification "Haut centre"...

Encore une petite question. Comment centrer 2 MultiText, l'un au dessus de l'autre, dans deux calques séparés et toujours en VBA... Je commence à en voire la fin...

Pour répondre à Rebcao, je ne connais absolument rien du DIESEL, ni du LISP, si ce n'est que l'un est le père de l'autre... Et pour répondre à Didier, j'ai souvent du 1/1000 ou 1/2000 dans le cartouche, du 1/500 ou 1/1000 dans le plan et quelquefois des petits agrandissements au 1/200 ou 1/250. Et le plus souvent ce sont des références cadastrales avec leurs superficies. Le tout en espace papier, donc, j'ai donc en majeur partie les calques : Cadastre (1000) noir Cadastre (500) noir ........ et patati, et patata. ces deux calques comportent exactement le même texte mais à des hauteures différentes Plus Cadastre (1000) Superficie jaune Cadastre (500) Superficie jaune même chose pour ces deux calques là J'ai parfois 3 voir 4 calques identiques... On retrouve donc : Cadastre : section AE numéro 256 Contenance cadastrale = 2a 52ca Et ce, dans chaque calque.... Je me suis donc mis en tête d'automatiser ce truc.... Mais j'y arriverai... J'ai bientôt fini une macro pour créer des calques.... avec des numéros de lots comme pour les lotissements.... Merci encore à tous.....

Merci à tous les deux, je commence à m'en sortir..... Je débute en VBA, je ne connais qu'un peu VB, et je dessine sur AutoCAD depuis la version 9..... Davantage d'avantages avantagent davantage Boby Lapointe