|
VBasic : einlesen von koordinaten aus excel in autocad mit vba
startrek am 05.02.2006 um 18:42 Uhr (0)
Hi & Willkommen,hier ein Beispiel von Acad aus Excel:Code:Sub test() Const xlup& = -4162 Dim xlApp As Object, xlWB As Object Dim i&, acP#(2) Set xlApp = CreateObject("excel.application") Set xlWB = xlApp.workbooks.Open("d:mappe1.xls") With ThisDrawing.ModelSpace For i = 1 To xlWB.Sheets(1).Cells(xlApp.Rows.Count, 1).End(xlup).Row spalte A [x] acP(0) = xlWB.Sheets(1).Cells(i, 1) Spalte B [y] acP(1) = xlWB.Sheets(1).Cells(i, 2) Spalte C [z] acP(2) = xlWB.Sheets(1).Cells(i, 3) .AddPoint ...
| | In das Form VBasic wechseln |
|
AutoCAD VBA : Aus Excel Autocad aufrufen
startrek am 05.07.2005 um 13:15 Uhr (0)
Hi Goofy,starten kannst Du LT aus Excel vielleicht mit Shell, keine Ahnung, probier mal mit deinen Pfaden sowas:Code:Shell "c:programmeinternet exploreriexplore.exe e:index.htm"Vermute aber bald, das ist dann auch schon das Einzige, was Du mit VBA und LT machen kannst ... ;-)lg Nancy
| | In das Form AutoCAD VBA wechseln |
|
INVENTOR VBA : Excel Problem
startrek am 09.06.2006 um 10:47 Uhr (0)
Dann lass mal das as new Excel.Application weg,und nimm nur:Code:Dim oExl as ObjectAchja und schalt zum testen auch mal das On Error resume next aus;-)[edit] bzw. mach nach dem Get/CreateObject-Test ein: On error goto 0[/edit]Gruss Nancy[Diese Nachricht wurde von startrek am 09. Jun. 2006 editiert.]
| | In das Form INVENTOR VBA wechseln |
|
Excel : Markierung Datenbereich
startrek am 11.03.2006 um 15:10 Uhr (0)
Hi Daniel,wie man da drankommt?Entweder du setzt mal Activecell als Object, e.g.:Code:dim o as objectset o = activecellstopund guckst nun mal im Lokalfenster was o so alles kennt.Ansonsten - Literatur ..., hm da wäre noch die Lektüre des Objektkatalogs [F2] ;;-))Mal ernsthaft, Bücher für Excel-VBA zu empfehlen ist schwierig, aber wennschon dennschon, dann würd ich nen: "Michael Kofler - Excel programmieren" nehmen.Gruss Nancy
| | In das Form Excel wechseln |
|
Excel : Artikelverwaltung mit Excel oder besser Access
startrek am 29.04.2003 um 11:16 Uhr (0)
Hallo, ich denke mal schon dass es da Chancen gibt. Die Frage ist nur von welchen Datenmengen du sprichst und ob nur du darauf zugreifst, oder mehrere. Bei Kleineren (um die 1500 Zeilen/Datensätze) würde ich Excel wählen, weil es einfach mal flexibler ist.(aber auch unsicherer) Für Alles was darüber hinaus geht, ist vielleicht eine Datenbank angebrachter. Grüsse trek
| | In das Form Excel wechseln |
|
VBasic : VBA Excel Befehl
startrek am 11.02.2005 um 13:20 Uhr (0)
Hallo, nen Befehl gibts nicht, alternativ vielleicht mit Autofilter auf Nichtleere , ansonsten nur mit Schleifchen Code: Sub zzz() Dim i As Long, cell As Range For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row If Cells(i, 1) Then If cell Is Nothing Then Set cell = Cells(i, 1) _ Else Set cell = Union(cell, Cells(i, 1)) End If Next cell.Select End Sub Gruss Nancy -- ps: hier jibbet auch ein Excel-Forum ;-)
| | In das Form VBasic wechseln |
|
VBasic : Problem in der VBA-Programmierung
startrek am 12.01.2005 um 14:11 Uhr (0)
Nachtrag, was n dat eigentlich? Set objBase = RevolvedProduce_1 setze damit die Bohrung auf der aktuellen Körper drauf da fehlt entweder objApp oder objDoc davor, oder? Set objBase = objApp. RevolvedProduce_1 Oder was auch immer der Revolver_1 sein mag ..., sicher kein Element von Excel;-) Übrigens, wozu startest Du das Teil überhaupt aus Excel? Gruss Nancy
| | In das Form VBasic wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
startrek am 23.03.2006 um 22:48 Uhr (0)
Hi wwwilli,vergiss sowas wie Application.Dialogs() unter Acad/VBA, dieses Feature ist ein Office-Kind.Ich behaupte aber mal mit API ginge das vielleicht, aber das sieht dann noch schlimmer aus als mit dem Common-Dings. Also quickn dirty wenns nicht kompliziert sein soll,verweise/binde zB. Excel ein, borg dir von da die Dialogs() und setz Excel wieder auf nothing, wenn du hast was du wolltest.Gruss Nancy
| | In das Form Autocad VBA wechseln |
|
Excel : Mehrere Ansichten eines xls eingebettet in doc?
startrek am 17.11.2011 um 20:42 Uhr (0)
Ich dachts mir fast, du suchst nach sowas ähnlichem wie verknüpftes Bild einfügen (Kamera) in Excel?Also eine Art dateiinterne Referenzierung ohne externe Bezüge/Quellen.Zumindest für meinen Teil als Word-N00b muss ich jetzt passen, hier weiss ich echt nimmer weiter ...[trekedi: Alternativ, ohne jetzt den Umfang deiner *.doc zu kennen, würde ich abwägen, ob es lohnenswert wäre, das Ganze gänzlich in Excel abzuhandeln. Dann könntest Du zB o.g. genannte Funktion nutzen und Excel lässt sich auch ein Stück wei ...
| | In das Form Excel wechseln |
|
Autocad VBA : koordinaten von excel nach autocad
startrek am 29.06.2005 um 22:32 Uhr (0)
Abend sTixi, ... ich mach mal den Anfang. Was sollen die Coords denne bewirken? Möchtest du Punkte zeichnen/setzen? Oder Polylinien aus den Stütz-punkt-en erzeugen oder was? So schwer eigentlich nicht, wenn man das Objektmodell von acad und excel ein bisserl kennt. wie wärs damit? http://ww3.cad.de/foren/ubb/Forum259/HTML/000498.shtml Weiss ja nicht was du planst, aber das ginge glaube ebenso mit einem Script *.scr, also einfach mal so ganz ohne vba;-) Bin aber da auch nicht der Überflieger, jedem das W ...
| | In das Form Autocad VBA wechseln |
|
AutoLisp : Nachbar Zelle aus Tabelle
startrek am 29.06.2005 um 13:47 Uhr (0)
Hi, mal auf die Schnelle, ist weder Lisp noch besonders hübsch. Nur n kleiner Ansatz, wobei so ganz ohne Excel, nur als Liste bzw. Textfile könnt ich mir das auch vorstellen;-) Gruss Nancy Code: Sub x() Dim xlapp As Object, wb As Object Dim arr, i&, p#(2) Set xlapp = CreateObject( Excel.application ) Set wb = xlapp.workbooks.Open( D:Mappe1.xls ) arr = wb.sheets( Tabelle1 ).range( A1:B1000 ) wb.Close 0 Set xlapp = Nothing For i = LBound(arr, 1) To UBound(arr, 1) If arr(i, 1) ...
| | In das Form AutoLisp wechseln |
|
INVENTOR VBA : Den Text in i Properties als Variable eintragen
startrek am 23.01.2005 um 15:19 Uhr (0)
Hi Kristof, sorrysorry, da hab ich dich total falsch verstanden ;-( Ich dachte Du willst von IV nach Excel schreiben und nicht umgekehrt ... In dem Falle brauchst Du Excel nicht zu instanzieren, startest ja daraus, aber für die Diva musste es tun. Allerdings kann ich dir da nun garnich helfen, ... isch abe gar kein Inventor ;-) Könnte vielleicht so ausschauen, keine Ahnung: Code: dim Diva as Inventor.application dim IVDoc as Document set Diva = New Inventor.application set IVDoc = Diva.Documents.open( P ...
| | In das Form INVENTOR VBA wechseln |
|
Excel : Felddefinition in ACCESS bei EXCEL-Verknüpfung
startrek am 08.03.2007 um 00:08 Uhr (0)
Hallo,bin mir jetzt nicht sicher, ob ich nicht den totalen Unfug verzapfe ...(habe kein Access), deswegen nur als Krücke gedacht/versuchen.Mit einem vorangestellten/einleitendem (Hochkomma) werdens in Excel recht sicher Texte.Inwiefern das aber dann im Zusammenspiel mit der *.mdb klappt, weiss ich nicht.Wiegesagt - nur als eventueller Versuch - absolut möglich, man kommt damit vom Regen eher in die Traufe;-)Grüsse, Nancy
| | In das Form Excel wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
