|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 14:21 Uhr (0)
Hi Leute,folgender CodeCode:pfadzurexceldatei="F:XXXXMakrotest.xlsx"Set objexcel = createobject("Excel.application")objexcel.Visible = True zeigt Excel an (GUI startet) falls diese Zeile nicht angegeben wird, startet Excel im Hintergrundobjexcel.Workbooks.addobjexcel.Cells(1, 1).Value = "ventilhub"objexcel.Cells(i+2, 1).Value = length4.valueobjexcel.Cells(1, 2).Value = "grad um z"objexcel.Cells(i+2, 2).Value = degreeobjexcel.Cells(1, 3).Value = "hoehe"objexcel.Cells(1, 4).Value = "schenkel1"objexcel.Cells( ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 14:53 Uhr (0)
wenn ich dich richtig verstanden habe, mache ich das schon (mit dem "i")problem ist, dass in jedem schleifendurchlauf eine neue xlx erstellt wird und die alte überschrieben wird (und somit die vorhergehende zeile wieder leer wird).oder hab ich dich nicht richtig verstanden
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 15:15 Uhr (0)
okay, ich habe mittlerweile etwas umgecoded und machs so, dass erst alle werte im makro gespeichert werden und diese dann auf einmal in die excel tabelle geschrieben werden. nur, wie muss ich die syntax gestalten, dass ich die variablen hochzählen kann (mit i)also ich stells mir so vor:Set length1(i) = parameters1.Item("hoehe")Set length2(i) = parameters1.Item("schenkel1")Set length3(i) = parameters1.Item("schenkel2")Set length4(i) = parameters1.Item("Ventilhub")
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 15:31 Uhr (0)
genau
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 16:05 Uhr (0)
Code:Language="VBSCRIPT"Sub CATMain()dim idim length1(360)dim length2(360)dim length3(360)dim length4(360)dim length5(360)For i = 0 to 180 step 10Set partDocument1 = CATIA.ActiveDocumentSet part1 = partDocument1.PartSet relations1 = part1.RelationsSet designTable1 = relations1.Item("DesignTable.8")designTable1.Configuration = ipart1.Update set Selection1 = partDocument1.selectionSet parameters1 = part1.ParametersSet length1(i) = parameters1.Item("hoehe")Set length2(i) = parameters1.Item("schenkel1")Set len ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 16:28 Uhr (0)
das ist einfach meine bezeichnung für die jeweilige spalte. aber du hast recht, ich habs mal aus der schleife rausgenommen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Daten per Schleife in EINE Excel-Datei
IGELReiser am 16.11.2012 um 16:51 Uhr (0)
stimmt, danke, jetzt funktionierts auf einmal auch
|
| In das Form CATIA V5 Programmierung wechseln |
