msgbox,Excelプログラム By SKojima@kuhen.org Ver.2020-12-01
msgbox,【F1】を押す「カラム」にデータがあれば表示
F1::
Gosub, Test1
Exit
Test1:
Clipboard=
send,{Down}
sleep,100
send,^c
ClipWait
Svar=%Clipboard%
sleep,100
;-------------------------------------------------------------------
; データの最後にある \r \n を正規表現で削除して空白かどうか判断する
;-------------------------------------------------------------------
Svar := RegExReplace(Svar,"`r`n", "")
If (Svar = "" )
{
send,{ESC}
sleep,100
}
else
{
MsgBox, データは %Svar% です
send,{ESC}
sleep,100
}
Return