|
Rund um AutoCAD : Breite Zeichnung auf mehrere Seiten plotten
Bernd P am 28.01.2013 um 11:50 Uhr (1)
Servus,Sind die Blätter alle in einem Layout? Wem ist den das Eingefallen?Wenn die Blätter in einem gleiche bleibenden Raster sind kann man das über ein script lösen.Wenn die Blätter Blöcke sind kann man das auch lösen.Beispiel dwg wäre hilfreich.Code:Befehl: -plotDetaillierte Plotkonfiguration? [Ja/Nein] Nein: jLayoutnamen eingeben oder [?] Modell:Ausgabegerätname eingeben oder [?] PDF-XChange 4.0 Lite.pc3:Papierformat angeben oder [?] 1050x1050:Papiereinheiten angeben [Zoll/Millimeter] Millimeter:Ausrich ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoCAD VBA : sendcommand
Bernd P am 21.09.2007 um 12:38 Uhr (0)
ServusWill aus Excel einen Befehl in Autocad aufrufen und hab das im Forum gefunden. Der Befehl wird durch Formeln zusammengestellt und steht in im Layout Bestimmt Zelle D13.Ich weiß das bei vbastmt der Befehl aus der Zelle reingehört aber wie hab ich keinen Schimmer.Der Befehl dreht in Acad das UCS auf Welt setzt einen Block mit Attribut und dreht dann UCS wieder zurück.Code:(command "_ucs" "_w") (command "_insert" "Kot_Hoehe_LP" "-101941.8499051,203057.2992329" "" "" "" "1023.2" ) (command "_ucs" "_p")Co ...
|
| In das Form AutoCAD VBA wechseln |
 |
