Macro afin de verrouiller/déverrouiller une vue selectionnée

Voir le sujet précédent Voir le sujet suivant Aller en bas

EnCours Macro afin de verrouiller/déverrouiller une vue selectionnée

Message par JADOR le Ven 31 Mai 2013 - 4:21

Bonjour,

Dans mon travail quotidien je suis amené a verrouiller/déverrouiller des vues dans un DRAW. je souhaite faire une macro avec un bouton pour facilité cela. non pas que cela soit dur, mais juste que je fais ->clic droit->propriété->déverrouiller 100x/jour.

je cherche quelqu'un qui pourrait m'aider sur le sujet.

MERCI

JADOR
timide
timide

Messages : 2
Date d'inscription : 31/05/2013
Localisation : Tarbes

Revenir en haut Aller en bas

EnCours Re: Macro afin de verrouiller/déverrouiller une vue selectionnée

Message par JADOR le Ven 31 Mai 2013 - 5:16

pour ceux que cà interesse jai trouver le code

'30/05/13 vérouiller/dévérouiller
'
Language="VBSCRIPT"
Sub CATMain()
' ******************************* test if drawing is open ********************************
If CATIA.Documents.Count = 0 Then
MsgBox "There is no CATIA Drawing file open. Open a drawing file and run this script again.", ,msgboxtext
Exit Sub
End If
If InStr(CATIA.ActiveDocument.Name, ".CATDrawing") < 1 Then
MsgBox "Active CATIA Document is not a Drawing. Open a Drawing file and run this script again.", ,msgboxtext
Exit Sub
End If
' ******************************* variables *******************************************
Set objNetwork = CreateObject("Wscript.Network")
Set DrwDoc = CATIA.ActiveDocument
Set DrwSheets = DrwDoc.Sheets
Set Sheet = DrwSheets.ActiveSheet
Set DrwViews = Sheet.Views
Set View = DrwViews.ActiveView

' ******************************* Lock View *******************************************
if(View.LockStatus) then
View.LockStatus = false
lock=1
else
View.LockStatus = True
lock=0
end if

exit sub
End Sub

JADOR
timide
timide

Messages : 2
Date d'inscription : 31/05/2013
Localisation : Tarbes

Revenir en haut Aller en bas

EnCours Re: Macro afin de verrouiller/déverrouiller une vue selectionnée

Message par mike688 le Mer 5 Juin 2013 - 1:55

perso le catscript j'aime pas trop.
je prefere le catvba.

pour t'aider dans ton boulot tu peux peut etre utilisé des selection voir selection multiple.



moi je cherche a identifier les entité comme les points projeté, les rugosité, les tolérance geometrique etc...

si quelqu'un sais m'aider... Merci
avatar
mike688
actif
actif

Messages : 255
Date d'inscription : 23/12/2009
Age : 35
Localisation : Portieux (88)

Revenir en haut Aller en bas

EnCours Re: Macro afin de verrouiller/déverrouiller une vue selectionnée

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum