|
Autocad VBA : VB Programm als VBA ?!?!
startrek am 07.04.2004 um 14:51 Uhr (0)
Hi Feyza, ansatzweise nur ... and I m alles andre als perfekt, musst halt noch bissel probieren. BTW , nette Systeminfo CU Nancy -- Option Explicit Public dateiname$, pfad$ Private Sub cmdSchließen_Click() Unload Me End Sub Private Sub cmdÖffnen_Click() Dim dummy, i For i = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(i) Then _ lblFehler.Caption = "Öffne " & pfad & ListBox1.List(i) Next dummy = Shell("C:ProgrammeMDT6acad.exe " & filDateiAuswahl.Path & "" & ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : mit Profil starten
startrek am 22.07.2004 um 15:02 Uhr (0)
Hi, tippe mal im Direktfenster: ?autocad.preferences.profiles.activeprofile [Enter] Rein theoretisch und ungetestet hiesse das dann etwa: acad.preferences.profiles.activeprofile= ProfilXYZ Aber wie gesagt, habs nich probiert lg Nancy
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Autocad gestartet ?
startrek am 25.08.2004 um 12:12 Uhr (0)
Hi HJ, zwei Vorschläge: http://ww3.cad.de/foren/ubb/Forum259/HTML/000315.shtml http://ww3.cad.de/foren/ubb/Forum110/HTML/000253.shtml bzw. such halt auch mal im VB-Forum nach Prozess o.ä. ;-) lg Nancy
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Autocad gestartet ? Teil 2
startrek am 26.08.2004 um 00:29 Uhr (0)
Hallo Hajo,nich dass ich jetz eine Antwort auf deine Frage wüsste ...,aber Gegenfrage: Wozu ein neuer Thread ?Bleib doch beim alten, die Frequenz hier ist eh nicht so furchtbar schlimm, als obs diesen bräuchte ... und die Chancen auf Antworten werden dadurch nicht unbedingt besser lg Nancy
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad gestartet ? Teil 2
startrek am 26.08.2004 um 11:21 Uhr (0)
Hi Hajo,klar wars keine Hilfe ;-)hm okay, ich weiss zwar überhaupt nicht wie:429 Objekterstellung durch ActiveX-Komponente nicht möglichbei Dir entsteht, aber vielleicht sollte man das, also KANN er überhauptAutocad starten, irgenwie vor dem acadApp.Visible = True, abfragen.Wissen tu ichs aber nicht wirklich, ich hoffe jemand anders.lg Nancy
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : dvb aufräumen
startrek am 06.09.2004 um 16:50 Uhr (0)
Hi TP, gute Frage. Nun, der Link betrifft zwar nicht Autocad: http://mypage.bluewin.ch/reprobst/WordFAQ/CodeClnr.htm aber vielleicht gibt s ja da paar sinngemäße Parallelen, wenn ja - was ich nicht weiss - dann bleibt wohl nur Exportieren in eine Neue. lg Nancy -- If a packet hits a pocket on a socket on a port, And the bus is interrupted as a very last resort, And the address of the memory makes your floppy disk abort, Then the socket packet pocket has an error to report!
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Suchen/Ersetzen via RegExp
startrek am 18.09.2004 um 13:45 Uhr (0)
Hi Axel, puhhh, Du bist ja wiewohl schon sehr tief in die Materie eingetaucht, was ich von mir nun nicht gerade behaupten kann. Dementsprechend flach fällt wohl auch mein Reply im Endeffekt aus. Von Perl hab ich absolut keinen Plan, von daher kann ich nix zu den Feinheiten & Unterschieden sagen. Die RegEx an sich sind schon ein mächtiges Werkzeug, aber eben auch hammermässig schwierig. Ich hab mich da bisher auch nur auf die einfachsten Sachen beschränkt, wie halt wenn man mal fix paar dTexte ändern w ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Suchen/Ersetzen via RegExp
startrek am 18.09.2004 um 20:31 Uhr (0)
Damit meinte ich, dass es unter VB(A) doch nicht reicht, nur einen Kommentar einzufügen, um auf etwas zu verweisen. Ahso - nun, ich hielt es für wesentlich gesünder dem geneigten Tester einen Hinweis zu geben, wo ein Haken zu machen ist, als dass ich erstmal jemandes System verwirre, nur weil trekkie mal versucht hat, eine Lib automatisch laden. Jaja, hier sindse wieder die vba-kiddies, keine Ahnung wie se ne DLL korrekt aufrufen, ich geh dann mal besser Schleudereuter spielen ;-) Okay - ernstha ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
startrek am 23.11.2004 um 09:40 Uhr (0)
Tobias, VBA kennt kein Pi. Die Zahl wirst Du wohl oder übel erstmal hinterlegen müssen. Gibt es denn nun ein eigenes Dateiformat in VBA zum tabellarischen Ablegen von ausgelesenen Daten? Nun, am besten Du lässt die Endung gleich ganz weg ... Das ist doch schnurz, es kommt auf s Trennzeichen an, Tab, Kommata, Semikolon, $, |, weissderGeier Momentan schreibst Du eh nur ein Textfile mit der Endung *.xls, wenn Du diese mit Excel öffnest, hast Du sicher schon bemerkt, dass erst mal der Texterkennungsassi a ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
startrek am 23.11.2004 um 14:03 Uhr (0)
Code: Sub Träume_am_laufenden_Block() Dim elem As AcadEntity Dim rownum As Long, ip As Variant Dim ExcelApp As Excel.Application Dim ExcelWbk As Excel.Workbook Dim ExcelWks As Excel.Worksheet rownum = 2 Set ExcelApp = New Excel.Application Set ExcelWbk = ExcelApp.Workbooks.Add ExcelApp.ActiveWorkbook.SaveAs "D:Mappe1.xls" Set ExcelWks = ExcelWbk.ActiveSheet With ExcelWks .Cells(1, 1) = "x": .Cells(1, 2) = "y" usw For Each elem In ThisDrawing.ModelSpace If TypeOf elem Is IAcadBlockReferenc ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
startrek am 23.11.2004 um 14:36 Uhr (0)
tja, dumm gelaufen ;-) versuchs mal mit Excelapp vor Worksheetfunction Code: .Cells(rownum, 4) = elem.Rotation * 180 / ExcelApp .WorksheetFunction.Pi ansonsten bin ich für meinen Teil planlos. Nancy
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
startrek am 23.11.2004 um 16:45 Uhr (0)
Dein Winkelproblem kann ich nicht nachvollziehen, ebensowenig wie das was Du da zusammencodest. Prüfe mal die Werte im Direktfenster / Lokalfenster [elem] Die kannst Du ja ggf. via copypaste in Excel einfügen und dann Daten/Text in Spalten ... Code: Sub x() Const Pi# = 3.14159265358979 Dim elem As AcadEntity, ip For Each elem In ThisDrawing.ModelSpace If TypeOf elem Is IAcadBlockReference Then ip = elem.InsertionPoint Debug.Print ip(0), ip(1), ip(2), elem.Rotat ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
startrek am 24.11.2004 um 09:31 Uhr (0)
Moin Tobias, nen Tip hab ich nicht auf die Schnelle, ausser geh mal die Sub im Einzelschritt mit F8 durch. Im Lokalfenster schaust Du mal, sobald elem belegt wurde, was da unter Rotation steht und vergleichst mal mit den Werten im Direktfenster. Sorry, bin etwas in Eile, siehe Pic. Gruss Nancy
|
| In das Form Autocad VBA wechseln |