Chromeでは、Webページ上のテキストを強調表示し、右クリックコンテキストメニューを使用して、選択したテキストのGoogle検索を新しいタブで開くことができます。
右クリックメニューの代わりにキーボードショートカットを使用してこの機能にアクセスできれば、非常に便利です。既存の拡張機能を検索してみましたが、既存のキーボードショートカットのリストもこちらで確認しました：https : //support.google.com/chrome/answer/157179?hl=ja
誰もこれを達成する方法を知っていますか？
回答:
これは、Chromeで動作します：
自動化したいですか？AutoHotKeyを使用して、CTRL+ Alt+をS 使用して自動マクロにします。次のスクリプトを使用します。
^!s::
Send ^c
Send ^t
Send ^v
Send {Enter}
Return
参考までに、私はこのスクリプトをテストし、Chromeで動作します。
AHKでもこれについて2つの答えがあります。
これはどこでもグローバルに適用できます（クロムだけでなく）。テキストを選択してWindows+ を押すだけですG
#g:: ;;Google selected text
Send, ^c
Run, http://www.google.com/search?q=%Clipboard%
Return
1つはここの私の答えからです。テキストを選択してWindows+ Shift+ を押しGます。これは、クリップボード上のリンクを提供するだけであるという点で異なります。
; Search google for the highlighted word
; then get the first link address and put it on the Clipboard
^!r:: Reload
#+g::
bak = %clipboard%
Send, ^c
;clipboard = %bak%`r`n%clipboard%
Query = %clipboard%
wb := ComObjCreate("InternetExplorer.Application")
;wb := IEGet()
wb.Visible := false
wb.Navigate("www.google.com/search?q=" Query)
While wb.readyState != 4 || wb.document.readyState != "complete" || wb.busy ; wait for the page to load
sleep 100
; loop % (Nodes := wb.document.getElementById("rso").childNodes).length
; Links_urls .= (A_index = 1) ? Nodes[A_index-1].getElementsByTagName("a")[0].href : "`n" . Nodes[A_index-1].getElementsByTagName("a")[0].href
; Msgbox %Links_urls%
Nodes := wb.document.getElementById("rso").childNodes
First_link := Nodes[0].getElementsByTagName("a")[0].href
Clipboard = %First_link%
TrayTip, First Link on Google Search, %First_link% `r`n Ctrl+V to paste the link
return
Send, ^cコマンドの後にこれをスクリプトに追加して、クリップボードの内容を確認してくださいTrayTip, Clipboard Contents, %clipboard% rn
：この拡張機能は、あなたを助けることができる
https://chrome.google.com/webstore/detail/searchbar/fjefgkhmchopegjeicnblodnidbammed
：これらのオプションのマークをinstalingた後、
Ctrlキーを押したり、中型; *オープンの検索結果を新しいタブで、デフォルトでは（ホットキーには影響を与えません。クリックして新しいタブを切り替えます）
*デフォルトでフォアグラウンドで新しいタブを開く（Shiftを押してフォアグラウンドとバックグラウンドを切り替えます）
選択したテキストの検索をCtrl + Shift + Alt + Gショートカットで実行できるようになりました
Parivar Saraffがここで提案したことに基づいて、ここに3 in 1 AutoHotKeyスクリプトがあります。
;Hotkey Modifier Symbols (for how to customize the hotkeys) https://www.autohotkey.com/docs/Hotkeys.htm#Symbols
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
; Google-search selected text
; Usage:ctrl+shift+G
^+g::
{
Send, ^c
Sleep 150
Run, http://www.google.com/search?q=%Clipboard% ;(изм.себе на google.com.ua)
Return
}
; Google-dictionary selected text
; Usage:ctrl+shift+D
^+d::
{
Send, ^c
Sleep 150
Run, https://www.google.com/search?q=define:%Clipboard% ;(изм.себе на google.com.ua)
Return
}
; Wikipedia-search selected text by using google "site:" operator
; Usage:ctrl+shift+W
^+w::
{
Send, ^c
Sleep 150
Run, https://www.google.com/search?q=site:wikipedia.org %Clipboard% ;(изм.себе на google.com.ua)
Return
}
また、ハイライトされたテキスト変換スクリプト（Web上のそのようなスクリプトバリエーションの組み合わせ）：
;Hotkey Modifier Symbols (for how to customize the hotkeys) https://www.autohotkey.com/docs/Hotkeys.htm#Symbols
;Hotkey Modifier Symbols (for how to customize the hotkeys) https://www.autohotkey.com/docs/Hotkeys.htm#Symbols
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
cycleNumber := 1
#IfWinNotActive ahk_class XLMAIN
;Highlighting any text, and then pressing that HotKey will cycle through the 4 most common text casings, converting the highlighted text right in-line.
;For example:
;If you highlight "This is a test sentence", and then hit that HotKey once, it'll make it all UPPERCASE ("THIS IS A TEST SENTENCE").
;Hit the HotKey again, it'll convert it to lowercase ("this is a test sentence").
;Hit it again and it'll convert it to Sentence case ("This is a test sentence"). (First letter is capitalized, rest is lower-case).
;Finally, hit it one more time and it'll convert it to Mixed case, or what I often call, "camel-case" ("This Is A Test Sentence"). (Each word is capitalized).
; Usage:Ctrl+Shift+C
^+c::
If (cycleNumber==1)
{
ConvertUpper()
cycleNumber:= 2
}
Else If (cycleNumber==2)
{
ConvertLower()
cycleNumber:= 3
}
Else If (cycleNumber==3)
{
ConvertSentence()
cycleNumber:= 4
}
Else
{
ConvertMixed()
cycleNumber:= 1
}
Return
ConvertUpper()
{
clipSave := Clipboard
Clipboard = ; Empty the clipboard so that ClipWait has something to detect
SendInput, ^c ; Copies selected text
ClipWait
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for SendInput sending Windows linebreaks
StringUpper, Clipboard, Clipboard
Len:= Strlen(Clipboard) ;Set number of characters ;Set number of characters
SendInput, ^v ; Pastes new text
Send +{left %Len%} ;Re-select text
VarSetCapacity(clipSave, 0) ; Free memory
Clipboard := clipSave ;Restore previous clipboard
}
ConvertLower()
{
clipSave := Clipboard
Clipboard = ; Empty the clipboard so that ClipWait has something to detect
SendInput, ^c ; Copies selected text
ClipWait
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for SendInput sending Windows linebreaks
StringLower, Clipboard, Clipboard
Len:= Strlen(Clipboard) ;Set number of characters
SendInput, ^v ; Pastes new text
Send +{left %Len%} ;Re-select text
VarSetCapacity(clipSave, 0) ; Free memory
Clipboard := clipSave ;Restore previous clipboard
}
ConvertSentence()
{
clipSave := Clipboard
Clipboard = ; Empty the clipboard so that ClipWait has something to detect
SendInput, ^c ; Copies selected text
ClipWait
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for SendInput sending Windows linebreaks
StringLower, Clipboard, Clipboard
Clipboard := RegExReplace(Clipboard, "(((^|([.!?]+\s+))[a-z])| i | i')", "$u1")
Len:= Strlen(Clipboard) ;Set number of characters
SendInput, ^v ; Pastes new text
Send +{left %Len%} ;Re-select text
VarSetCapacity(clipSave, 0) ; Free memory
Clipboard := clipSave ;Restore previous clipboard
}
ConvertMixed()
{
clipSave := Clipboard
Clipboard = ; Empty the clipboard so that ClipWait has something to detect
SendInput, ^c ; Copies selected text
ClipWait
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for SendInput sending Windows linebreaks
StringUpper Clipboard, Clipboard, T
Len:= Strlen(Clipboard) ;Set number of characters
SendInput, ^v ; Pastes new text
Send +{left %Len%} ;Re-select text
VarSetCapacity(clipSave, 0) ; Free memory
Clipboard := clipSave ;Restore previous clipboard
}
#IfWinNotActive
; Convert selected text to inverted case
; Ex: THIS_is-a_tESt -> this_IS-A_TesT
; Usage:ctrl+Shift+I
^+i::
Convert_Inv()
RETURN
Convert_Inv()
{
; save original contents of clipboard
Clip_Save:= ClipboardAll
; empty clipboard
Clipboard:= ""
; copy highlighted text to clipboard
Send ^c{delete}
; clear variable that will hold output string
Inv_Char_Out:= ""
; loop for each character in the clipboard
Loop % Strlen(Clipboard)
{
; isolate the character
Inv_Char:= Substr(Clipboard, A_Index, 1)
; if upper case
if Inv_Char is upper
{
; convert to lower case
Inv_Char_Out:= Inv_Char_Out Chr(Asc(Inv_Char) + 32)
}
; if lower case
else if Inv_Char is lower
{
; convert to upper case
Inv_Char_Out:= Inv_Char_Out Chr(Asc(Inv_Char) - 32)
}
else
{
; copy character to output var unchanged
Inv_Char_Out:= Inv_Char_Out Inv_Char
}
}
; send desired text
Send %Inv_Char_Out%
Len:= Strlen(Inv_Char_Out)
; highlight desired text
Send +{left %Len%}
; restore original clipboard
Clipboard:= Clip_Save
}
; Text–only paste from ClipBoard (while the clipboard formatted text itself is being untouched)
; Usage:ctrl+Shift+I
^+v::
Clip0 = %ClipBoardAll%
Clipboard = %Clipboard% ; Convert clipboard text to plain text.
StringReplace, clipboard, clipboard,%A_SPACE%",", All ; Remove space introduced by WORD
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for Send sending Windows linebreaks
Send ^v ; For best compatibility: SendPlay
Sleep 50 ; Don't change clipboard while it is pasted! (Sleep > 0)
ClipBoard = %Clip0% ; Restore original ClipBoard
VarSetCapacity(Clip0, 0) ; Free memory
Return
; Wrap selected text in double quotes->" "
; Usage:Ctrl+Shift+Q
^+q::
clipSave := Clipboard
Clipboard = ; Empty the clipboard so that ClipWait has something to detect
SendInput, ^c ; Copies selected text
ClipWait
StringReplace, Clipboard, Clipboard, `r`n, `n, All ; Fix for SendInput sending Windows linebreaks
Clipboard := Chr(34) . Clipboard . Chr(34)
Len:= Strlen(Clipboard) ;Set number of characters
SendInput, ^v ; Pastes new text
Send +{left %Len%} ;Re-select text
VarSetCapacity(clipSave, 0) ; Free memory
Clipboard := clipSave ;Restore previous clipboard
Return
; RELOAD
!+^x::
SplashTextOn,,,Updated script,
Sleep,200
SplashTextOff
Reload
Send, ^s
Return
どうやら、S強調表示されたテキストのコンテキストメニューをアクティブにした後に押すと、まさにそれができます（Chrome 78はここ）。コンテキストメニューはShift+F10、キーワードの専用の「コンテキストメニュー」ボタンを使用して、またはそれを使用して開くことができます。
AutoHotKeyを使用して、これら2つのショートカットを1つにまとめることができます。
^g::
Send +{F10}
Send s
Return
これにより、たとえば、Ctrl+G新しいタブで強調表示されたテキストが検索されます。
@Keltariの回答に対するこのメソッドの主な利点は、クリップボードを使用しないため、そこで以前の値を上書きしないことです。
この拡張機能を使用する
https://chrome.google.com/webstore/detail/hotkeys-for-search/gfmeadbjkfhkeklgaomifcaihbhpeido
どうやって使うのですか：
デフォルトのショートカット：
Alt + Q = Google
Alt + W =ウィキペディア
Alt + A = Google画像
Alt + S = YouTube
また、多くのタスクを自動化する場合は、このChrome用のカスタムホットキー拡張機能
https://chrome.google.com/webstore/detail/keyboard-fu/cafiohcgicchdfciefpbjjgigbmajndb