Hot News aus dem CAD.de-Newsletter:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Formelwert suchen und löschen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:   Formelwert suchen und löschen (114 mal gelesen)
Esterbauer
Mitglied



Sehen Sie sich das Profil von Esterbauer an!   Senden Sie eine Private Message an Esterbauer  Schreiben Sie einen Gästebucheintrag für Esterbauer

Beiträge: 51
Registriert: 26.09.2008

erstellt am: 05. Dez. 2018 09:11    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo zusammen,

Wer kann mir helfen.

Habe ein Produkt mit mehreren Parts. In den Parts gibt es eine Formel z.B. ( Formel.37:`001_part1/Teilenummer`=`Stücklisten Information\Hilfsparameter\Dateibenennung` )

Wie schaffe ich per Makro (Automatisch)die Formel.37 zu löschen?
Problem ist nur das in Part 1 es die Formel.37 ist und in Part 2 ist es die Formel.40 usw... es ist immer nur der Formelwert an sich gleich (`Stücklisten Information\Hilfsparameter\Dateibenennung` )

wer kann mir da helfen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Randle
Mitglied
CAD/PLM Consultant


Sehen Sie sich das Profil von Randle an!   Senden Sie eine Private Message an Randle  Schreiben Sie einen Gästebucheintrag für Randle

Beiträge: 479
Registriert: 12.04.2003

Win7 Pro x64/Win10
CATIA V5 R18, R19, R21, R24, R26

erstellt am: 05. Dez. 2018 10:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Esterbauer 10 Unities + Antwort hilfreich

Hallo,

wie weit bist du denn schon?

Evtl. kannst du den Outputparameter abfragen, wenn das die Teilenummer kannst du sie löschen.

Gruß
Randle

------------------
Wer für nichts steht, fällt für alles!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Esterbauer
Mitglied



Sehen Sie sich das Profil von Esterbauer an!   Senden Sie eine Private Message an Esterbauer  Schreiben Sie einen Gästebucheintrag für Esterbauer

Beiträge: 51
Registriert: 26.09.2008

erstellt am: 07. Dez. 2018 10:00    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Da ich kaum Kenntnisse im der VBA Programmierung habe bin ich auch noch nicht Richtig weiter gekommen.
Habe versuch mit der Catia Suchfunktion die Formel zu finden das funktioniert aber leider nicht.

Was meinst du mit Outputparameter ? wie kann man den abfragen ?

Gruß

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

moppesle
Ehrenmitglied V.I.P. h.c.
Konstrukteur


Sehen Sie sich das Profil von moppesle an!   Senden Sie eine Private Message an moppesle  Schreiben Sie einen Gästebucheintrag für moppesle

Beiträge: 3130
Registriert: 28.05.2009

CATIA V5 R19 SP9
WIN 7 64bit

erstellt am: 07. Dez. 2018 11:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Esterbauer 10 Unities + Antwort hilfreich

Hallo Esterbauer,

hab mal was zusammengebastel.

Evtl. mußt du den Parameternamen "Part Number" auf die Deutsche Umgebung anpassen.

DelFormula.CatSript

Code:
Sub CATMain()

Dim oActiveDoc 'As Document
Set oActiveDoc = CATIA.ActiveDocument

If (InStr(oActiveDoc.Name, ".CATProduct")) Then
        Call MsgBox("Part im separaten Fenster öffnen!", vbExclamation)
       
        Exit Sub
    End If
' Check whether the document is a CATPart
If (InStr(oActiveDoc.Name, ".CATPart")) <> 0 Then

        Dim oRelations          'As Relations
        Set oRelations = oActiveDoc.Part.relations
        Dim oFormula1          As Formula
        Dim oParameters        'As Parameters
        Set oParameters = oActiveDoc.Product.Parameters
        Dim strParam1          'As Parameters
        Dim paraPartnum        As String
        Dim FormulaWertFuell    As String
        paraPartnum = "Part Number"
       
            FormulaWertFuell = ""
            Set strParam1 = oParameters.Item(paraPartnum)
            Set oFormula1 = strParam1.OptionalRelation 'Verknüpfte  Relation zu Parameter suchen
                oRelations.Remove (oFormula1.Name) 'Verknüpfte  Relation zu Parameter löschen
                strParam1.Value = " "
   
   
CATIA.ActiveDocument.Part.Update
End If
End Sub


------------------
Gruß Uwe

Auch Catia ist nur ein Mensch!    

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2018 CAD.de | Impressum | Datenschutz