Here is what I came up with. It was a nice learning experience as this was my first "bigger" project. Thanks everyone for help.
#SingleInstance, force
Gui, -MaximizeBox
Gui, Show, w140 h200,
Gui, Add, Button, w120 h34,Valitse tiedosto
Gui, Add, Edit, w120 vValittuTiedosto
Gui, Add, Button, w120 h34, Käynnistä Firefox
Gui, Add, Button, w120 h34, Kopioi
Gui, Add, Button, w55 h34, Pienennä
Gui, Add, Button, w55 h34 x75 y153, Sulje
F7::
A2Val := wbk.Sheets("AHK".Cells(1,2).Value)
Click 355, 531
SendInput, % A2Val
A3Val := wbk.Sheets("AHK".Cells(2,2).Value)
Click 364, 683
SendInput, % A3Val
Send {WheelDown}
Sleep 50
Send {WheelDown}
Sleep 50
Send {WheelDown}
Sleep 50
Send {WheelDown}
Sleep 50
Send {WheelDown}
Sleep 50
A4Val := wbk.Sheets("AHK".Cells(3,2).Value)
Click 358, 268
SendInput, % A4Val
A5Val := wbk.Sheets("AHK".Cells(4,2).Value)
Click 363, 420
SendInput, % A5Val
A6Val := wbk.Sheets("AHK".Cells(5,2).Value)
Click 380, 573
SendInput, % A6Val
Click 389, 688
return
ButtonValitsetiedosto:
^(FileSelectFile, SelectedFile)
^(If SelectedFile)
^(GuiControl,, ValittuTiedosto, %SelectedFile%)
^(return)
ButtonKopioi:
WinSet, AlwaysOnTop, Off
^(wbk := ComObjGet(SelectedFile))
return
ButtonKäynnistäFirefox:
WinSet, AlwaysOnTop, On,
^(Run Firefox.exe) [^(https://l)](https://forms.office.com/Pages/ResponsePage.aspx?id=2nfWMmqQcUqxhQAJnA_GA5_AgN5Qt89CuyhpBNCjnDFUNkxaN0s0U0pTMURYRkM4OUJLRVhVOU44Wi4u)^(ink.to.destination.com)
return
ButtonPienennä:
^(WinMinimize)
return
ButtonSulje:
^(ExitApp)
return