亚洲国产精品无码久久大片,亚洲AV无码乱码麻豆精品国产,亚洲品质自拍网站,少妇伦子伦精品无码STYLES,国产精久久久久久久

網(wǎng)站內容搜索(【職場(chǎng)實(shí)例】一個(gè)非常有趣且辦公技巧性極強的問(wèn)題 )

優(yōu)采云 發(fā)布時(shí)間: 2022-01-03 01:02

  網(wǎng)站內容搜索(【職場(chǎng)實(shí)例】一個(gè)非常有趣且辦公技巧性極強的問(wèn)題

)

  前言|職場(chǎng)例子

  今天還收到微信公眾號后臺粉絲的私信咨詢(xún),問(wèn)了一個(gè)很有意思的高水平辦公問(wèn)題。

  如下圖:

  在表格的 B 列中,有一個(gè)通常被組織起來(lái)的小問(wèn)題。

  

  這位朋友想要達到這樣的效果:

  點(diǎn)擊問(wèn)題所在的任意單元格,例如依次點(diǎn)擊B2、B3、B4單元格,會(huì )自動(dòng)依次跳轉到百度搜索框,搜索單元格記錄的內容。

  

  步驟|問(wèn)題解決

  首先我們右擊工作表名稱(chēng)標簽,點(diǎn)擊“查看代碼”命令(或按快捷鍵Alt+F11),進(jìn)入VBA代碼編輯窗口。復制并粘貼下面的 VBA 代碼部分。最后,關(guān)閉VBA代碼編輯和輸入窗口,返回Excel工作表。

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

If Target.Column 2 Then Exit Sub

Dim url As String

url = "http://www.baidu.com/s?wd=" + Target.Value

Shell "C:\Users\Administrator\AppData\Local\Google\Chrome\Application\chrome.exe " & url, vbNormalFocus

End Sub

  

  當我們回到 Excel 工作表時(shí),奇跡發(fā)生了。我們發(fā)現,當我們依次點(diǎn)擊B2、B3、B4單元格時(shí),會(huì )自動(dòng)跳轉到百度搜索框,搜索單元格中記錄的小問(wèn)題的內容。如下圖所示:

  

  要點(diǎn)|問(wèn)題總結

  操作注意事項:

 ?、冱c(diǎn)擊問(wèn)題所在的單元格實(shí)現自動(dòng)網(wǎng)頁(yè)搜索時(shí),必須一一點(diǎn)擊。不要連續選擇多個(gè)單元格,否則會(huì )退出并停止運行。

 ?、谙戮浯a的box-selected部分表示“小問(wèn)題”所在的列。在這個(gè)例子中,它在B列,也就是第2列,所以這里的參數是“2”??筛鶕唧w情況靈活更改。

  

 ?、巯旅娲a的box-selected部分代表我們指定的搜索網(wǎng)站。本例中使用“”,所以下面是百度網(wǎng)的官網(wǎng)??筛鶕唧w情況靈活更改。

  

 ?、芟旅娲a中框選部分代表我們電腦上指定瀏覽器的“目標”安裝路徑。本例中使用的是“谷歌”瀏覽器,以下是編輯器電腦上“谷歌”瀏覽器的“目標”路徑??筛鶕唧w情況靈活更改。

  

 ?、萑绾握业街付g覽器的“目標”路徑地址?

  我們可以在我們要使用的瀏覽器的桌面快捷方式圖標上右擊,點(diǎn)擊“屬性”,在“屬性”界面查看并復制“目標”路徑地址。

  

0 個(gè)評論

要回復文章請先登錄注冊


官方客服QQ群

微信人工客服

QQ人工客服


線(xiàn)

亚洲国产精品无码久久大片,亚洲AV无码乱码麻豆精品国产,亚洲品质自拍网站,少妇伦子伦精品无码STYLES,国产精久久久久久久