|
AutoCAD VBA : Gummiband Funktion oder Blöcke vereinigen
stefanstein am 08.12.2009 um 15:34 Uhr (0)
Hallo,bin relativ neu in AutoCAD VBA und auch neu hier im Forum. Habe schon gesucht, aber vielleicht benutze ich nicht dir richtigen Begriffe.Ich möchte den gemeinsamen Flächeninhalt von mehreren übereinander liegenden Blöcken herausfinden (Vereinigungsmenge).Zuerst habe ich dies mit "Vereinigen" versucht, aber anscheinend ist dies für Blöcke nicht möglich.Gibt es eine Funktion, die sozusagen ein "Gummiband" um meine Blöcke legt, damit ich deren Flächeninhalt herausfinden kann? Ich habe im Anhang eine Skiz ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatisch Zeilenumbruch einfügen bei verringerter Seitenbreite
stefanstein am 09.01.2010 um 15:34 Uhr (0)
Hallo,ich stehe nun kurz vor der Vollendung meines ersten AutoCAD VBA Projektes (auch dank eurer Hilfe).Das Ganze muss ich in eine Word Datei kopieren. Da ich einen breiten Bildschirm besitze, habe ich lange Zeilen immer ausgeschrieben.Wenn ich dies nun einfach so kopiere wird bei einem Zeilenumbruch natürlich kein "_" eingefügt.Gibt es eine Möglichkeit, dass ich in meinen Code automatisch auf einen Seitenbreite von 15 cm mit automatischem Zeilenumbruch inkl. "_" umwandeln lassen kann?Damit ausCode:Sehr la ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Fehler beim Laden der Anwendung
stefanstein am 13.01.2010 um 13:22 Uhr (0)
Hallo,ich hoffe dies ist meine (vorerst) letzte Frage.Ich habe ein kleines VBA Programm unter AutoCAD 2009 geschrieben. Nun habe ich heute an der FH getestet, wo es letztendlich laufen muss.Die installierte Version dort ist AutoCAD 2010 MEP. Beim Ausführen des Programmes bekomme ich folgenden Fehler: Zitat:Lautzeitfehler -2147221005 (800401f3):Fehler beim Laden der AnwendungCode:Sub Example_GetInterfaceObject() This example returns top level object of another application. Dim poly As Object Set poly ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Fehler beim Laden der Anwendung
stefanstein am 13.01.2010 um 14:24 Uhr (0)
Entschuldige. Ich hätte das nicht vermischen sollen.Mir geht es nur um den folgenden Code. Nicht um Polycad (das war nur in der Hilfe und hat den selben Fehler ergeben, daher habe ich dies gepostet, um Fehler in meinem Code auszuschließen )Code:Dim aclayer As AcadLayerDim farbe As AcadAcCmColorSet aclayer = ThisDrawing.Layers.Add("huell")Dim farbe As AcadAcCmColorSet farbe = AcadApplication.GetInterfaceObject("AutoCAD.AcCmColor.17") Bei dieser Zeile der FehlerCall farbe.SetRGB(0, 0, 0)aclayer.TrueColor = ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
