Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1079 connectés 

 


 Mot :   Pseudo :  
  Aller à la page :
 
 Page :   1  2  3  4  5  ..  226  227  228  ..  233  234  235  236  237  238
Auteur Sujet :

[Support] Catia : trucs, astuces, conseils, aide

n°1170468
lmto
Posté le 14-11-2014 à 07:19:26  profilanswer
 

Reprise du message précédent :
C'est l’environnement d'une autre station. C'est du CATIA V5R19.
J'ai gardé l'ancien. Le problème c'est quand j'ai tous supprimé et mis les nouveaux. Pas de démarrage. En restaurants les anciens de la corbeille cela fonctionne.
Comme si le démarrage ne trouvait plus les liens avec les fichiers.
Problème le lendemain même manip, mais par oubli j'ai vidé la corbeille!
Donc aujourd'hui avec les anciens fichiers réinstallés car sauvegardés sur clef, ils ne fonctionnent pas non plus. d’où mon idée de perte de lien ou de pointage pour le démarrage de CATIA.

mood
Publicité
Posté le 14-11-2014 à 07:19:26  profilanswer
 

n°1170470
Mr-blonde
Posté le 14-11-2014 à 08:51:59  profilanswer
 

Humm... Je t'avoue qu'a part une réinstalle je vois pas trop...
Tu as bien essayé de remplacer tes CATseting R19 par du R19?  
Tu as supprimé le dossier CATseting ou juste le contenu?  
Je pense que si tu avais juste remplacé les fichiers au lieu de les supprimé puis remettre; tu n'aurais pas eu ce problème (j'effectue régulièrement cette manip pour avoir mon environnement, je l'ai sur clé USB).
Dsl, je vois pas trop comment tu pourrais y arriver manuellement ... :??:

n°1170474
ptittom
Posté le 14-11-2014 à 11:07:14  profilanswer
 

lmto a écrit :

C'est l’environnement d'une autre station. C'est du CATIA V5R19.
J'ai gardé l'ancien. Le problème c'est quand j'ai tous supprimé et mis les nouveaux. Pas de démarrage. En restaurants les anciens de la corbeille cela fonctionne.
Comme si le démarrage ne trouvait plus les liens avec les fichiers.
Problème le lendemain même manip, mais par oubli j'ai vidé la corbeille!
Donc aujourd'hui avec les anciens fichiers réinstallés car sauvegardés sur clef, ils ne fonctionnent pas non plus. d’où mon idée de perte de lien ou de pointage pour le démarrage de CATIA.


 
Bonjour,
 
Une précision:
- On peut effacer sans souci les CATSettings qui ne contiennent que  les préférences de l'utilisateur.
- Il y a 2 dossiers pour les environements: un pour les environements "Global" et un pour les environements "User". Il sont visible en ouvrant l'outil Environment Editor (programme CATIAEnv.exe dans le dossier CATIA)
 
Le fichier texte de ton nouvel environement n'a peut être pas exactement le même nom que l'ancien. CATIA ne trouve pas l'environement User et ne peut pas démarrer.
Les liens dans le nouvel environement ne sont pas corrects (CATIA installé ailleurs, outils externes installés ailleurs). Dans ce cas, CATIA devrait démarrer mais les outils externes ne seront pas là.
 
Ouvre les propriétés du lien pour démarrer CATIA et vérifie que l'adresse de l'environement est correcte. Ca devrait ressembler à ce qui suit:
"URLInstallCATIA\B19\win_b64\code\bin\catstart.exe"  -run "CNEXT.exe" -env Nom_Environement -direnv "URL_Environement\CATEnv" -nowindow
 
Ouvre ton fichier environement (avec un éditeur de texte) et vérifie que les liens vers les dossiers CATIA sont corrects. Vérifie que les liens vers d'autres dossiers existent.


Message édité par ptittom le 14-11-2014 à 11:08:05
n°1170487
lmto
Posté le 15-11-2014 à 11:48:17  profilanswer
 

Merci pour ce conseil. Je l'ai effectué et cela n'a rien fait.
Nous avons donc réinstallé CATIA avec les clefs. Un peu de perte de temps, mais un catia tout propre.
Donc problème résolu.
Merci encore.

n°1170503
so_xyz
Posté le 17-11-2014 à 15:57:17  profilanswer
 

Bonjour à tous,
 
Je souhaiterais exporter un paramètre que j'ai crée pour ma part CATIA (le paramètre représente une longueur) dans un nouveau fichier excel.
Je met le code ci-dessous, si quelqu'un peut m'aider :D
 
Sub CATMain()
Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument
 
Dim part1 As Part
Set part1 = partDocument1.Part
 
'Declare the parameters
nameValue = part1.Name
longueurX=part1.paramaters1.real
Set instance = partDocument1.Product
set longueurX =  parameters1.Item("longueurX" )
Part1.Update
 
'Creation new workbook Excel
   Set oexcel = CreateObject("Excel.Application" )
   Set oBook = oexcel.workbooks.Add
'Export parameters to Excel
 oSheet.Range("A1" ).Value = part1.Name
 oSheet.Range("A2" ).Value = part1.parameters1.Item("Longueur" ).Value
 
 oexcel.Visible = True
End Sub
 
Si quelqu'un à une idée pour exporter un paramètre

Message cité 1 fois
Message édité par so_xyz le 17-11-2014 à 15:58:18
n°1170504
Guss_
Posté le 17-11-2014 à 16:48:27  profilanswer
 

lmto a écrit :

Merci pour ce conseil. Je l'ai effectué et cela n'a rien fait.
Nous avons donc réinstallé CATIA avec les clefs. Un peu de perte de temps, mais un catia tout propre.
Donc problème résolu.
Merci encore.


 
As tu supprimé simplement le dossier Catsettings et démarrer catia ? Là ça doit normalement en recréé automatiquement (en fonction des catsetting administrateur si il y en a )
 

so_xyz a écrit :

Bonjour à tous,
 
Je souhaiterais exporter un paramètre que j'ai crée pour ma part CATIA (le paramètre représente une longueur) dans un nouveau fichier excel.
Je met le code ci-dessous, si quelqu'un peut m'aider :D
 
Sub CATMain()
Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument
 
Dim part1 As Part
Set part1 = partDocument1.Part
 
