|
CATIA V5 Programmierung : Excelliste sortieren
Axel.Strasser am 25.04.2008 um 10:19 Uhr (0)
Versuch es mal hiermit (wieder ungetestet auf die Schnelle):Code:xlObj.Range("A4", "E" & i).Sort Key1:=xlObj.Range("A4"), Order1:=xlAscending, Header:=xlYesDie Löscherei kann mal sicherlich noch effizienter gestalten, da komme ich jetzt nicht dazu, vielleicht heute Abend auf Basis Deiner txt Dateien.Axel------------------Inoffizielle deutsche CATIA Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linienlänge und Flächen mit makro auslesen
B Hossbach am 25.04.2008 um 16:22 Uhr (0)
So. Jetzt hab ichs:-------------------------------------------------------------------------------------------------------Linienlaenge messenFunction LinienLaenge(Param) Dim TheSPAWorkbench, TheMeasurable, Laenge Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench") Set TheMeasurable = TheSPAWorkbench.GetMeasurable(Param) Laenge = TheMeasurable.Length LinienLaenge = LaengeEnd Function-------------------------------------------------------------------------------------------------------Fl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Axel.Strasser am 27.04.2008 um 21:03 Uhr (0)
Hier ist noch mal eine neue Basis. Ich habe das mit einem vbs Script getestet und es hat funktioniert (Achtung, es gibt noch Unterschiede zwischen Office 2003 und Office 2007).Code:Dim objXL As ObjectConst xlTopToBottom = 1Const xlPinYin = 1Const xlYes = 1Set objXL = WScript.CreateObject("Excel.Application")Set fso = CreateObject("Scripting.FileSystemObject")Set WshShell = WScript.CreateObject("WScript.Shell")Datei="C:Dokumente und EinstellungenAxelDesktop estvor_bearbeitung.xls"objXL.Workbooks.Open Dateio ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Meggie275 am 24.04.2008 um 15:15 Uhr (0)
Hallo,ich bin noch ganz frisch in der Macroprogrammierung. Zur Zeit versuche ich mich an einer Stückliste. Ich schreibe über die Stücklistenfunktion in CATIA V5 die Teilenummern, Nomenklatur, etc. aller Produkte und Parts in eine Excel Datei. Das klappt auch schon gut.Jetzt möchte ich aber diese Einträge in Excel sortieren (A-Z). Hat jemand eine Idee wie das in VBA for CATIA funktioniert?In Excel VBA habe ich das mit Hilfe von Macro Aufzeichnen ganz leicht hinbekommen. Leider lässt sich dieser befehl nicht ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
efbe am 24.04.2008 um 15:33 Uhr (0)
Wenn du direkt im CATIA programmierst, dann musst du erstmal eine Verbindung zum EXCEL-Objekt aufbauen:Dim my_EXCEL As Excel.ApplicationSet my_EXCEL = GetObject(, "Excel.Application")Dim my_sheet As Excel.WorksheetSet my_sheet = my_EXCEL.ActiveWorkbook.Sheets("PackData")Den Namen des Worksheets musst du natürlich anpassen - oder du wählst einfach das Aktive Sheet aus. Über my_sheet kannst du jetzt auf sämtliche Spalten und deren Sortierungen zugreifen - wie gewohnt.Viel Spaß, frank.------------------ So l ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Meggie275 am 24.04.2008 um 15:42 Uhr (0)
Hallo Frank,das habe ich gemacht. Ich öffne aus CATIA die Excel Datei, in die die Stückliste geschrieben wurde. ich habe es auch schon geschafft, da dann alles zu löschen, was ich nicht in der Liste haben will, aber mit dem Sortieren klappt es nicht.EXCEL.Application.Range("B5", "B14").SelectEXCEL.Application.Selection.Sort - diesen Befehl kennt er nichtHast Du eine Idee, wie es heissen muss?GrussMeggie
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Axel.Strasser am 24.04.2008 um 15:59 Uhr (0)
Wie übergibst Du die Parameter für den Sort Befehl ? Ich nehme mal an das liegt daran.Axel ------------------Inoffizielle deutsche CATIA Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Meggie275 am 24.04.2008 um 16:09 Uhr (0)
Ich wollte es genauso machen wie in Excel: Zellen markieren und dann sortieren. In Excel wäre dasRange("A1:B3").Select Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormalAnbei mal mein komplettes Marco. Vielleicht wird es dann klarer.Sub CATMain()Dim productDocument1 As ProductDocumentSet productDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = productDocument1.ProductD ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Axel.Strasser am 24.04.2008 um 16:56 Uhr (0)
... und warum versuchst Du nicht die Parameter mit anzugeben ? So in etwa:Code:xlObj.Columns("A:Y").Sort Key1:=xlObj.Columns("T"), Order1:=xlDescending, Header:=xlYesAxel------------------Inoffizielle deutsche CATIA Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Klasse
Nautilius2005 am 28.04.2008 um 11:12 Uhr (0)
Hi zusammen,ich programmiere gerade ein Makro und will ein Solid mit der Funktion Selection auswählen. Den Solid habe ich aus einem Körper erstellt, einfach Copy und mit PasteSpecial als ein Result eingefügt.Weiss jemand welcher Klasse das Solid angehört???Hier noch mein Programm: Dim Element(0) Element(0)="??????????" -- Hier weiss ich net welche Klasse ich reinschreiben soll Dim UserSel as Selection Set UserSel=Catia.ActiveDocument.Selection UserSel.Clear Dim E As CATBSTR E = UserSel.SelectElemen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : New from für Product und enthaltene Parts?
Meggie275 am 28.04.2008 um 09:37 Uhr (0)
Hallo,weiss jemand, wie ich in einem Marco ein Product und die enthaltenen Parts mit "new from" öffnen kann?Bei der Macro-Aufzeichnung bekomme ich das Auswahlfenster nicht mehr.und mitDim documents1 As DocumentsSet documents1 = CATIA.DocumentsDim productDocument1 As ProductDocumentSet productDocument1 = documents1.NewFrom("C:TestTestbaugruppe.CATProduct")wird nur ein "New from" auf die Testbaugruppe ausgeführt. Die enthaltenen Parts werden als Orginal geöffnet.GrussMeggie
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Klasse
Randle am 28.04.2008 um 13:04 Uhr (0)
Hallo,also ich habe das jetzt mal getestet als catvbs.Sub CATMain()Dim Element(0)Element(0)="Shape"Set UserSel=Catia.ActiveDocument.SelectionUserSel.ClearE = UserSel.SelectElement2(Element,"Element waehlen",False)msgbox UserSel.Item(1).Value.NameEnd SubWas soll denn das Ziel des Ganzen sein?------------------MfGRandle! Its not a bug, its a feature !
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Set auslesen
B Hossbach am 28.04.2008 um 13:10 Uhr (0)
Hallo Forum. Ich möchte Werte aus mit Formeln belegten Parametern auslesen, die sich in mehreren Parameter Sets befinden. (siehe Screenshot)Funktioniert mit dem folgenden Skript auch super:Sub CATMain()Parameter aus Baum auslesen Dim HPara Verweis auf Hauptpfad Set HPara = CATIA.ActiveDocument.Part.Parameters Dim ADim Set ADim = HPara.Item("Length.3") MsgBox (ADim.Value) MsgBox (ADim.Name) End SubNur leider bekomme ich den Value und Name des Parameters "Length.3" nur, wenn ich ihn dire ...
|
| In das Form CATIA V5 Programmierung wechseln |
