|
CATIA V5 Programmierung : Problem mit SaveAs unter VBA
RSchulz am 26.01.2011 um 09:45 Uhr (0)
Hallo und herzlich willkommen im Forum,versuch es mal folgendermaßen...Code:... if Dir(Datei) "" Then CATIA.ActiveDocument.SaveAs (Datei) else msgbox"Die Datei wurde nicht gespeichert..." Alternativ mit GoTo wieder nach oben springen endif...HTH------------------MFGRick SchulzNettiquette (CAD.de) - Was ist die Systeminfo? - Wie man Fragen richtig stellt. - Unities
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit SaveAs unter VBA
Modellierer am 26.01.2011 um 10:13 Uhr (0)
Hallo,vielen Dank für die schnelle Antwort.Leider noch dasselbe Problem.Scheint auf die Einträge gar nicht zu reagieren?Hab den Vorschlag folgendermaßen eingefügt:Private Sub CommandButton12_Click()Dim Datei As StringDim timestampDim FehlermeldungCATIA.DisplayFileAlerts = FalseDatei = CATIA.FileSelectionBox("Speicherung", "*.CATPart", CatFileSelectionModeSave)If Dir(Datei) "" Then CATIA.ActiveDocument.SaveAs (Datei)Else MsgBox "Die Datei wurde nicht gespeichert..." Alternativ mit GoTo wieder nach oben ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit SaveAs unter VBA
RSchulz am 26.01.2011 um 11:17 Uhr (0)
Sorry... Ich bin wieder mal dem Copy/Paste zum Opfer gefallen.Code:Private Sub CommandButton12_Click()Dim Datei As StringDim timestampDim FehlermeldungCATIA.DisplayFileAlerts = FalseDatei = CATIA.FileSelectionBox("Speicherung", "*.CATPart", CatFileSelectionModeSave)If Dir(Datei) = "" Then CATIA.ActiveDocument.SaveAs (Datei)Else MsgBox "Die Datei wurde nicht gespeichert..." Alternativ mit GoTo wieder nach oben springenEnd IfEnd SubIch habe die Änderung Fett markiert Ich möchte allerdings dazu sage ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit SaveAs unter VBA
Modellierer am 26.01.2011 um 11:36 Uhr (0)
Hallo,soweit funktioniert der code jetzt, daß er mir die fehlermeldung über die MsgBox bringt und nicht mehr den Laufzeitfehler.Jedoch speichert mir Catia die Datei dennoch nicht.Wie kann ich überprüfen ob Catia die Datei noch irgendwo vorhält und ich sie deßhalb nicht überschreiben kann?Wenn ich das Makro "normal" laufen lasse, kann ich es am Ende über einen Button beenden.Innerhalb dessen werden mit der folgenden Schleife alle offenen Fenster geschlossen.For z = 1 To CATIA.Windows.CountCATIA.ActiveDocume ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit SaveAs unter VBA
RSchulz am 26.01.2011 um 11:48 Uhr (0)
Zitat:Original erstellt von Modellierer:soweit funktioniert der code jetzt, daß er mir die fehlermeldung über die MsgBox bringt und nicht mehr den Laufzeitfehler.Jedoch speichert mir Catia die Datei dennoch nicht.Der Code würde ja im Fehlerfalle auch nicht speichern. Demnach passiert nichts, wenn die Datei schon vorhanden ist. Daher auch der Hinweis mit GoTo wieder nach oben zu springen, um eine neu Auswahl und die Prüfung zu ermöglichen. Das hat allerdings keinen Sinn, wenn du überschreiben willst bzw. d ...
|
| In das Form CATIA V5 Programmierung wechseln |
Ergebnis.zip |
CATIA V5 Programmierung : Mit VBScript in Excel schreiben
Eule am 27.01.2011 um 17:23 Uhr (0)
Servus Bernd,dieser Code läuft auch bei mir durch, wenn ich im VBScript eine Zahl als Wert hineinschreibe (z.B.: oWorkbook.Sheets.Item("Ergebniswerte").Range("A2") = 15. Sobald ich aber statt einer Zahl eine Variable schreibe, bricht das Script mit der Fehlermeldung ab. Ich habe mal die 3 zusammengehörigen Testdateien (das CATPart, die Designtable und die Excel-Datei, in die geschrieben werden soll) als Zip angefügt. Der Aufbau ist so: Wenn der Anwender eine andere Configuration aus der Designtable, welche ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bild in Excel einfügen über CATIA Makro
K-Volkmann am 28.01.2011 um 14:12 Uhr (0)
HalloDanke funktioniert schon mal.Legt aus Excel eine Datei an.Die .bmt geht aber nicht zu öffnen ?muss ich noch eine .dll aktivieren ?geht das ganze auch als .jpg , und kann ich als ausgabe auch die einstellung ixelmodus umstellen ?im catia wird das Bild als Anzeigemodus erstelltIch weiss viele Fragen, aber vieleicht kann mir jemand weiterhelfen, den ich kenne mich nicht wirklich gut aus.Merkt man auch
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : save 2D like 3D
cmb am 31.01.2011 um 11:40 Uhr (0)
Hallo,ich habe mir mit Hilfe des Forums ein Script angepasst, welches bei einer DateiNeuAus Funktion die Zeichnung unter dem Gleichen Namen wie das Mutterelement speichert.Ich lese mit diesem Strings mein Part/Product aus und extrahiere die benötigten Daten :Dateipfad = drawingView1.GenerativeBehavior.Document.ReferenceProduct.Parent.PathName = drawingView1.GenerativeBehavior.Document.ReferenceProduct.Parent.NameBei ca 2 von 10 mal in denen das Macro läuft erhalte ich eine Fehlermeldung : Die Methode Docum ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : save 2D like 3D
cmb am 01.02.2011 um 17:26 Uhr (0)
Hallo Forum,Vielen Dank für die Tipps.Habe mein Script dahingehend geändert, dass wenn er eine View mit dem String "Vor" findet er diese aktiv macht. Wenn es keine solche View gibt, darf man eine auswählen.Scheint zu funktionieren.GrußNorbertCode:Dim oSelDim oDocument As DocumentDim drawingSheets1 As DrawingSheetsDim drawingSheet1 As DrawingSheetDim drawingViews1 As DrawingViewsDim drawingView1 As DrawingViewSub CATMain()Set oDocument = CATIA.ActiveDocument If TypeName(oDocument) = "PartDocument" Then ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : FileSearchOrder
Knowledge am 02.02.2011 um 10:39 Uhr (0)
Halloich brauche mal wieder Eure Hilfe.Ich habe seit neustem einen Fehler. Mir fällt die FileSearchOrder auf die Nase. Bis hierhin habe ich den Befehl genutzt um in einem Ordner nach einer Datei mit bestimmten Inhalten im Dateinamen zu suchen. z.B. oPfad = c: est Split(0) = 123 Split(1) = 456 Split(2) = 789 CATIA.FileSearchOrder = oPfad & "*" & oSplit(0) & "*" & oSplit(1) & "*" & oSplit(2) & "*"Seit neuestem geht hier gar nichts mehr... kennt jemand das Problem?Danke für Eure HilfeRalf
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Visual Basic Editor
catiawest am 04.02.2011 um 12:16 Uhr (0)
Hallo,Ich bin Anfänger im programmieren, und hoffe auf Hilfe im Forum, damit ich mich langsam in diese Thematik einarbeiten kann.Ich möchte gerne Rekursiv durch die Struktur gehen und die Teilenummer mit dem Dateinamen abgleichen.(CATPart+CATProdukt)BSP.:Start Situation:Teilenummer DateinamenTeil123 Teil.CATPartNach dem ausführen des ScriptEnd Situation:Teilenummer DateinamenTeil123 Teil123.CATPartCode:VBTeilenummer mit Filename abgleichenPrivate Sub CommandButton1_Click()Di ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA mit bestimmten Optionen starten
cl10b am 22.02.2011 um 11:05 Uhr (0)
Hallo Für mein Projekt benötige ich ein paar Einstellungen die ich CATIA gern beim Start (evtl. über eine Art alternative CatSettings) mitgeben möchte ohne die auf dem Rechner vorhandene Version erst von Hand "einstellen" zu müssen oder die lokale CatSettings-Datei zu überschreiben. Ist so etwas möglich?Hintergrund: Mein Tool wird auf diversen Rechnern hier im Institut eingesetzt werden und muss dort unabhängig von den lokalen CatSettings der jeweiligen Maschine funktionieren. Jeden Rechner erst von Hand ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ergebnisse in Textdatei übertragen
bgrittmann am 01.03.2011 um 23:09 Uhr (0)
ServusAlso deine Idee mit der Shell scheint zu funktionieren, allerdings fehlt noch die Angabe des Programms. zB (ungetestet) Code:Sub Test()Const DATEI = "C: emp est.txt"Dim TaskId As DoubleTaskId = Shell("notepad.exe " & DATEI, vbMaximizedFocus)If TaskId = 0 Then MsgBox "Konnte notepad nicht starten"End SubQuelle: hierGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.[Diese Nachricht wurde von bgrittmann am 01. Mrz. 2011 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
