|
AutoCAD VBA : Versionsabhängikeiten
Goofy007 am 01.09.2009 um 09:20 Uhr (0)
Hallo Alfred,ich hab deinen Vorschlag jetzt so umgesezt.Code:...Dim AcFarbe As StringDim Version As StringDim Farbe As AcadAcCmColor ...Version = Left(ThisDrawing.Application.Version, 2)AcFarbe = "Autocad.accmcolor." & VersionSet Farbe = AcadApplication.GetInterfaceObject(AcFarbe)...Abschmieren ohne Zeichnung scheint mir nicht gefährlich zu seine, weil man ohne Zeichnung das Makro gar nicht starten kann.nochmals Danke und liebe GrüßeDidi
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : objectID
adblue am 02.09.2009 um 13:47 Uhr (0)
Hallo!ich habe gehört dass man mit der funktion objectID jedem autocad zeichen objekt eine eindeutige ID zuordnen kann. wie geht das? und wie frage ich diese id ab?beispiel code wäre super!!! danke
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : objectID
alfred neswadba am 02.09.2009 um 13:51 Uhr (0)
Hi, Zitat:ich habe gehört dass man mit der funktion objectID jedem autocad zeichen objekt eine eindeutige ID zuordnen kann...falsch gehört, denn die ObjectID wie auch der Handle sind von AutoCAD vergebene IDs, auf welche man keinen erzeugenden Zugriff hat.Mit dotNET und ObjectARX hast Du zwar die Möglichkeit, bestehenden Handles etwas anderes unterzujubeln, aber auch hier keine freie Wahl.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layer nach variable benennen
adblue am 05.09.2009 um 14:52 Uhr (0)
nächstes problem:ich will jetzt jeden layer durchschauen und nach einem bestimmten text im namen suchen:For Each objLayer In ThisDrawing.LayersDebug.Print InStr(1, "test", objLayer.name, vbTextCompare)next es kommen layer vor, die den begriff "test" im namen tragen wieso wird dann trotzdem bei der suche mit instr() immer 0 ausgegeben. welche besonderheit von autocad steckt da wieder dahinter?thx
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layer nach variable benennen
adblue am 05.09.2009 um 17:30 Uhr (0)
so hab alles hinbekommen. eine kleine frage noch: kann man die ebenen in autocad nach bestimmten kriterien sortieren lassen? oder hat man darauf keinen einfluss?
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layer nach variable benennen
runkelruebe am 05.09.2009 um 17:44 Uhr (0)
Hi,mit Ebenen meinst Du sicherlich Layer.Mit Sortieren meinst Du wahrscheinlich die Zeichnungsreihenfolge und nicht die Ansicht im Layereigenschaftenmanager.Versuch bitte, die passenden Fachbegriffe bei Deinen Fragen zu verwenden.Such dazu im Forum nach DrawOrderX. Anmerkung: Du wirst davon eine Demo finden, keine Vollversion.Es gibt imho noch andere tools, wie gesagt: Forensuche (im Rund um AutoCAD-Brett, link dazu in meiner Signatur) nach Zeichnungsreihenfolge und artverwandte Suchbegriffe.Kannst Dir sow ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : benannte Ansichten in Layouts umwandeln.
Netwurm am 09.09.2009 um 11:47 Uhr (0)
Guten Tag, ich habe ein Problem, mit dem ich zur Zeit nicht weiterkomme. Unzwar bekomme ich oft Dateien, wo die einzelnen Seiten als benannte Ansichten im Modelbereich gezeichnet sind.Nun muss ich diese Seiten in Layouts umwandeln. Also erstelle ich ein Layout mit dem jeweiligen Blattnahmen, dann ein Ansichtsfenster im Layout und zu guter Letzt stelle ich im verschiebaren Modelbereich die zum Blatt passende benannte Ansicht wieder her. Das ist ab 20 Blättern nicht mehr ganz so prickelnd. Darum wollte ich ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Block aus Header / aus Bibliothek einfügen
alfred neswadba am 10.09.2009 um 22:01 Uhr (0)
Hi Christian,da läuft irgendwas aber nicht so, wie ich es kenne. Wenn Du bereits eine Blockdefinition BAUM in der Zeichnung hast (und diese Definition in der Zeichnung bereits modifiziert hast); dann erneut den Einfügebefehl mit vollem Dateinamen angibst (z.B. C:AcadSymbBAUM.dwg), dann schaut AutoCAD schon selbst nach, obs die Blockdefinition schon gibt oder nicht.Lt. Deiner Beschreibung interpretiere ich, dass mit Deiner Version, wie Du den Block einfügst, die in der Zeichnung bestehende Blockdefinition ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Block aus Header / aus Bibliothek einfügen
otm am 11.09.2009 um 08:31 Uhr (0)
Hi Alfred,das dachte ich auch aber es klappt leider nicht.Foldender Code soll schauen, ob der Block in der Zeichnung vorhanden ist. (Der Code ist von verschiedenen Autoren zusammengetragen. Hier auch ein Dank an alle.)Wenn er vorhanden ist, dann den Code aus der Zeichnung nehmen.Wenn er nicht vorhanden ist, dann aus der Bibliothek "nachladen".Hauptprogramm:... Ist der gewünschte Block schon in der Zeichnung definiert ? Set Blockdef = GetBlockDef(BlkNameDWG) Block in die Zeichnung laden, wenn er nicht s ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AddText nimmt Koordinaten nicht
alfred neswadba am 15.09.2009 um 14:54 Uhr (0)
Hi, Ja, jetzt wo ich es sage, sieht es jeder, nicht wahr... Oh JA, da war wohl das erste Codeschnippsel Auslöser für zu oberflächlich überfliegen Deines größeren Codeteils, da war ich zumindest zu sehr fixiert auf wo ändern sich die Koordinaten auf 0,0,0. ...das selbe, wie wenn ich im DWG unter den Element-Eigenschaften die Ausrichtung auf "irgendwas" ändere...Na dann schau Dir mal das Eigenschaftsfenster im AutoCAD an, wenn Du die Ausrichtung von linksbündig auf zentriert stellst. Du wirst hier bemerk ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : nach bestimmten elem suchen
adblue am 13.09.2009 um 12:51 Uhr (0)
moin moinich brauche einen code um in einer autocad zeichnen bestimmte zeichenobjekte zu finden und dann zu löschen.das objekt ist ein text (elem.objectName = "AcDbText") es sollen aber nur texte gelöscht werden die als string (inhalt) "Falsch" beinhalten.kann da jemand bitte was basteln?danke
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Die Eigenschaft -VonLayer- auf einen -festen- Wert setzen
ela-cad am 13.09.2009 um 15:29 Uhr (0)
Hallo zusammen,vorweg: Ich bereite die Umstellung auf AutoCAD Archtecture 2010 vor (2 Arbeitsplätze), beschäftige mich mit dem Aufbau der Layerstruktur und bin noch ein Frischling in Sachen AutoCAD.Mein Wunsch: Ich habe funktionsbeschreibende Fayer z.B. EG_Heizung_VL, EG_Heizung_RL, EG_Heizung_HTB (Hinweise Texte Bemassung) und darstellungsbeschreibende Layer Stift_schwarz-0.25, Stift_rot-0.25 usw. definiert.Wenn ich Objekte auf verschiedenen Darstellungs-Layer erzeuge (der Funktions-Layer besitzt eine and ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Die Eigenschaft -VonLayer- auf einen -festen- Wert setzen
alfred neswadba am 13.09.2009 um 19:27 Uhr (0)
Hi,Du hast aber schon im Forum und auch in der AutoCAD-Hilfe Beispiele für Selektieren von Objekten, aus der Hilfe z.B. dieses:Code:Sub Example_Select() This example adds members to a selection set, first by crossing and then by filtering for circles. Create the selection set Dim ssetObj As AcadSelectionSet Set ssetObj = ThisDrawing.SelectionSets.Add("SSET") Add all object to the selection set that lie within a crossing of (28,17,0) and (-3.3, -3.6,0) Dim mode As Integer Dim corner1(0 ...
|
| In das Form AutoCAD VBA wechseln |