'Declare the parameters
nameValue = part1.Name
longueurX=part1.paramaters1.real
Set instance = partDocument1.Product
set longueurX =  parameters1.Item("longueurX" )
Part1.Update
 
'Creation new workbook Excel
   Set oexcel = CreateObject("Excel.Application" )
   Set oBook = oexcel.workbooks.Add
'Export parameters to Excel
 oSheet.Range("A1" ).Value = part1.Name
 oSheet.Range("A2" ).Value = part1.parameters1.Item("Longueur" ).Value
 
 oexcel.Visible = True
End Sub
 
Si quelqu'un à une idée pour exporter un paramètre


 
C'est quoi le soucis ?

n°1170511
ptittom
Posté le 18-11-2014 à 09:29:03  profilanswer
 

Sub CATMain()
    Dim oDoc As Document
    Dim oPart As Part
     
    On Error Resume Next
    Set oDoc = CATIA.ActiveDocument
    If Err.Number <> 0 Then
        MsgBox "No Document opened"
        Err.Clear
        Exit Sub
    End If
    On Error GoTo 0
     
    If TypeName(oDoc) <> "PartDocument" Then
        MsgBox "The active document is not a part"
        Exit Sub
    End If
     
    Set oPart = oDoc.Part
     
    Dim ParameterName As String
    ParameterName = "MyLength"
     
    Dim MyParameter As Parameter
    '### first method: using parameter path) ###
    'Dim cParameters As Parameters
    'Set cParameters = oPart.Parameters
    'On Error Resume Next
    'Set MyParameter = cParameters.Item(oPart.Name & "\" & ParameterName)
    'If Err.Number <> 0 Then
    '    MsgBox "Parameter not found"
    '    Err.Clear
    '    Exit Sub
    'End If
    'On Error GoTo 0
     
    '### second method: using a selection search
    Dim oSel As Selection
    Set oSel = oDoc.Selection
    oSel.Clear
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName & ";all" )
    If oSel.Count < 1 Then
        MsgBox "Parameter not found"
    End If
    Set MyParameter = oSel.Item(1).Value
    oSel.Clear
     
    '### Export to excel
     
    'Creation new workbook Excel
       Set oExcel = CreateObject("Excel.Application" )
       Set oBook = oExcel.workbooks.Add
       Set oSheet = oBook.ActiveSheet
    'Export parameters to Excel
     oSheet.Range("A1" ).Value = oPart.Name
     oSheet.Range("B1" ).Value = MyParameter.ValueAsString
     
     oExcel.Visible = True
End Sub
 


 
Bonjour,
 
Voici une proposition avec deux méthodes différentes pour trouver le paramètre désiré (la première est en commentaire).
La première partie du code est là pour s'assurer qu'un document est ouvert et qu'il s'agit bien d'une part.
J'ai gardé un type générique pour la longueur recherché (type "parameter" ).
Le structure "on Error Resume Next + if Err.Number <> 0" sont là pour gérer les erreurs potentielles. Ca limite les dégats.
 
Pour la partie Excel, j'ai juste ajouté l'objet oSheet qui manquait dans ton code.


Message édité par ptittom le 18-11-2014 à 09:34:19
n°1170513
so_xyz
Posté le 18-11-2014 à 09:59:04  profilanswer
 


C'est quoi le soucis ?[/quotemsg]
 
J'arrive à ouvrir un fichier excel vièrge, à exporter le nom de ma pièce
 
Le problème c'est que je n'arrive pas à exporter la valeur de mon paramètre "longueur".
 
A mon avis c'est au niveau de la déclaration du paramètre qu'il y a un souci

n°1170515
ptittom
Posté le 18-11-2014 à 10:31:08  profilanswer
 

so_xyz a écrit :


J'arrive à ouvrir un fichier excel vierge, à exporter le nom de ma pièce
Le problème c'est que je n'arrive pas à exporter la valeur de mon paramètre "longueur".
A mon avis c'est au niveau de la déclaration du paramètre qu'il y a un souci


 
Tu as essayé mon code ?
J'ai oublié de préciser: changer la ligne ParameterName = "MyLength" avec le nom de ton paramètre bien sûr.

Message cité 1 fois
Message édité par ptittom le 18-11-2014 à 10:32:39
n°1170517
so_xyz
Posté le 18-11-2014 à 14:10:50  profilanswer
 

ptittom a écrit :


 
Tu as essayé mon code ?
J'ai oublié de préciser: changer la ligne ParameterName = "MyLength" avec le nom de ton paramètre bien sûr.


 
Oui merci ptittom ton code fonctionne enfin la 2ème méthode :)
J'avais un problème sur la valeur récupéré (au lieu de me donner 25mm il me donnait 25 000 000)
Mais d'un coup j'ai récupéré la bonne valeur (sans savoir le pourquoi de l'erreur)
 
Donc si j'ai envie de faire la même chose pour d'autre paramètre : je dois juste ajouter/adapter cette partie du code
 
Dim ParameterName As String  
    ParameterName = "MyLength"  
    Dim MyParameter As Parameter
 
'### second method: using a selection search  
    Dim oSel As Selection  
    Set oSel = oDoc.Selection  
    oSel.Clear  
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName & ";all" )  
    If oSel.Count < 1 Then  
        MsgBox "Parameter not found"  
    End If  
    Set MyParameter = oSel.Item(1).Value  
    oSel.Clear


Message édité par so_xyz le 18-11-2014 à 14:13:47
mood
Publicité
Posté le 18-11-2014 à 14:10:50  profilanswer
 

n°1170519
so_xyz
Posté le 18-11-2014 à 15:50:13  profilanswer
 

Ptittom, j'ai repris ton code que j'ai essayé d'adapter à mon besoin:  
 
'Declare the parameters
 
    nameValue = part1.Name                        'Récupération du nom
    Set parameters1 = part1.Parameters
   
    Dim ParameterName As String    'Récupération du premier paramètre X
    ParameterName = "X"
 
    Dim ParameterName1 As String  'Récupération du premier paramètre Y
    ParameterName1 = "Y"
 
    Dim ParameterName2 As String  'Récupération du premier paramètre Z
    ParameterName2 = "Z"
     
    Dim MyParameter As Parameter
    Dim MyParameterY As Parameter
    Dim MyParameterZ As Parameter
 
'### second method: using a selection search
     
    Dim oSel As Selection
    Set oSel = oDoc.Selection
    oSel.Clear
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName & ";all" )
    If oSel.Count < 1 Then
        MsgBox "Parameter not found"
    End If
    Set MyParameter = oSel.Item(1).Value
    Set MyParameterY = oSel.Item(3).Value
    Set MyParameterZ = oSel.Item(2).Value
    oSel.Clear
     
    On Error GoTo 0
'### Export to excel  
     
    'Creation new workbook Excel  
       Set oExcel = CreateObject("Excel.Application" )  
       Set oBook = oExcel.workbooks.Add  
       Set oSheet = oBook.ActiveSheet  
 
    'Export parameters to Excel  
 
     oSheet.Range("A1" ).Value = oPart.Name  
     oSheet.Range("B1" ).Value = MyParameter.ValueAsString  
    oSheet.Range("B2" ).Value = MyParameterY.ValueAsString
    oSheet.Range("B3" ).Value = MyParameterZ.ValueAsString
 
'Display the Excel
       
     oExcel.Visible = True
     
End Sub

Message cité 1 fois
Message édité par so_xyz le 18-11-2014 à 15:50:38
n°1170520
ptittom
Posté le 18-11-2014 à 16:20:01  profilanswer
 

so_xyz a écrit :

Ptittom, j'ai repris ton code que j'ai essayé d'adapter à mon besoin:  
 
'Declare the parameters
 
    nameValue = part1.Name                        'Récupération du nom
    Set parameters1 = part1.Parameters
   
    Dim ParameterName As String    'Récupération du premier paramètre X
    ParameterName = "X"
 
    Dim ParameterName1 As String  'Récupération du premier paramètre Y
    ParameterName1 = "Y"
 
    Dim ParameterName2 As String  'Récupération du premier paramètre Z
    ParameterName2 = "Z"
     
    Dim MyParameter As Parameter
    Dim MyParameterY As Parameter
    Dim MyParameterZ As Parameter
 
'### second method: using a selection search
     
    Dim oSel As Selection
    Set oSel = oDoc.Selection
    oSel.Clear
 
    'search for the first parameter
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName & ";all" )
    If oSel.Count < 1 Then
        MsgBox "Parameter not found"
    End If
    Set MyParameter = oSel.Item(1).Value
    oSel.Clear
     
     'search for the second parameter
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName1 & ";all" )
    If oSel.Count < 1 Then
        MsgBox "Parameter not found"
    End If
    Set MyParameterY = oSel.Item(1).Value
    oSel.Clear
 
     'search for the third parameter
    oSel.Search ("Knowledgeware.Parameter.Name=" & ParameterName2 & ";all" )
    If oSel.Count < 1 Then
        MsgBox "Parameter not found"
    End If
    Set MyParameterZ = oSel.Item(1).Value
    oSel.Clear
 
'### Export to excel  
     
    'Creation new workbook Excel  
       Set oExcel = CreateObject("Excel.Application" )  
       Set oBook = oExcel.workbooks.Add  
       Set oSheet = oBook.ActiveSheet  
 
    'Export parameters to Excel  
 
     oSheet.Range("A1" ).Value = oPart.Name  
     oSheet.Range("B1" ).Value = MyParameter.ValueAsString  
    oSheet.Range("B2" ).Value = MyParameterY.ValueAsString
    oSheet.Range("B3" ).Value = MyParameterZ.ValueAsString
 
'Display the Excel
       
     oExcel.Visible = True
     
End Sub


 
J'ai corrigé le code. Il faut effectuer 3 recherches pour trouver les paramètres souhaités (ligne oSel.Search(...)). Tu pourrais aussi placer la recherche dans une fonction en utilisant le nom du paramètre comme argument. Ce serait plus élegant.
 
C'est voulu que tu déclares un paramètre de type string et un object de type parameters dont tu ne fais rien (NameValue et parameters1) ?

n°1170525
so_xyz
Posté le 19-11-2014 à 10:03:52  profilanswer
 

ptittom a écrit :


 
J'ai corrigé le code. Il faut effectuer 3 recherches pour trouver les paramètres souhaités (ligne oSel.Search(...)). Tu pourrais aussi placer la recherche dans une fonction en utilisant le nom du paramètre comme argument. Ce serait plus élegant.
 
C'est voulu que tu déclares un paramètre de type string et un object de type parameters dont tu ne fais rien (NameValue et parameters1) ?


 
 
Merci de ton aide ; j'avais tenté 3 recherches sans succès. Pour ta question, non ce n'est pas voulu du moins ça n'apporte rien donc je l'ai enlevé merci.
 
Par contre, j'ai un soucie :
Sur les 3 valeurs récupéré sur excel, il y en a qu'une qui est correcte. Il y a un problème de virgule.  
Au lieu de récupéré par exemple 40,50 mm sur le tableau je vais avoir 4050.
J'ai ce soucie sur les 2 premiers paramètres. Le dernier me donne la valeur exacte, je vais essayé de voir pourquoi.
 
 
En faite quand le paramètre est un nombre entier aucun soucie et lorsque j'ai un nombre décimale, la macro me donne tout le nombre mais sans la virgule

Message cité 1 fois
Message édité par so_xyz le 19-11-2014 à 10:16:02
n°1170526
ptittom
Posté le 19-11-2014 à 11:06:52  profilanswer
 

so_xyz a écrit :


 
 
Merci de ton aide ; j'avais tenté 3 recherches sans succès. Pour ta question, non ce n'est pas voulu du moins ça n'apporte rien donc je l'ai enlevé merci.
 
Par contre, j'ai un soucie :
Sur les 3 valeurs récupéré sur excel, il y en a qu'une qui est correcte. Il y a un problème de virgule.  
Au lieu de récupéré par exemple 40,50 mm sur le tableau je vais avoir 4050.
J'ai ce soucie sur les 2 premiers paramètres. Le dernier me donne la valeur exacte, je vais essayé de voir pourquoi.
 
 
En faite quand le paramètre est un nombre entier aucun soucie et lorsque j'ai un nombre décimale, la macro me donne tout le nombre mais sans la virgule


 
Bonjour,
 
Il y a plusieurs méthodes pour obtenir la valeur d'un paramètre: J'ai utilisé .ValueAsString, tu peux essayer .Value
Essaye sinon de voir ce qu'exporte CATIA avant que Excel ne l'interprète: MsgBox ou Debug.Print
 

MsgBox "X: " & MyParameter.ValueAsString & " ; " &   MyParameter.Value
    MsgBox "Y: " & MyParameterY.ValueAsString & " ; " &   MyParameterY.Value
    MsgBox "Z: " & MyParameterZ.ValueAsString & " ; " &   MyParameterZ.Value


n°1170527
so_xyz
Posté le 19-11-2014 à 14:32:56  profilanswer
 

ptittom a écrit :


 
Bonjour,
 
Il y a plusieurs méthodes pour obtenir la valeur d'un paramètre: J'ai utilisé .ValueAsString, tu peux essayer .Value
Essaye sinon de voir ce qu'exporte CATIA avant que Excel ne l'interprète: MsgBox ou Debug.Print
 

MsgBox "X: " & MyParameter.ValueAsString & " ; " &   MyParameter.Value
    MsgBox "Y: " & MyParameterY.ValueAsString & " ; " &   MyParameterY.Value
    MsgBox "Z: " & MyParameterZ.ValueAsString & " ; " &   MyParameterZ.Value




 
 
En lançant la commande MsgBox j'obtiens bien la valeur désiré (40,50mm) mais sur Excel je retrouve la valeur de 4050. Il doit y avoir un probème de reconnaissance du nombre décimal ou peut être la gestion de "," et du "."
 
Je regarde encore de mon côté si je trouve une solution.

n°1170528
ptittom
Posté le 19-11-2014 à 16:35:05  profilanswer
 

Les paramètres exportés sont de type dimension ou réel ? Le résultat est le même avec .ValueAsString et .Value ?
Essaye peut-être de remplacer les points par des virgules quand tu exportes la valeur du paramètre:

oSheet.Range("B1" ).Value = Replace(MyParameter.ValueAsString, ".", "," )

Message cité 1 fois
Message édité par ptittom le 19-11-2014 à 16:36:32
n°1170531
so_xyz
Posté le 19-11-2014 à 17:23:52  profilanswer
 

ptittom a écrit :

Les paramètres exportés sont de type dimension ou réel ? Le résultat est le même avec .ValueAsString et .Value ?
Essaye peut-être de remplacer les points par des virgules quand tu exportes la valeur du paramètre:

oSheet.Range("B1" ).Value = Replace(MyParameter.ValueAsString, ".", "," )



 
Merci beaucoup ça fonctionne :) , il faut juste inverser le "." et la "," dans ton code :
 
           oSheet.Range("B1" ).Value = Replace(MyParameter.ValueAsString, ",", "."


Message édité par so_xyz le 19-11-2014 à 17:26:33
n°1170645
malarox
Posté le 24-11-2014 à 11:03:55  profilanswer
 

Bonjour!  
 
C'est lundi et déjà que c'est dur de reprendre le boulot, catia fait des siennes :(
 
Je ne sais pourquoi mais lorsque je fait un drawing, les côtes crées avec l'outil "cotations cumulées" ne sont plus indépendantes.. Je ne peux donc plus mettre de tolérances pour chacune des côtes ni les déplacées à ma guise : elles agissent comme si elles n'étaient qu'une seule côte...
Je n'est changé aucun paramètre pendant le weekend ni changé de standard, j'ai aussi regardé les options mais je n'est rien vu qui permettait de gérer ce problème...  
 
Quelqu'un à-t-il déjà eu ce même problème et sais comment le résoudre ? (redémarrer Catia ne marche pas non plus ^^)
 
Merci d'avance ! =)


Message édité par malarox le 24-11-2014 à 15:57:18
n°1170678
malarox
Posté le 26-11-2014 à 15:26:07  profilanswer
 

Citation :

Bonjour!  
 
C'est lundi et déjà que c'est dur de reprendre le boulot, catia fait des siennes :(  
 
Je ne sais pourquoi mais lorsque je fait un drawing, les côtes crées avec l'outil "cotations cumulées" ne sont plus indépendantes.. Je ne peux donc plus mettre de tolérances pour chacune des côtes ni les déplacées à ma guise : elles agissent comme si elles n'étaient qu'une seule côte...  
Je n'est changé aucun paramètre pendant le weekend ni changé de standard, j'ai aussi regardé les options mais je n'est rien vu qui permettait de gérer ce problème...  
 
Quelqu'un à-t-il déjà eu ce même problème et sais comment le résoudre ? (redémarrer Catia ne marche pas non plus ^^)  
 
Merci d'avance ! =)


 
Toujours pas d'idées de solution ? On est mercredi et le problème persiste ce qui est très handicapant pour faire les mises en plan ...

n°1170680
jubeat
Mais pousse toi !
Posté le 26-11-2014 à 17:32:23  profilanswer
 

Désolé, je n'ai jamais utilisé cette fonction, je fais des côtes indépendantes et je les aligne ensuite.

 

Quand tu actives la fonction, tu n'as pas une barre d'outils qui s'ouvre, avec des options, un peu comme dans un sketch?


---------------
War Thunder : Karamazoff
n°1170684
tintin33
Si vis pacem para bellum
Posté le 27-11-2014 à 00:21:13  profilanswer
 

Reset Catsetting sinon, c'est peut-être un paramètre à la noix qui a changé comme par magie (ça m'est déjà arrivé).

n°1170688
malarox
Posté le 27-11-2014 à 08:57:55  profilanswer
 

Citation :

Quand tu actives la fonction, tu n'as pas une barre d'outils qui s'ouvre, avec des options, un peu comme dans un sketch?


 
Non il n'y que la palette d'outil qui permet de forcer la côte dans une direction, comme avec l'outil de cotation de base :/
 

Citation :

Reset Catsetting sinon, c'est peut-être un paramètre à la noix qui a changé comme par magie (ça m'est déjà arrivé).


 
Mes Settings n'ont pas disparus pourtant... J'ai toujours mes raccourcis et même ceux que j'ai rajouté au fur et à mesure mais bon je vais essayer quand même ... [:zigg]

n°1170691
malarox
Posté le 27-11-2014 à 09:51:22  profilanswer
 

Bon bha ça à un peut merdé donc j'ai récupéré toute la config Catia d'un collègue et du coup ça marche ...  
 
Merci bien ! =)
 
