Hello, does anyone know any rule to replace the annotation direction bending, as attached image, I thank all who help.
Solved! Go to Solution.
'loop tru all bend notes
For Each oBendnote In ThisDoc.Document.ActiveSheet.DrawingNotes.bendnote
'clear previus text overrides
'check direction and set note
If oBendnote.text.Contains("DOWN") Then
otext= Replace (oBendnote.text,"DOWN","BAIXO")
ElseIf oBendnote.text.Contains("UP") Then
otext= Replace (oBendnote.text,"UP","CIMA")
don't forget to set a event trigger to run this rule for updating your notes, because now it's a text override.
Log into access your profile, ask and answer questions, share ideas and more. Haven't signed up yet? Register