|
Rund um Autocad : Ersetzen von Blöcken
startrek am 16.09.2004 um 13:00 Uhr (0)
Yeah , Glückwunsch auch von mir lg Nancy
| | In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Texte ersetzen
startrek am 31.01.2005 um 00:00 Uhr (0)
reichlich OT, aber nett rübergebracht ;-),kenn ich auch irgenwoher ... alte codes von einem selbst zu lesen & und nicht darüber zu schmunzeln ...Von daher, würde auch morgen alles anders machen als gestern & heute[und wenns *nur* ne fielmann-Brille ist] ;;-))Wenns nicht so wäre, hat man entweder den Stein der Weisen bereits entdeckt oder ist tot ...lg Nancy -- ps: war echt kein effektiver Beitrag, nur Gelaber :dream
| | In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : text aus dwg exportieren
startrek am 08.03.2005 um 21:53 Uhr (0)
auch noch ein Vorschlag, Ja die lieben und-color: #FFFF99'>MTexte machen einem hier das Leben schwer, habs mal der einfachheit halber simply in ne txt geschrieben, mit nem $ als Trenner, muss man dann halt unter Excel in Zeilenumbrüche ersetzen oder Daten Text in Spalten especially für und-color: #FFFF99'>MTexte freilich ;-) Alle andren Formatierungen ebenso aussen vor, das wird sonst bissel heftiger [isMirSchlecht;-)] ... lg Nancy Code: Sub xx() Dim i&, s$, arr With ThisDrawing.ModelSpace Open d: extit.txt For Output As #1 For i ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : MTEXT
startrek am 05.02.2006 um 12:22 Uhr (0)
Hi Antor,nicht besonders getestet, also eher für simple und-color: #FFFF99'>MTexte,kannst du mal folgendes probieren:Code:Sub del_second_row() Dim sset As AcadSelectionSet, ent As AcadEntity Dim rex As Object Set sset = ActiveDocument.SelectionSets.Add("set3") sset.SelectOnScreen Set rex = CreateObject("vbscript.regexp") rex.Global = True rex.Pattern = "(.*?P)(.*?P)(.*)" For Each ent In sset If TypeOf ent Is IAcadMText Then ent.TextString = rex.Replace(ent.TextString, "$1$3") End If Next sset.Delete Set ...
| | In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Textstile global in und-color: #FFFF99'>MTexten ändern
startrek am 27.01.2005 um 22:48 Uhr (0)
Naja, okay ..., lass ich mal so gelten ;-) Eins kann ich mir nur nicht verkneifen, es geht ja hier nicht um Molos Texte sondern global/pauschal um und-color: #FFFF99'>MTexte. Ein geupptes beispiel von Mortens und-color: #FFFF99'>MTexten besteht halt nur aus Mortens und-color: #FFFF99'>MTexten, wird aber programmtechnisch nie allgemeingültig sein, sondern immer nur Molo-Text-gültig sein. Aber darum ging ja die ganze Kiste eigentlich - eben um die Allgemeingültigkeit ... Da ich Mtext kaum einsetze und dann innerhalb des Textes keine Formatänderungen habe, wa ...
| | In das Form Rund um Autocad wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |