mhebert5267

#\::
Send {Alt}
Send JT
Send G
Send {Tab 2}
Send {Right}
Send ^{Tab}
Send {Tab 2}
Send {Tab}
send {Tab down}{Space down}{Tab up}

mhebert5267

#shift::
Send {Alt}
Send H
Send S
Send U

mhebert5267

#enter::
Send ^1
Send {Tab down}{Down}{Tab up}
Send {Down 2}
Send {Tab 2}
Send 2
Send {Tab}
Send {Up 5}
Send {Tab}
Send {Enter}

mhebert5267

#NoEnv
#NoTrayIcon
#SingleInstance force
DetectHiddenWindows, Off   ;for IfWinExist

VarSetCapacity( APPBARDATA, 36, 0 )
;------------------------------------------------------------
; Fetch current hidden/showing status

IfWinNotExist, ahk_class Shell_TrayWnd

mhebert5267

Send GR001MH
Sleep 200
Send {NumpadAdd}
Sleep 1000
Send DDF506
Sleep 2000
Send {Enter}
Sleep 2000
Send {Enter}
Sleep 1000

mhebert5267

esc::exitapp

mhebert5267

#z::Pause 

mhebert5267

If FileExist(iniFile:=A_ScriptDir "\" SubStr(A_ScriptName,1,-4) ".ini")
  FileRead,Delay,%iniFile%
else Delay:=800
SetBatchLines,-1
SetWinDelay,-1
CoordMode,Mouse,Screen  
DetectHiddenWindows,On
WinGetPos,x,y,w,h,ahk_class Shell_TrayWnd
DetectHiddenWindows,Off
pos:=x>0?3:y>0?4:w>h?2:1 ; left, top, right, bottom = 1, 2, 3, 4

mhebert5267

;EXCEL - PIVOGT TABLE FORMAT 
#shift::
Send {Alt}
Send H
Send S
Send U

;EXCEL SORT
#\::
Send {Alt}

mhebert5267

#4::
InputBox, password, Rentalman Password
InputBox, date, Date to Use, (MMDDYY format only)
Send {Tab}
Sleep 500
Loop, read, C:\Users\Michael\Google Drive\AutoHotKey\Branches by Company\ce.txt
{
    Loop, parse, A_LoopReadLine, %A_Tab%
    {
  Send {Tab}