ganok

Erf, c'est vraiment trop complique pour un novice... C'est vraiment de le bidouille avec la version LT. Je laisse tomber :casstet: En tout cas merci d'avoir pris le temps de m'aider. C'est tres gentil de votre part. Cordialement.

Merci pour vos reponses. Bonuscad a bien cerne mon probleme, de plus j'ai oublie de precise que j'utilise une version anglophone de l'application. Je vais essaye de me debrouiller avec la solution de Bonuscad mais la commande SELECT s'exectute elle aussi via une boite de dialogue alors>>> :casstet: Ah... LT... pourquoi es tu si limite?

:) "rechercher" = "find" en anglais mais merci quand meme. ;) edit : pas litteralement bien sur mais au niveau de la fonction... Desole pour le quiproquo. [Edité le 25/7/2005 par ganok]

Re ;) , Je souhaiterais savoir si il existe l'equivalent de la fonction FIND, cad remplacer une ligne de texte par une autre, mais sans passer par une boite de dialogue, donc uniquement par la ligne de commande. J'ai essaye -FIND et filedia 0 mais dans le 1er cas la commande n'est pas reconue et dans le second, la boite de dialogue est toujours affichee... Merci de votre aide.

En effet c'est une solution. :) Puisque l'on a les coordonnees du blocJe pense faire cela depuis Access en utilisant le code suivant que j'avais cree pour une autre applicatron: Dim cmd As String Dim chan 'initialisation DDE Autocad LT chan = DDEInitiate("AutoCAD LT.DDE", "System") Dim db As Database Dim rs As DAO.Recordset Set db = CurrentDb() Set rs = db.OpenRecordset(nom_table) rs.MoveFirst 'se place sur le 1er enregistrement Do Until rs.EOF 'tant qu'il y a des enregistrements cmd = "-insert" + Chr(13) + Nz(rs("VisioShape")) + Chr(13) + RTrim(rs("X")) + Chr(44) + RTrim(rs("Y")) + Chr(13) + Trim(rs("Width")) + Chr(13) + Trim(rs("Height")) + " 0" + Chr(13) + Nz(rs("ModelNo"), " ") + Chr(13) + Nz(rs("Name"), " ") + Chr(13) 'caractere "retour chariot" pour validation commande DDEExecute chan, cmd 'executer commande DoEvents DDETerminate chan 'fermeture liaison Autocad chan = DDEInitiate("AutoCAD LT.DDE", "System") 'ouverture liaison Autocad Loop rs.Close Set rs = Nothing Voila si ca peut etre utile a quelqu'un... Cordialement. [Edité le 25/7/2005 par ganok]

Heu... En fait j'avais dans l'espoir de pouvoir editer les attributs, depuis le fichier texte genere par AutoCAD, avec Excel ou Acces via VBA. Puis d'importer ce fichier texte ainsi modifie dans le dessin DWG afin de changer tous les attributs de tous les blocs d'un seul coup. Est ce possible? [Edité le 25/7/2005 par ganok]

Magnifique! Un GRAND merci a toi rebcao et a toute l'equipe du site ainsi qu'a tous ses utilisateurs. Une bonne journee a tout le monde. ;)

Bonjour, J'ai un petit probleme que je souhaite vous exposer. Cela concerne la commande ATTEXT. J'ai cree un simple bloc avec 2 attributs ainsi qu'un fichier TEMPLATE.TXT contenant les informations suivantes: BL:NAME C010000 BL:X N008002 BL:Y N008002 J'execute donc la commande ATTEXT en selectionnant le format CDF, le bloc, le template et le fichier de destination. Aucun message d'erreur mais lorsque j'ouvre le fichier TXT cree, il est vide... :( Merci d'avoir prit mon probleme en consideration.

Arghhh :mad: J'y crois pas! C'etait sous mon nez depuis le debut et je ne l'avais pas vu!!! Un grand merci! ;)

Merci, mais j'avais bien precise sans passer par "scale" (="echelle" en francais ;) ) Je voudraisentrer des dimensions... Ex : Height = XX Width = XX Mais je commence a serieusement douter de la possibilite de faire une telle action... :( Si quelqu'un a une autre idee... Encore merci!

Bonjuor, Je voudrais savoir si il existe une commande pour redimensionner un bloc sans passer par "scale"... Je voudrais choisir independament la hauteur et la largeur du bloc. Est ce possible? Merci!