Lisp : View in andere DWG
Bernd P am 14.04.2016 um 11:03 Uhr (15)
danke.... hier der code ohne drehungCode:(defun c:viewex ()(setq file (open "C://TEMP//Koordinaten.txt" "w"))(setq CENTER (strcat (rtos (car (getvar "VIEWCTR")) 2 3) "," (rtos (cadr (getvar "VIEWCTR")) 2 3)))(setq HOEHE (getvar "VIEWSIZE"))(write-line CENTER file)(princ HOEHE file)(close file))(defun c:viewin ()(setq file (open "C://TEMP//Koordinaten.txt" "r"))(setq CENTER (read-line file))(setq HOEHE (read-line file))(command "_zoom" "m" CENTER HOEHE))----------------------- Bitte Systeminfo eintragen, wa ...
|
| In das Form Lisp wechseln |
|
Autodesk GIS Produkte : WMS Text zu klein
Bernd P am 18.02.2016 um 09:58 Uhr (1)
Servus,Das Problem ist das Autodesk es mit den Maßstäben (bei Darstellung und Sil) bei Rasterdaten verschludert hat.- OSM kann nicht als Übersichtskarte M=1:10.000 verwenden weil beim Plotten auf M=1:1.000 gezoomt wird und die Texte unbrauchbar werden (aber das weißt du eh schon)- Man kann auch keine 2 Rasterlayer in verschieden Maßstabsbereichen verwenden. (Luftbild im Maßstabsbereich 0-5000 und OSM 5001-unendlich es wird das Luftbild beim plotten verwendet)Ich nehme an das bei dem WMS Daten von tobwo die ...
|
| In das Form Autodesk GIS Produkte wechseln |
|
AutoCAD Civil 3D : Problem mit Bing Maps Einbindung
Bernd P am 27.06.2016 um 09:56 Uhr (1)
Zitat:Original erstellt von CAD-Huebner:Würzburg liegt eindeutig im Bereich des 3. Gaus Krüger Streifensbei 49,79253° N, 9,945751° EEine Transformation der AutoCAD gEOMETRIEELEMENTE in den 4. Streifen ist mit MAP/Civil Bordmitteln möglich (Befehl: ADEQUERY) , aber aufgrund der Transformation außerhalb des Gültigkeitsbereichs werden WMS Dienste und die AutoCAD Geokartendienste (Bing Maps) dann keine Hintergrundkarte anzeigen.Servus,im Grunde bedeutet es das sie das falsche Koordinatensystem verwenden, und b ...
|
| In das Form AutoCAD Civil 3D wechseln |
|
Autodesk GIS Produkte : XREF Transformation falsch?
Bernd P am 22.06.2016 um 10:17 Uhr (1)
Servus,hab eine DWG in GKM31 und brauche sie in GKM341. GKM31 mit Map aufgemacht, Koordinatensystem EPSG 31255 zugewiesen, save, close.2. GKM34 erstellt, Koordinatensystem EPSG 31256 zugewiesen, GKM31 als Xref mit "Mithilfe Geographischer Daten suchen" eingefügt.3. Ergebnis: die GKM31 ist auf der falschen Position. (~5 KM falsch rechts oben)Frage: Mach ich da was falsch oder geht das einfach nicht richtig (Koordinatensystem und Koordinaten hab ich geprüft die passen)mit _ADEDRAWINGS, wird die richtige Posi ...
|
| In das Form Autodesk GIS Produkte wechseln |
|
Excel : Projektplanung in Excel: Automatische Berechnung von Anfang, Ende und Dauer
Bernd P am 04.05.2016 um 10:42 Uhr (1)
Servus, sobald etwas in den Spalte A:C etwas geändert wird die Nachricht (MsgBox) gezeigt.Das durch die VBA Berechnung ersetzen die für die jeweilige Spalte in Abhängigkeit der gegeben Werte passt (if)....Wobei mir die Lösung mit Berechnungspalten mehr gefällt....Code:Private Sub Worksheet_Change(ByVal Target As Range)If Not Intersect(Target, Range("A:A")) Is Nothing ThenMsgBox "Hier könnte deine Werbung stehen Spalte A"End IfIf Not Intersect(Target, Range("B:B")) Is Nothing ThenMsgBox "Hier könnte deine W ...
|
| In das Form Excel wechseln |
|
Lisp : View in andere DWG
Bernd P am 14.04.2016 um 09:01 Uhr (1)
Servus, nachdem ich des öfteren Zeichnungen vergleichen muss und diese nicht immer laden will/kann hab ich mir das lsp geschrieben.Viewex schreibt den gewählten Punktkoordinaten in eine TXTViewin holt ihn und zentriert auf diesen Punkt mit Höhe 50Die Frage ist, wie kann ich die gleich die Koordinaten und Höhe des Modellbereiches abgreifen so das ich exakt den selben Ausschnitt sehe?Code:(defun c:viewex ()(setq file (open "C://TEMP//Koordinaten.txt" "w"))(setq POINT1 (getpoint "
Punkt wählen: "))(setq TEXT ...
|
| In das Form Lisp wechseln |
|
Autodesk GIS Produkte : Verwenden von Farbe in Ausdrücken
Bernd P am 11.08.2016 um 09:06 Uhr (1)
Servus, hab einer SDF eine Eigenschaft mit RGB (HEX wäre auch möglich) hinzugefügt und will diese für die Farbe im Stil (Aufgabenfenster) verwenden.hab schon ein paar Dinge versucht.1. RGB Wert als Ausdruck oder Datenfeld hat gar nicht funktioniert 2. den HEX Code FF0000 mit 0xFF (0xFFFF0000) direkt als Ausdruck verwenden funktioniert, aus dem Datenfeld nicht.3. den HEX Code in Dezimal umgerechnet 0x16711680 direkt als Ausdruck verwenden ergibt die falsche Farbe, aus dem Datenfeld INT64 keine Darstellung.p ...
|
| In das Form Autodesk GIS Produkte wechseln |
|
Rund um AutoCAD : Layout Breite+Hoehe
Bernd P am 16.02.2024 um 07:38 Uhr (1)
Servus,Falls dein Ansatz nicht geht. Ich verwende den umgekehrten Ansatz.Abgestimmter dynamischer Planrahmen inkl. Voreingestellten DWG2PDF.pc3. Mit LSP wird beim plotten das Format anhand Extmin und Extmax gewählt. Ist das Format nicht vordefiniert wird max. Format verwendet.Hier ein paar Ansätze.... (Will nicht gesamt posten, da der nicht sauber ist )Wenn du EXTMIN gegen LIMMIN und EXTMAX gegen LIMMAX tauschst bekommst die Layoutwert.Code: (setq LX (atof(rtos (car (getvar "extmin")) 2 3)));x links unten ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : LSP endet mit Fehler
Bernd P am 24.01.2024 um 09:43 Uhr (1)
ServusDer Code läuft zwar, endet aber mit Befehl: ; Fehler: Fehlerhafte Funktion: "1:1".Woher kommt der Fehler? Ich finde ihn nicht. Der Code soll auch bei jedem Layout (foreach) durchlaufen, was der Fehler verhindert.Erstellt mit PDF to DWG ein PDF im Unterverzeichnis PDF-Entwuerfe des DWGs.Code:(defun c:PL_createPDF (/ PDF LX RX DX LY RY DY ) (setq PDF (strcat (getvar "dwgprefix") "PDF-Entwuerfe")) (VL-MKDIR PDF) ;Verzeichnis und Erstellen (setq PDF (strcat PDF "" (getvar "ctab") " Last"));DWG Datein ...
|
| In das Form Lisp wechseln |
|
Lisp : Plotbereich abfragen Seiteneinrichtung wählen
Bernd P am 19.08.2016 um 08:36 Uhr (1)
Servus,lädt aus der Acad.dwt (ändere ich noch) anhand der Zeichnungsgrenzen A4 A4Q A3 A3Q MAX (5080x5080) das Papierformat und weist es zu.Code:(defun C:autopaper (/ LX LY RX RY DX DY DXDY)(command "regenall" "_zoom" "_e")(setq LX (atof(rtos (car (getvar "extmin")) 2 0)))(setq LY (atof(rtos (cadr (getvar "extmin")) 2 0)))(setq RX (atof(rtos (car (getvar "extmax")) 2 0)))(setq RY (atof(rtos (cadr (getvar "extmax")) 2 0)))(setq DX (- RX LX))(setq DY (- RY LY))(setq DXDY (atof (strcat (rtos DX 2 0) (rtos DY 2 ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Konstruktionselemente einer DWG nach Erzeugungstag filtern
Bernd P am 27.08.2016 um 08:20 Uhr (1)
Servus, einfache Variante (keine Lösung) bei Änderung neue Datei bzw. eine Version speichern.Edit: es gibt dann im Netz auch Tools die Unterschiede zwischen Zeichnungen auflistet (keine Erfahrung)Code:;;; ***********************************************************************;;; erstellt den Ordner "Alt-Varianten" im aktuellen Verzeichnis;;; Speichert die "Zeichnung.dwg" als "Zeichnung Datum Uhrzeit.dwg";;; in den Ordner "Alt-Varianten";;;******************************************************************** ...
|
| In das Form Rund um AutoCAD wechseln |
