Results 1 to 2 of 2
  1. #1
    4 Star Lounger
    Join Date
    May 2004
    Location
    Toronto, Ontario, Canada
    Posts
    425
    Thanks
    5
    Thanked 0 Times in 0 Posts

    righ click menu (2000)

    AS you can see this is a right click menu, what I would like to do is preform a save after every time a I call a Procedure
    I tried adding code to have it save, and it did, but it didn't finish off by calling the second procedure, what I would like to do is call the first procedure, then call a second procedure to force the application to save the file so that it updates the shared file. OR should I put the application save in actual call to the procedure that I am calling?

    Private Sub right()
    Dim cControl As CommandBarControl
    With Application.CommandBars("Cell")
    For Each cControl In .Controls
    cControl.Delete
    Next
    Set cControl = .Controls.Add(msoControlButton, , , , True)
    cControl.Caption = "Check CMYK or single K"
    cControl.OnAction = "checkCMYK"
    cControl.BeginGroup = True
    Set cControl = .Controls.Add(msoControlButton, , , , True)
    cControl.Caption = "Single CMY only"
    cControl.OnAction = "CheckSC"
    ' Set cControl = .Controls.Add(msoControlButton, , , , True)
    ' cControl.Caption = "CHECK EDITION EVENTS"
    ' cControl.OnAction = "CASESS"
    End With

    End Sub

    Thanks,
    Darryl.

  2. #2
    Platinum Lounger
    Join Date
    Nov 2001
    Location
    Vienna, Wien, Austria
    Posts
    5,009
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: righ click menu (2000)

    >OR should I put the application save in actual call to the procedure that I am calling?

    Unless there will be an instance where you would not want to Save, this would be your siimplest option.

    HTH
    Gre

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •