|
CATIA V5 Programmierung : Verzeichnis aus Tools-Optionen auslesen
DanielFr. am 17.01.2011 um 13:47 Uhr (1)
Zitat:Original erstellt von Christian.O:Servus, in dieser Richtung könnte man auch eine Umgebungsvariable in Windows erzeugen. Start - RMT auf Arbeitsplatz - Registerkarte "Erweitert" - Button "Umgebungsvariablen" - Button "Neu" - Variablem mit Pfad erzeugen. Anbei mein Makro zum Aufrufen der restlichen Makros.Ist im Endeffeckt genau das gleiche wie dein Textfile.Hallo ,ich würde jedoch das *.txt File bevorzugen da zum anlegen und ändern von Umgebungsvariablen Administrationsrechte vorhanden sein müssen. ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro um Userselektionen als Ergebnis (Tot) einzufügen
Beny am 17.01.2011 um 15:09 Uhr (0)
Ein herzliches Hallo,ich habe ein "kleines" Problem wo ich im moment voll aufn schlauch stehe und einfach nicht mehr weiterweiß.etwas ähnliches habe ich hier leider nochnicht gefunden.und zwar geht es darum das ich ein Makro schreiben soll wo der User elemente Selektiert und danach werden die vom User selektierten Elemente (in dem Fall linien, punkte und Ebenen) in ein neu erstelltes Geometrisches Set als ergebnis eingefügt. (ich habe es in VBA angefangen weil ich damit die Mehrsprachigkeit in Catia real ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro über VBA starten
Christian.O am 17.01.2011 um 16:47 Uhr (0)
Servus,warum kopierst du den Quellcode nicht einfach in ein neues Modul von deinem VBA hinein?Ansonsten könnte das so aussehen. Dieser Text wird in den Button hinterlegt mit dem du dein Makro starten willst.Code: ***Deklarationen für Function-Aufruf strProjekt = "OC_GUI.catvba" *** VBA Project strMakro = "Start_Excel" ***Makroname strMakrostart = "CatMain" ***Welcher Teil vom Makro gestartet wird strProjektpfad = strOC_Pfad & "" & strProjekt ***hier steht der Pfad drinnen wo die Datei (CATSript, CATVB ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro um Userselektionen als Ergebnis (Tot) einzufügen
Beny am 18.01.2011 um 09:49 Uhr (0)
Hallo nochmal,Ich hab den Fehler gefunden, da hat was von der Logik nich gepasst und ein schreibfehler war auch noch drin.Anbei der fertige Code:Sub CATMain() Dim AktuellesPartDocument As PartDocument Set AktuellesPartDocument = CATIA.ActiveDocument Dim AktuellesPart As Part Set AktuellesPart = AktuellesPartDocument.Part Dim GSHBS_CP As HybridBodies Set GSHBS_CP = AktuellesPart.HybridBodies Dim GSHB_CP As HybridBody Set GSHB_CP = GSHBS_CP.Add() GSHB_CP.Name = "Kopierte Drahtgeome ...
|
In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Aus dem Drawing heraus Parameter im Product abfragen
cChris am 14.01.2011 um 16:20 Uhr (0)
Hallo zusammen,ich hab mal wieder ein Problem.Bevor das Macro mit seiner eigentlichen Arbeit beginnt, müssen ein paar Abfragen gemacht werden.1. Ist ein Dokument geöffnet?2. ist ein Drawing geöffnet?3. Ist im Parameter Textfeld "Bitte Parameter eingeben" angewählt?4. Würden Products selektuiert?Abfrage ein und zwei habe ich im Macro untergebracht drei und vier leider noch nicht.Ich muss dazu sagen, dass ich das Macro aus dem Drawing heraus steueren möchte. Und daran hakt es auch. Im Klartext ich möchte aus ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Sicherungsverwaltung aus VB-Script
Smerg am 27.04.2008 um 18:58 Uhr (0)
einen schönen Sonntag erstmal Und zwar wollte ich wissen, ob es eine Möglichkeit gibt, wenn ja welche, die Sicherungsverwaltung von CATIA aus einem VB-Script heraus anzusprechen / zu öffnen. Damit der User dort entsprechend seinen Wünschen speichern kann bevor das restliche Macro ausgeführt wird. Die einfache Save Variante darf nicht genohmen werden und mit der SaveAs Variante ist es zu umständlich, da es ja für alles Parts usw gemacht werden müsste...Hab schon probiert über den Marcorecorder etwas raus zu ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Isometrische Ansicht aufrufen
cl10b am 21.01.2011 um 08:40 Uhr (1)
Hallo Bernd Das klappt im VB-Editor innerhalb von CATIA ganz prima.Unter Visual Studio 2008 jedoch funktioniert es nicht Fehlermeldung ist stets:COMException was unhandled - Mitglied nicht gefundenKönnte es sein, dass in VS noch die richtige Referenz fehlt? Wenn ja welche? Oder ist diese Referenzierung nur bei Early Binding notwendig? Andererseits, ein CATIA.ActiveWindow.ActiveViewer.Reframe() funktioniert tadellos!PS: Ich habe das mal mit Early Binding ausprobiert und da bietet mir Intellisense ei ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Isometrische Ansicht aufrufen
bgrittmann am 20.01.2011 um 23:35 Uhr (1)
ServusDas Geheimnis scheint das Arbeiten mit Cameras zu sein (siehe auch Doku)Code:Sub CATMain()Dim ThatCamera As CameraSet ThatCamera = CATIA.ActiveDocument.Cameras.Item("* iso")CATIA.ActiveWindow.ActiveViewer.Viewpoint3D = ThatCamera.Viewpoint3DEnd SubRichtet im 3DViewer als Isometrische Ansicht aus.GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Im Textfeld die Schriftfarbe Gelb zuweisen
cChris am 24.01.2011 um 15:50 Uhr (0)
Hallo zusammen,ich versuche mittels Macro die Schriftfarbe Gelb zu erzeugen. Leider klappt das nicht ganz. Kann mir bitte jemand helfen ?Code:Sub CATMain()Dim oDoc As DocumentSet oDoc = CATIA.ActiveDocumentDim oSheets As SheetsSet oSheets = oDoc.SheetsFor i = 1 To oSheets.countDim oSheet As SheetSet oSheet = oSheets.Item(i) NextDim oViews as ViewsSet oViews = oSheet.ViewsDim oView as DrawingViewSet oView = oViews.ActiveView**********************************Textfeld einfügenDim MyText As DrawingTextS ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Im Textfeld die Schriftfarbe Gelb zuweisen
RSchulz am 24.01.2011 um 16:46 Uhr (0)
Hallo Chris,wo hast du die Methode her? Das Objekt Drawingtext besitzt diese garnicht.Code:Sub CATMain() Dim oDoc As Document Dim oSheets As Sheets Dim oSheet As Sheet Dim oViews As Views Dim oView As DrawingView Dim FontSize As Integer Dim FontName As String Dim RealColor As Integer Dim MyText As DrawingText Dim Anchorpoint As CatTextAnchorPosition Set oDoc = CATIA.ActiveDocument Set oSheets = oDoc.Sheets For i = 1 To oSheets.Count Set oSheet = oShee ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Im Textfeld die Schriftfarbe Gelb zuweisen
RSchulz am 24.01.2011 um 17:06 Uhr (0)
Zitat:Original erstellt von Christian.O:Servus Rick, ich ändere die Farbe über:Code:***Element zur Selektion hinzufügenobjSel.Add drwText***Farbe festlegenobjSel.VisProperties.SetRealColor intRot, intGruen, intBlau, 1Wobei drwText mein gerade erstellter/hinzugefügter Text ist. Hallo Christian,das ist schon klar. Er sagt aber er möchte nicht extra selektieren. ObjSel muss aber eine Selektion sein, da die verwendete Methode "SetRealColor" eine Methode von Object "Selection" ist.demnach würde es natürlich au ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Copy & Paste
INLU am 25.01.2011 um 13:10 Uhr (0)
Hallo!Ich muss das Problem noch einmal aufgreifen. Der Code aus meinem vorherigen Beitrag hat noch einen Hacken.Wenn ich zwei Elemente im ersten Part habe, die den gleichen Namen tragen, funktioniert das Verwenden von CreateReferenceFromName nicht, da Catia sich dann wohl nicht entscheiden kann. Ich habe daraufhin versucht, die Referenz über pubs.Item(i).Valuation direkt auf das veröffentlichte Objekt zu setzen. Dadurch hat man das Objekt gleich als Referenz, aber die Referenz zeigt nur auf das selektierte ...
|
In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Mit VBScript in Excel schreiben
Eule am 25.01.2011 um 17:23 Uhr (0)
Hallo, ich versuche einen Wert aus CATIA in eine vorhandene Excel-Datei hineinzuschreiben. Jedoch bringt mir CATIA eine Fehlermeldung "unbekannter Laufzeitfehler" bei der Zeile Excel.Sheets("Ergebniswerte")..."Ergebniswerte" ist der Name des Sheet 1 der Excel-Datei, welches ich so umbenannt habe.Das kurze Script habe ich angefügt. Über Anregungen wäre ich dankbar. Bin nicht fündig geworden im Netz.Gruß,Eule
|
In das Form CATIA V5 Programmierung wechseln |