|
Autocad VBA : Rechteck schraffieren
startrek am 18.10.2004 um 21:39 Uhr (0)
Nunja, geb ich mal auch noch meinen Senf dazu ;-) Ist nich viel, jedenfalls nur soviel: hab ja auch unter Excel begonnen und bin auch nicht grad der ACAD-Hirsch, so einiges habe ich mir unter xl auch selbst angeeignet, aber IMHO so ganz ohne Foren & Bücher - eher nicht ... ehrlichgesagt - auch schwer vorstellbar. Zurück zum Thema, auch ich hatte anfangs Probleme mit meinen Excel-Kenntnissen & Arrays, da diese wohl eher nur zB. mit Sheets oder Shapes vom Recorder aufgezeichnet werden. Bei reinen Range Ob ...
|
| In das Form Autocad VBA wechseln |
|
Excel : Makro aufzeichnen
startrek am 16.02.2007 um 22:28 Uhr (0)
Hallo,die R1C1 Notation bezieht sich absolut auf Rows(1)Columns(1) begonnen/bezogen auf deinen Bereich von oben links.Einfacher kommst du an die Formel der Zelle ran, wenn du mal den Cursor in der Zelle mit der Formel parkst und dann:Wechsel in die VBE-Umgebung via Alt+F11, dort im Direktfenster (wenn nicht aktiv via StrgG einschalten)tippst du einfach mal (die Zeile mit dem ? einfach nach Eingabe abentern):Code:?now16.02.2007 22:22:37 ?date16.02.2007 ?monthname(month(date))FebruarEs werden faktisch vorbel ...
|
| In das Form Excel wechseln |
|
Excel : Excel: Zeilen vergleichen und zusammenführen
startrek am 30.12.2006 um 22:46 Uhr (0)
Ich Fauli habs mal kommentiert, oder zumindest versucht;-)Code:Sub test() Dim i As Long Zeilenzähler Dim x As Integer Zähler um Arr() zu erweitern Dim flag As Boolean Dim arr As Variant ein DummyArray Dim arrIndex As Integer der Zähler fürs DummyArray With Sheets("Tabelle1") Überschrift und erste Datenzeile in ein Array shreiben transposed also statt Arr(1 to 2, 1 to 4) == Arr (1 to 4, 1 to 2) arr = Application.Transpose(Range(.Cells(1, 1), .Cells(2, 4))) x = 2 Schleife über alle beleg ...
|
| In das Form Excel wechseln |
|
INVENTOR VBA : Excel Problem
startrek am 09.06.2006 um 11:19 Uhr (0)
hmmm, schliess mal Excel und dann guck mal vorsichtshalber,ob da nicht noch ein-zwei Excel-Prozesse am Laufen sind.So als letzte Idee noch ...;-)lg Nancy
|
| In das Form INVENTOR VBA wechseln |
|
Excel : Symbolleiste abhängig von geöffneter Datei
startrek am 23.03.2004 um 21:55 Uhr (0)
Hi Toto, zum 1. deinem eigentlichen Problem: ... ungetestet, IMHO muss da ein string stehen: application.commandbars("Toto").visible = true achte auf die "" zum 2. Nebensache: hier mal ein Auszug wie ich das immer gemacht habe, anders kann ichs nun wieder nicht alles aufs workbook open Ereignis. CU Nancy -- Code: Option Explicit Private Sub Workbook_Open() On Error Resume Next Dim cb As CommandBar, cbb As CommandBarButton Application.CommandBars.Add("Kalkulation") BV auslagern S ...
|
| In das Form Excel wechseln |
|
Excel : Hilfe
startrek am 11.01.2005 um 12:32 Uhr (0)
Mahlzeit Demokrat, SE == ist ein Button in SolidEdge, mit dem Du Excel starten möchtest, ja? Code: Private Sub Tabelle_erzeugen_in_SE_Click() dim xlapp as object Set xlapp = CreateObject("Excel.application") with xlapp .Visible = True .workbooks.add .activeworkbook.activesheet.cells(1,1)="Hi!" end with End Sub Vielleicht fährst Du aber besser, wenn Du Dir im SE_VBE nen Verweis auf die Excel-Bibliothek setzt, da er dir dann gleich die Schlüsselwörter von Excel vorschlägt. ...
|
| In das Form Excel wechseln |
|
Autocad VBA : Probleme mit Excel
startrek am 23.11.2004 um 20:36 Uhr (0)
Unter 97 weiss ichs nicht genau, aber prinzipiell so: Code: Sub qwe() Dim ExcelApp As Excel.Application Dim ExcelWb As Excel.Workbook Set ExcelApp = New Excel.Application Set ExcelWb = ExcelApp.Workbooks.Open("d:Mappe1.xls") ExcelApp.Visible = 1 MsgBox ExcelWb.ActiveSheet.Name ExcelWb.Close 0 ExcelApp.Quit set excelapp=nothing set excelwb=nothing End Sub Steht aber zB beinahe schon in dem Thread mit über 40 Antworten ;-) Gruss Nancy
|
| In das Form Autocad VBA wechseln |
|
INVENTOR VBA : Den Text in i Properties als Variable eintragen
startrek am 22.01.2005 um 15:15 Uhr (0)
Hi Kristof, gibts in der OnlineHilfe zu IV kein Beispiel zur Interaktion mit Excel? Also sowas in der Art: Code: dim excelapp as Excel.application dim xlwb as workbook set excelapp = New Excel.application set xlwb = excelapp.workbooks.open( Pfad+Filename ) with xlwb.sheets( Tabelle1 ) .cells(1,1)= ....iProperties(?).text keine Ahnung wie das heisst . usw end with Gruss Nancy
|
| In das Form INVENTOR VBA wechseln |
|
Rund um Autocad : Excel-Tabelle
startrek am 15.09.2003 um 23:42 Uhr (0)
mal ne ganz dumme Idee, in excel mal Seitenumbruchvorschau aktivieren und die gestrichelten Ränder auf den benutzten (Anzeige) Bereich ziehen - vielleicht bringt das evtl. was... Gruss Nancy
|
| In das Form Rund um Autocad 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 |
|
ADT Architectural Desktop : Zonen-Zuordnung zu Räumen
startrek am 29.11.2006 um 23:54 Uhr (0)
Hi Dani,zufriedenstellend finde ich die ganze Flächenauswertungsproblematik unter 2005 auch nicht, mir schmeisst es immer die Geschosse kunterbunt durcheinander,sodass ich eh im Excel nacharbeiten muss (Reihenfolge etc)Lösung habe ich keine, nur den Trost, zu sagen: machs einfach im Excel,also das Nacharbeiten ...Was die Zuordung der Nutzflächen angeht, also HNF1..6, VF, NNF etc,das mach ich auch in Excel, das lässt sich recht fix anhand der Raumnamen via Formel lösen.Wichtig dabei ist aber, dass man durch ...
|
| In das Form ADT Architectural Desktop wechseln |
|
Autocad VBA : Attribute mit Excel abgleichen
startrek am 09.02.2006 um 23:19 Uhr (0)
Ich nochmal Sven,beinahe vergessen, deine Frage: Wie ist eigentlich der eleganteste Weg die Daten zwischen ACAD=Excel zu übertragen? Über die Zwischenablage oder?Gute Frage, hmm sollte man denke von Fall zu Fall entscheiden.Die Zwischenablage ist sehr sehr schnell, aber du arbeitest da ausschliesslich mit einem String im Endeffekt.Effektiv hinsichtlich der Performance sind auch Arrays, zumal die Ranges sowieso Arrays sind.Ich weiss nicht, evtl. wär es eine Überlegung wert, ob man lieber aus Acad to Excel ...
|
| In das Form Autocad VBA wechseln |
|
Excel : visual-basic formular in excel
startrek am 31.01.2005 um 15:37 Uhr (0)
Hi Martin, wie ... einbetten ??? a) normaler Aufruf: Userform1.Show b) nonmodal, dh. Du kannst in Excel weiterarbeiten: Userform1.Show 0 0 steht für modal=false c) Screenshot machen - Bild einfügen ;;-)) e) erklär nochmal genauer, wie du es meintest Grüsse Nancy
|
| In das Form Excel wechseln |
