4 Replies Latest reply on Oct 26, 2015 12:51 PM by LJSM

    ProcessBook   Send Back values with VBA  doesn't work

    LJSM

      I am trying to send back some values in a display. I run the procedure step by step and It works, but when I execute from a button or run with F5, it doesn't. Any clues?

       

      Public Sub SendBackRedBox()

      Dim sym As Symbol

       

      ThisDisplay.SelectedSymbols.RemoveAll

       

      For Each sym In ThisDisplay.Symbols

           If Left(sym.Name, 3) = "Tex" Then

               sym.Selected = True

           End If

      Next sym

       

      SendToBack

       

      End Sub

       

      Public Sub SendToBack()

           Dim oCmdbar As Object

           Set oCmdbar = Application.CommandBars("Default Menu Bar")

           oCmdbar.Controls("&Arrange").Controls("&Send To Back").Execute

      End Sub