Quantcast
Channel: Microsoft Dynamics GP Forum - Recent Threads
Viewing all articles
Browse latest Browse all 45450

RE: Simple Macro Question

$
0
0

Hi Mark,

Try the macro below after you have opened the 'Note' window.

ActivateWindow dictionary 'default'  form 'Form_Note_1' window 'Form_Note_1'

NewActiveWin dictionary 'default'  form sheLL window sheLL

 CommandExec dictionary 'default'  form 'Command_System' command UserDate

NewActiveWin dictionary 'default'  form 'Switch Date' window 'SY_Set_User_Date'

 ContextMenu dictionary 'default'  field '(L) Acc_Sys_Date' form 'Switch Date' window 'SY_Set_User_Date'

 CommandExec form BuiLtin command cmdEditSelectAll

 ContextMenu dictionary 'default'  field '(L) Acc_Sys_Date' form 'Switch Date' window 'SY_Set_User_Date'

 CommandExec form BuiLtin command cmdEditCopy

CloseWindow dictionary 'default'  form 'Switch Date' window 'SY_Set_User_Date'

NewActiveWin dictionary 'default'  form sheLL window sheLL

ActivateWindow dictionary 'default'  form 'Form_Note_1' window 'Form_Note_1'

 ContextMenu dictionary 'default'  field 'Text Field' form 'Form_Note_1' window 'Form_Note_1'

 CommandExec form BuiLtin command cmdEditPaste

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TypeTo field 'Text Field' , '/'

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000900000000000400' # cntrl chr

 TypeTo field 'Text Field' , '/'

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TNT_Event , '090070007A00000000000A00000000000400' # cntrl chr

 TypeTo field 'Text Field' , ':  '

You could also open the note window from the macro, but you'd need a different macro for each window that you opened the note window from.

Kind regards,

Leslie


Viewing all articles
Browse latest Browse all 45450

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>