Chain of macros base on MsgBox yes/no

Atrey
over 4 years ago

Hello there,

I have a new challange

I have a cdr file (vectors) at the beginning, this file have to go through several of adjustments, this adjustments are separated in simple macros and I "Call" them with one by one with another macro (marked as COMBO). Whole proces is separated to 2 or 3 steps:

Run COMBO 1a
select specific vectors
Run COMBO 2a
Another selections of vectors
Run COMBO 3a

There are 4 possible option (combination) which COMBOS use (a,b,c,d).

a. Vector is "Simple" and have "Logo" (Contains steps 1a, 2a)
b. Vector is "Simple" and dont have "logo" (Contains steps 1b, 2b)
c. Vector is not "Simple" and have "Logo" (Contains steps 1c, 2c, 3c)
d. Vector is not "Simple" and dont have "logo" (Contains steps 1d, 2d, 3d)

My Question is, Is there a way how to start whole proces with Msgbox's? Idea is like:

Run "MasterCOMBO"
1. MsgBox: is there logo in vectors? (yes/no)
- "option yes" MsgBox_2.A
- "option no" MsgBox_2.B

2.A MsgBox: is vector simple? (yes/no)
- "option yes" Run COMBO 1a
- "option no" Run COMBO 1c

2.B MsgBox: is vector simple? (yes/no)
- "option yes" Run COMBO 1b
- "option no" Run COMBO 1d

3.A
After COMBO 1 (c, d) is coplete, operator have to select manualy specific vectors. After selection should start COMBO 2 (c, d), when it's done operator have to make another select. After second selection should start COMBO 3 (c, d)

3.B
After COMBO 1 (a, b) is coplete, operator have to select manualy specific vectors. After selection should start COMBO 2 (a, b)

I suppose that steps 1 and 2 of "MasterCOMBO" are posible, but Im not sure if also step 3. is posible too.

FYI I use this names for COMBOs:
COMBO 1a - NTBK_Slogo_1st
COMBO 2a - NTBK_Slogo_2nd

COMBO 1b - NTBK_NOlogo_1st
COMBO 2b - NTBK_NOlogo_2nd

COMBO 1c - NTBK_Slogo_Slozity_1st
COMBO 2c - NTBK_Slogo_Slozity_2nd
COMBO 3c - NTBK_Slogo_Slozity_3nd

COMBO 1d - NTBK_NOlogo_Slozity_1st
COMBO 2d - NTBK_NOlogo_Slozity_2nd
COMBO 3d - NTBK_NOlogo_Slozity_3nd

Any help or advise where I could find sample of this problem I could learn from, would be much appreciated.

  • 0 over 4 years ago

    Sooo,

    I've complete first part of code that's start whole proces, will go trough MsgBox Yes/No options and by inputs run (call) COMBO (a,b,c, or d).

    Sub MsgBox_Test()
       Dim result, result1, result2 As VbMsgBoxResult
       result = MsgBox("is there logo in vectors?", vbYesNoCancel, "Logo Yes/No?.")
       If result = vbYes Then
          result1 = MsgBox("We have logo! Is vector simple?", vbYesNoCancel, "Simple Ano/ne?")
          If result1 = vbYes Then
             Call NTBK_Slogo_1st
       ElseIf result1 = vbNo Then
             Call NTBK_Slogo_Slozity_1st
          End If
       ElseIf result = vbNo Then
          result2 = MsgBox("We don't have logo! Is vector simple?", vbYesNoCancel, "Simple Ano/ne?")
          If result2 = vbYes Then
             Call NTBK_NOlogo_1st
          ElseIf result2 = vbNo Then
             Call NTBK_NOlogo_Slozity_1st
          End If
    End If
    End Sub

    Now... Is possible after first Call command end, select wanted objects with mouse, and right after selection will automatically starts 2nd (3rd) Call command?

© Corel Corporation. All rights reserved. The content herein is in the form of a personal web log ("Blog") or forum posting. As such, the views expressed in this site are those of the participants and do not necessarily reflect the views of Corel Corporation, or its affiliates and their respective officers, directors, employees and agents. Terms of Use / Privacy​ ​/ ​Cookies / Terms and Conditions / User Guidelines.