' SwitchWinLineGoToMacros ' ---------------------------------------------------------------------------- ' KURZBESCHREIBUNG ' ' Returns: - ' ---------------------------------------------------------------------------- ' Copyright (c) 2021 by Digital Data GmbH ' ' Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim ' Tel.: 0641/202360 • E-Mail: info-flow(at)digitaldata.works ' ---------------------------------------------------------------------------- ' Creation Date / Author: 25.08.2020 / XX ' Version Date / Editor: 25.08.2020 / XX ' Version Number: 1.0.0.0 Sub SwitchWinLineGoToMacros If (DEBUG_ON = True) Or (DebugMode = "Enabled") Then 'Return to Macro Window MApplication 2 MApplication 0 MWindow 45, False MSetFieldFocus 45, 100 MSetFieldFocus 45, -1 MActivateWindow 45 MSetFieldValue 45, 121, CWLMacro.MName End If End Sub