I tried this following script. But it doesn't work.
Code: Select all
Appskey & f::
Send, {f2}
Send ^a
Send ^c
Send ^f
Send ^v
return
How can i fix the issue?
Thanks for any help in advance.
Code: Select all
Appskey & f::
Send, {f2}
Send ^a
Send ^c
Send ^f
Send ^v
return
Code: Select all
AppsKey::AppsKey
AppsKey & f::
Clipboard =
Send {F2}^a^c
ClipWait, 0
If ErrorLevel {
MsgBox, 48, Error, An error occurred while waiting for the clipboard. Aborting.
Return
} Else If !WinExist("ahk_class XLMAIN")
Return
WinActivate
Send ^f
WinWaitActive, Find and Replace,, 3
Send % ErrorLevel ? "" : "^v"
Return
Code: Select all
#\:: ; or the hotkey of your choice
xl := ComObjActive("excel.application")
xl.Cells.Find(xl.activecell.text, xl.activecell).select
return
Thank you for your help.
Users browsing this forum: alawsareps, Chunjee, Joey5, mebelantikjaya, mikeyww and 314 guests