English

How To: Use IApplication::CurrentTool

Summary

This article shows how to use IApplication::CurrentTool to make a UIToolControl the active tool in ArcMap.

Procedure

  1. Start ArcMap.
  2. Open the Visual Basic Editor.

    In ArcMap, select Tools > Macros > Visual Basic Editor.

  3. In the Project Explorer window, expand Project.mxt and select ArcMap Objects > ThisDocument. Right-click and select View Code.
    [O-Image] Visual Basic Project  Explorer
    Note:
    Code in ThisDocument module will only run in the current map document. To store the code in all your map documents, open the Normal.mxt ThisDocument code module.

  4. Copy the following into the code module.

    Code:
    Sub SetCurrentTool()
    Dim pCommandItem As ICommandItem
    Dim pApp As IApplication
    Set pApp = Application
    Set pCommandItem = Project.ThisDocument.CommandBars.Find("Project.UIToolControl1")
    Set pApp.CurrentTool = pCommandItem
    End Sub

  5. Close the Visual Basic Editor.
  6. Run the code.

    A. Click Tools > Macros > Macros to display the Macros dialog box.
    B. Select a macro and click Run.