(Si quelqu'un vois d'où pouvais venir mon problème ça serais cool de me le dire juste à titre d'information :D )

n°1170701
malarox
Posté le 28-11-2014 à 11:00:23  profilanswer
 

Bonjour à tous!
 
J'ai pas de problèmes cette fois ci (enfin pas vraiment :D) mais je cherche un moyen pour me faciliter la vie :)
 
Pour écrire dans Catia, pour faire de la gravure ou de l'extrusion de lettres par exemple, j'utilise la bonne vieille méthode drawing/dxf/copier-coller dans le sketch.
Cependant ce n'est pas toujours très précis pour placer la dite gravure ou pour gérer la taille du texte (on y arrive mais il faut tâtonner un petit peu), et c'est très la merde pour les textes courbés..
 
En faisant deux trois recherches je suis tomber sur des modules/macros permettant d'écrire directement dans le sketcher (comme dans SolidWorks) et qui donc, permettent de positionner le texte (suivant un axe ou même une spline), gérer la hauteur, ect...  
J'ai d'ailleurs trouvé un module en particulier nommé SketchText qui se révélais parfait..  
Cependant ce module dois être installé sous Windows XP et avec Catia V5 R19 au max.. Donc sois je n'est pas réussi à trouver la dernière version, sois ce logiciel est DCD depuis longtemps haha
 
Est-ce que quelqu'un utilise ou connais un logiciel du genre et pourrais me dire lequel et comment l'installer ? (Oui oui, je suis une brêle en informatique mis à part la CAO haha)
 
Bien entendu il faudrait que ce logiciel sois gratuit mais surtout légal ! J'ai pas trop envie d'avoir des problèmes avec Dassault mais je pense que vous comprenez pourquoi ^^ ([:nnewlonllik])
 
 
Ah oui au fait je suis sous Windows 7 avec la version 5-6 de Catia =)

n°1170710
shkyo30
Posté le 28-11-2014 à 18:04:49  profilanswer
 

Bonjour à tous,
 
Je tente d'écrire une macro en VBA pour renommer les références de produit, ainsi que le nom de l'instance du composant.
 
Je me suis basé sur un exemple donné par ptittom pour parcourir l’arborescence mais Catia ne laisse pas renommer le nom de l'instance!! Il passe sur l'instruction sans faire d'erreur, mais sans rien faire non plus!  :??:  
 
Voici mon code de parcours de l'arbre:

Code :
  1. Sub Parcours_Arbre(myProd As Product, nbLevel As Long, chaineAModifier As String)
  2.     Dim mySubProd As Products
  3.     Dim myChildProd As Product
  4.     Dim strTmp As String
  5.     Dim index As Long
  6.    
  7.     Set mySubProd = myProd.Products
  8.     myProd.ApplyWorkMode DESIGN_MODE
  9.    
  10.     If mySubProd.Count >= 1 Then
  11.         For index = 1 To mySubProd.Count
  12.             If Is_It_Part(mySubProd.Item(index)) = True Then
  13.                 strTmp = mySubProd.Item(index).PartNumber
  14.                 ' enlève la chaine demandée du nom de la 'Référence' du 'Produit'
  15.                 If InStr(1, strTmp, chaineAModifier, 1) <> 0 Then
  16.                     strTmp = Replace(strTmp, chaineAModifier, "", 1, 1, vbTextCompare)
  17.                     mySubProd.Item(index).PartNumber = strTmp
  18.                 End If
  19.                 ' enlève la chaine demandée du 'Nom de l'instance' du 'Composant'
  20.                 strTmp = mySubProd.Item(index).Name
  21.                 If InStr(1, strTmp, chaineAModifier, 1) <> 0 Then
  22.                     strTmp = Replace(strTmp, chaineAModifier, "", 1, 1, vbTextCompare)
  23.                     mySubProd.Item(index).Name = strTmp   <=== ICI...
  24.                 End If
  25.                 ' enlève tout ce qu'il y a après le 1er "_" du 'Nom de l'instance' du 'Composant'
  26.                 strTmp = mySubProd.Item(index).Name
  27.                 If InStr(1, strTmp, "_", 1) <> 0 Then
  28.                     strTmp = Mid(strTmp, 1, InStr(1, strTmp, "_", 1) - 1)
  29.                     mySubProd.Item(index).PartNumber = strTmp   <=== et ICI...
  30.                 End If
  31.             Else
  32.                 Set myChildProd = mySubProd.Item(index)
  33.                
  34.                 strTmp = myChildProd.PartNumber
  35.                 strTmp = Replace(strTmp, chaineAModifier, "", , , vbTextCompare)
  36.                 myChildProd.PartNumber = strTmp
  37.                
  38.                 Parcours_Arbre myChildProd, nbLevel + 1, chaineAModifier
  39.             End If
  40.         Next
  41.     End If
  42. End Sub


 
Je suis preneur de toute suggestion...  ;)  
 
Pour info, j'utilise soit une V5R20 soit une V5R22 selon les licences dispos.
Merci (beaucoup) d'avance!

Message cité 1 fois
Message édité par shkyo30 le 30-11-2014 à 16:06:30

---------------
Ma (petite) chaîne Youtube: https://www.youtube.com/channel/UCy [...] UwOtLaYKw/
n°1170720
ptittom
Posté le 01-12-2014 à 07:42:33  profilanswer
 

shkyo30 a écrit :

Bonjour à tous,
 
Je tente d'écrire une macro en VBA pour renommer les références de produit, ainsi que le nom de l'instance du composant.
 
Je me suis basé sur un exemple donné par ptittom pour parcourir l’arborescence mais Catia ne laisse pas renommer le nom de l'instance!! Il passe sur l'instruction sans faire d'erreur, mais sans rien faire non plus!  :??:  


 
Bonjour,
 
J'ai déjà eu ce problème. C'est la galère pour renommer les instances. C'est "normal" que ton code ne marche pas comme cela. J'ai un code qui fonctionne quelque part. Je pars à sa recherche.
 
edit: retrouvé. J'ai un peu transformé mon code pour en faire une Sub. PartNumber et Name sont en argument. L'objet oProd est le noeud à renommer. Dans ton cas:

mySubProd.Item(index)


Quand au code en lui même, on doit chercher un noeud caché dans l'arborescence (referenceProduct) puis redescendre vers l'objet voulu. C'est un peu le bazar, l'interface COM n'est pas terrible à ce niveau.
Attention, ca ne marche pas pour le produit principal.
 

Sub ChangeNames(oProd As Product, NewPartNumber As String, NewName As String)
    Dim oLocalDoc As Document
    Dim oLocalRefProd As Product
    Dim cLocalProducts As Products
    Dim oLocalProd As Product
    Dim ParentName As String
     
    Set oLocalDoc = oProd.Parent.Parent.ReferenceProduct.Parent
    Set oLocalRefProd = oLocalDoc.Product
    Set cLocalProducts = oLocalRefProd.Products
             
    On Error Resume Next
    Set oLocalProd = cLocalProducts.Item(oProd.Name)
    If Err.Number <> 0 Then
        Set oLocalRefProd = cLocalProducts.Item(oProd.Parent.Parent.Name)
        Set cLocalProducts = oLocalRefProd.Products
        Set oLocalProd = cLocalProducts.Item(oProd.Name)
    End If
    Err.Clear
    On Error GoTo 0
    oLocalProd.Name = NewName
    oLocalProd.PartNumber = NewPartNumber
 
