useraccessmode
2 participants
Page 1 sur 1
useraccessmode
Bonjour
J'ai reçu des parts (issue de 3DEXP) qui possèdent des propriétés utilisateurs que je veux supprimer
La valeur de CATIA.Activedocument.product.UserRefProperties.item(1).UseraccessMode vaut 1 .
Dans la doc cela veut dire que je ne peux pas la détruire. il faut la passer en 2
j'ai essayé
CATIA.Activedocument.product.UserRefProperties.item(1).UseraccessMode =2 mais ca ne fonctionne pas
Y a t il une solution pour changer ce paramètre et qui me permettrait de supprimer ces userproperties ?
Merci d'avance
J'ai reçu des parts (issue de 3DEXP) qui possèdent des propriétés utilisateurs que je veux supprimer
La valeur de CATIA.Activedocument.product.UserRefProperties.item(1).UseraccessMode vaut 1 .
Dans la doc cela veut dire que je ne peux pas la détruire. il faut la passer en 2
j'ai essayé
CATIA.Activedocument.product.UserRefProperties.item(1).UseraccessMode =2 mais ca ne fonctionne pas
Y a t il une solution pour changer ce paramètre et qui me permettrait de supprimer ces userproperties ?
Merci d'avance
toulouzing- actif
- Messages : 20
Date d'inscription : 09/04/2014
Localisation : toulouse
Re: useraccessmode
Salut,
Je me suis déjà cassé les dents sur ce sujet regarde ICI
Mais je ne suis plus complètement sûr que ça supprime les userref. bloquées.
Je me suis déjà cassé les dents sur ce sujet regarde ICI
Mais je ne suis plus complètement sûr que ça supprime les userref. bloquées.
lumpazepfel- Fédérateur
- Messages : 316
Date d'inscription : 02/11/2015
Localisation : Ensisheim
Re: useraccessmode
Salut,
Après vérification, la fonction remove ne fonctionne pas avec les Userref bloquées (UseraccessMode=1).
Il faut utiliser une sélection : ajouter les Userref à supprimer dans une sélection puis effacer la sélection.
Exemple pour tout supprimer :
Après vérification, la fonction remove ne fonctionne pas avec les Userref bloquées (UseraccessMode=1).
Il faut utiliser une sélection : ajouter les Userref à supprimer dans une sélection puis effacer la sélection.
Exemple pour tout supprimer :
- Code:
Sub CATMain()
Dim myDocument As Document
Set myDocument = CATIA.ActiveDocument
Dim mySel As Selection
Set mySel = myDocument.Selection
mySel.Clear
Set myProduct = myDocument.Product
Set myUserProps = myProduct.UserRefProperties
'On Error Resume Next
For i = 1 To myUserProps.Count
Debug.Print myUserProps.Item(i).Name & "-" & myUserProps.Item(i).UserAccessMode
mySel.Add myUserProps.Item(i)
Next
If mySel.Count > 0 Then
mySel.Delete
End If
End Sub
lumpazepfel- Fédérateur
- Messages : 316
Date d'inscription : 02/11/2015
Localisation : Ensisheim
Re: useraccessmode
Bonjour
Je te remercie beaucoup pour cette astuce de jouer avec les sélections. Je la garde en mémoire pour de prochaines macros. En tout cas ça répond parfaitement à mon besoin actuel.
Merci beaucoup et bonne journée.
Je te remercie beaucoup pour cette astuce de jouer avec les sélections. Je la garde en mémoire pour de prochaines macros. En tout cas ça répond parfaitement à mon besoin actuel.
Merci beaucoup et bonne journée.
toulouzing- actif
- Messages : 20
Date d'inscription : 09/04/2014
Localisation : toulouse
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|