Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Macro Object / ShowMacroDialog Method
Example
In This Topic
    ShowMacroDialog Method (Macro)
    In This Topic
    Displays the Run Macro dialog box.
    Syntax
    expression.ShowMacroDialog() 
    where expression is a variable that represents a Macro Object
    Example

    This example opens the Macros dialog box when a specific screen is identified.


    To run this example, copy this code to ThisIbmScreen code window.

    Private Sub IbmScreen_NewScreenReady(ByVal sender As Variant)
       
      Dim ScreenID1 As String
      Dim Rtn As ReturnCode
      
      'Get the string at this screen position that uniquely identifies the screen
      'For this example, the text at row 1 and column 7 is 'ATM5'
      ScreenID1 = ThisIbmScreen.GetText(1, 7, 4)
      
     
      'If the screen ID is 'ATM5', open the Macros dialog box
      If ScreenID1 = "ATM5" Then
     
        ThisIbmTerminal.Macro.ShowMacroDialog
        
      End If
     
    End Sub
    See Also