End Sub


 
Et tu peux supprimer le nbLevel dont tu ne sers pas (enfin, dans ce qu'on peut voir).

Message cité 1 fois
Message édité par ptittom le 01-12-2014 à 08:03:13
n°1170723
gael44
Posté le 01-12-2014 à 09:26:11  profilanswer
 

Salut à tous
 
Dessineux ayant bossé sur pas mal de tromblons:  Euclid, V4, Solid et maintenant V5, (et trouvant que V5 remporte la palme du tromblon)
 
J'ai une galère toute bête mais vraiment je ne trouve pas la solutions malgré d'autre settings, ayant fouillé dans les options et joué sur Gogole pas mal, je ne trouve pas ma solution.
 
Mon problème tout bête est que ma boussole est TROP grande en affichage, en haut à droite au lieu de mesurer "en gros 1cm x1cm" elle fait 3x3 .
Son fonctionnement est identique et correcte, mais elle est juste trop grande.
 
Je précise que j'ai un V5x19 officiel, et que je suis le seul dans ma boite à avoir ce pb.
 
j'ai aussi un pb d'affichage sur l'arbre que je ne possédais pas avant, ma carte graphique quadro GL est à jour.
 
Merci à tous

n°1170724
ptittom
Posté le 01-12-2014 à 09:57:14  profilanswer
 

Bonjour,
 
Il y a moyen de définir manuellement la taille de ton écran (en mm) avec les variables d'environement suivantes:
catheightmmofscreen= hauteur en mm
catwidthmmofscreen=largeur en mm
 
En gros, CATIA doit mal interpréter la taille de ton écran, pensant qu'il est plus petit que sa taille réelle. La boussole est affichée plus grosse pour compenser.
Ca peut être pratique aussi si on affiche CATIA sur une télé de 50 pouces pour ne pas avoir une boussole énorme.
 
Pour la taille de l'arbre par défaut (windows 7 affiche assez petit par défaut).
CATGraphSize=5


Message édité par ptittom le 01-12-2014 à 09:59:34
n°1170725
gael44
Posté le 01-12-2014 à 10:00:00  profilanswer
 

Merci pour ta réponse je jete un coup d'oeil

n°1170726
gael44
Posté le 01-12-2014 à 10:05:37  profilanswer
 

Impeccable en effet c'etait dans les variables d'environnement.
Merci à toi sujet clos

n°1170727
shkyo30
Posté le 01-12-2014 à 11:02:11  profilanswer
 

ptittom a écrit :


 
Bonjour,
 
J'ai déjà eu ce problème. C'est la galère pour renommer les instances. C'est "normal" que ton code ne marche pas comme cela. J'ai un code qui fonctionne quelque part. Je pars à sa recherche.
 
edit: retrouvé. J'ai un peu transformé mon code pour en faire une Sub. PartNumber et Name sont en argument. L'objet oProd est le noeud à renommer. Dans ton cas:

mySubProd.Item(index)


Quand au code en lui même, on doit chercher un noeud caché dans l'arborescence (referenceProduct) puis redescendre vers l'objet voulu. C'est un peu le bazar, l'interface COM n'est pas terrible à ce niveau.
Attention, ca ne marche pas pour le produit principal.
 

Sub ChangeNames(oProd As Product, NewPartNumber As String, NewName As String)
    Dim oLocalDoc As Document
    Dim oLocalRefProd As Product
    Dim cLocalProducts As Products
    Dim oLocalProd As Product
    Dim ParentName As String
     
    Set oLocalDoc = oProd.Parent.Parent.ReferenceProduct.Parent
    Set oLocalRefProd = oLocalDoc.Product
    Set cLocalProducts = oLocalRefProd.Products
             
    On Error Resume Next
    Set oLocalProd = cLocalProducts.Item(oProd.Name)
    If Err.Number <> 0 Then
        Set oLocalRefProd = cLocalProducts.Item(oProd.Parent.Parent.Name)
        Set cLocalProducts = oLocalRefProd.Products
        Set oLocalProd = cLocalProducts.Item(oProd.Name)
    End If
    Err.Clear
    On Error GoTo 0
    oLocalProd.Name = NewName
    oLocalProd.PartNumber = NewPartNumber
 
End Sub


 
Et tu peux supprimer le nbLevel dont tu ne sers pas (enfin, dans ce qu'on peut voir).


 
YES! Merci beaucoup ptittom ça fonctionne pil poil! Par contre, ça ne fonctionnait pas pourquoi? Parce que je tentais de manipuler les champs directement, sans passer par les "Set" de manip des objets?? Le fait qu'il ne fasse rien, ni modif, ni erreur est assez déroutant...


---------------
Ma (petite) chaîne Youtube: https://www.youtube.com/channel/UCy [...] UwOtLaYKw/
n°1170728
bas6te
Posté le 01-12-2014 à 11:51:59  profilanswer
 

Bonjour à tous!  
 
Je viens vers vous car j'ai besoin d'éclaircissement sur la conversion en step sur Catia.
 
Notre client souhaite m’envoyer sont assemblage. Lui travail sur Catia, moi sur Inventor.
 
Pour cela il choisit donc le step, lors de son export il coche l’option « lien vers Catia », et lorsque je reçois sont fichier, j’ai un dossier avec un .stp, et une multitude de CATPart, qui sont les pièces de l’assemblage.  
 
Lorsque je cherche à ouvrir le .stp, il est complètement vide. Je ne trouver pas beaucoup de documentation sur le sujet, mise a part :  
 
http://catiadoc.free.fr/online/bas [...] tf0100.htm
 
Tout en bas il y a un début d’explication de « links to Catia », et il semblerait que le step contienne simplement la structure de l’assemblage, mais lorsque je l’ouvre, il ne me demande a aucun moment d’allée chercher un fichier, il est simplement complètement vide.
 
Quelqu’un ici est familier avec ce protocole d’échange ?
 
Merci !

n°1170729
ptittom
Posté le 01-12-2014 à 13:25:49  profilanswer
 

shkyo30 a écrit :


 
YES! Merci beaucoup ptittom ça fonctionne pil poil! Par contre, ça ne fonctionnait pas pourquoi? Parce que je tentais de manipuler les champs directement, sans passer par les "Set" de manip des objets?? Le fait qu'il ne fasse rien, ni modif, ni erreur est assez déroutant...


 
C'est à mon avis un bug de l'interface COM utilisée par VBA. Il y a bien les propriétés pour le PartNumber et le Name mais en Read-only. Il faut passer par le ReferenceProduct et redescendre vers l'objet voulu pour que ca marche. Ca ne concerne pas le produit principal par exemple où les méthodes directes fonctionnent.  :??:  
 
Content d'avoir pu te donner un coup de main.

n°1170730
shkyo30
Posté le 01-12-2014 à 17:38:12  profilanswer
 

Petite question sur le matos pour faire tourner Catia (v5R19, R20 et R22)...
 
Au boulot, on a 2 nouvelles stations Dell (Precision T5810) avec 16Go de ram, Xeon 4core (E5-1620v3 à 3.5Ghz) et une Nvidia Quadro K2200 4Go de ram, ça tourne pas mal mais ce n'est pas démentiel non plus.
Je sais qu'en calculs pures (avec Blender par exemple) avec le GPU, une carte Geforce GTX série 9xx, 7xx ou même 6xx, va très largement plus vite que la Quadro K2200, par exemple une GTX660ti va 40% plus vite alors qu'elle coute 3x moins cher...  :heink:  
 
Mais quelqu'un a-t-il testé une machine à base de Intel i7 à 6core et une Geforce GTX?? Si oui, est-ce que ça tourne bien? Car je ne suis pas sur qu'avoir des Xeon soit bien nécessaire...


---------------
Ma (petite) chaîne Youtube: https://www.youtube.com/channel/UCy [...] UwOtLaYKw/
n°1170746
jubeat
Mais pousse toi !
Posté le 01-12-2014 à 23:03:49  profilanswer
 

bas6te a écrit :

Bonjour à tous!  
 
Je viens vers vous car j'ai besoin d'éclaircissement sur la conversion en step sur Catia.
 
Notre client souhaite m’envoyer sont assemblage. Lui travail sur Catia, moi sur Inventor.
 
Pour cela il choisit donc le step, lors de son export il coche l’option « lien vers Catia », et lorsque je reçois sont fichier, j’ai un dossier avec un .stp, et une multitude de CATPart, qui sont les pièces de l’assemblage.  
 
Lorsque je cherche à ouvrir le .stp, il est complètement vide. Je ne trouver pas beaucoup de documentation sur le sujet, mise a part :  
 
http://catiadoc.free.fr/online/bas [...] tf0100.htm
 
Tout en bas il y a un début d’explication de « links to Catia », et il semblerait que le step contienne simplement la structure de l’assemblage, mais lorsque je l’ouvre, il ne me demande a aucun moment d’allée chercher un fichier, il est simplement complètement vide.
 
Quelqu’un ici est familier avec ce protocole d’échange ?
 
Merci !


Moi quand je fais un stp pour les gens du calcul, ça génère un fichier unique, pas de CATPart à côté... Si tu le rouvres avec Catia, tu as des solides et l'arborescence du Product qui a servi à le générer, mais tout est contenu dans le stp. C'est un simple "save as", je sais pas s'il y a des options, je regarderai demain.
 
 

shkyo30 a écrit :

Petite question sur le matos pour faire tourner Catia (v5R19, R20 et R22)...
 
Au boulot, on a 2 nouvelles stations Dell (Precision T5810) avec 16Go de ram, Xeon 4core (E5-1620v3 à 3.5Ghz) et une Nvidia Quadro K2200 4Go de ram, ça tourne pas mal mais ce n'est pas démentiel non plus.
Je sais qu'en calculs pures (avec Blender par exemple) avec le GPU, une carte Geforce GTX série 9xx, 7xx ou même 6xx, va très largement plus vite que la Quadro K2200, par exemple une GTX660ti va 40% plus vite alors qu'elle coute 3x moins cher...  :heink:  
 
Mais quelqu'un a-t-il testé une machine à base de Intel i7 à 6core et une Geforce GTX?? Si oui, est-ce que ça tourne bien? Car je ne suis pas sur qu'avoir des Xeon soit bien nécessaire...


J'ai eu l'occasion de bosser un peu sur une machine avec un i7, mais aucune idée du modèle ni du nombre de coeurs ni de la CG... Je sais juste qu'elle avait 16Go et que ça envoyait !! Là j'ai que 8Go et un Xeon un peu ancien, ça rame...  :cry:  
Désolé, ça va pas beaucoup t'aider...


---------------
War Thunder : Karamazoff
n°1170748
shkyo30
Posté le 02-12-2014 à 08:30:50  profilanswer
 

....
 

jubeat a écrit :


J'ai eu l'occasion de bosser un peu sur une machine avec un i7, mais aucune idée du modèle ni du nombre de coeurs ni de la CG... Je sais juste qu'elle avait 16Go et que ça envoyait !! Là j'ai que 8Go et un Xeon un peu ancien, ça rame...  :cry:  
Désolé, ça va pas beaucoup t'aider...


 
ça donne déjà un peu d'infos, un i7 a 4 core minimum, les modèles à 6 core sont sortis il y a environ 2 ans et les 8 core viennent juste de sortir (assez cher...), dommage que tu ne te souviennes pas de la CG mais merci quand même!

Message cité 1 fois
Message édité par shkyo30 le 02-12-2014 à 09:00:31

---------------
Ma (petite) chaîne Youtube: https://www.youtube.com/channel/UCy [...] UwOtLaYKw/
n°1170750
Guss_
Posté le 02-12-2014 à 09:52:48  profilanswer
 

shkyo30 a écrit :

Petite question sur le matos pour faire tourner Catia (v5R19, R20 et R22)...
 
Au boulot, on a 2 nouvelles stations Dell (Precision T5810) avec 16Go de ram, Xeon 4core (E5-1620v3 à 3.5Ghz) et une Nvidia Quadro K2200 4Go de ram, ça tourne pas mal mais ce n'est pas démentiel non plus.
Je sais qu'en calculs pures (avec Blender par exemple) avec le GPU, une carte Geforce GTX série 9xx, 7xx ou même 6xx, va très largement plus vite que la Quadro K2200, par exemple une GTX660ti va 40% plus vite alors qu'elle coute 3x moins cher...  :heink:  
 
Mais quelqu'un a-t-il testé une machine à base de Intel i7 à 6core et une Geforce GTX?? Si oui, est-ce que ça tourne bien? Car je ne suis pas sur qu'avoir des Xeon soit bien nécessaire...


 
Catia V5 ne sait globalement pas exploiter au mieux les ressources de nos machines récentes (multi coeurs, accélération 3d, instructions spécifiques ...)
 
Si on observe les ressources utilisés, sur ma machine Xeon 4 coeurs (donc 8 thread) RAM 8 Go, quardo fx 3800 et ssd samsung 840 pro, il n'y a que un thread utilisé sur le CPU et que 30% de la carte graphique utilisée lorsque catia ramme en affichage.

n°1170753
ptittom
Posté le 02-12-2014 à 12:05:04  profilanswer
 

shkyo30 a écrit :

Petite question sur le matos pour faire tourner Catia (v5R19, R20 et R22)...


 
Bonjour,
 
CATIA V5 ne gère les processeurs multicore que dans certains modules (FEM pour les calculs, entre autres). l'architecture du logiciel est assez ancienne.
Je bosse sur plusieurs machines:
- chez un client: Dell T3600: xeon E5-1620 à 3,6Ghz, 16GB de RAM et Quadro 2000
- Lenovo W530: i7 3720QM @ 2,6Ghz , 16Gb de RAM et quadro K2000M
Le dell marche plutôt pas mal, nous avons une variante avec 32GB de Ram pour les utilisateurs ayant des produit plus grands. Le lenovo s'en sort très bien pour un laptop.
 
Pour les performances, une fréquence CPU élévée est un plus, le nombre de coeurs n'influe que très peu. Sinon, minimum 16Gb de RAM. Un SSD apporte un vrai plus pour le chargement de CATIA. Pour la carte graphique, il n'y a pas d'énormes différence tant que les produits ne sont pas trop gros. J'ai une GTX 570 à la maison qui fait très bien son boulot. Les quadro ont l'avantage d'avoir des driver optimisés. Nos admin prennent en général des cartes graphiques et processeur grand public pour nos workstation: i7, GTx 770, GTX970... Ca marche bien aussi.
 
Si la machine est uniquement pour CATIA, je partirais sur les i7 4xxx (en socket 1150), 16GB de RAm mini, une carte graphique moyen/heut de gamme genre GTX 770/970 et un bon SSD.

Message cité 1 fois
Message édité par ptittom le 02-12-2014 à 12:06:23
n°1170756
Guss_
Posté le 02-12-2014 à 13:59:45  profilanswer
 

Avez vous tenté de télécharger les pilotes certifiées Nvidia pour catia récemment ?
 
Sur le site j'ai beau choisir quardo -> fx 3800 -> pilotes certifiées -> dassaut -> certified workstation included Catia
 
ça mouline et rien du tout (et j'ai tenté à plusieurs reprise depuis quelques semaines)

n°1170757
ptittom
Posté le 02-12-2014 à 14:47:52  profilanswer
 

Guss_ a écrit :

Avez vous tenté de télécharger les pilotes certifiées Nvidia pour catia récemment ?
 
Sur le site j'ai beau choisir quardo -> fx 3800 -> pilotes certifiées -> dassaut -> certified workstation included Catia
 
ça mouline et rien du tout (et j'ai tenté à plusieurs reprise depuis quelques semaines)


 
Rien non plus sur le site allemand. Sans doute en rade.
Je n'installe pas forcément les pilotes certifiés (WHQL quand même)... Plus généralement, je ne change pas très souvent les pilotes quand tout fonctionne.

n°1170759
Guss_
Posté le 02-12-2014 à 16:09:00  profilanswer
 

J'ai des soucis avec la mise en veille, lorsque ma session windows est verrouillée et se met en veille, la machine plante, BSOD et dans le log le code d'erreur du BSOD correspond à ce que la carte vidéo ne répondait plus, d' ou mon désire de mettre à jour les pilotes

mood
Publicité
Posté le   profilanswer
 

 Page :   1  2  3  4  5  ..  226  227  228  ..  233  234  235  236  237  238

Aller à :
Ajouter une réponse
 

Sujets relatifs
Transfert de donnees 3D texturees entre Catia et 3DSMAX6[Blender] Besoin d'aide !
De l'aide sur une Recherche..:: Topic des Publivores ::..
[Toshop] Besoin d'aide pour faire un dégradéCatia - Commande pour masquer tous les plans?!!!
Conseils / remarques sur ma maquette (site geo expert)topic unique de l' acréatique-chronique
[REGLE][FLASH]Demande de conseils 
Plus de sujets relatifs à : [Support] Catia : trucs, astuces, conseils, aide


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR