王志軍

借助Powery Query獲取滬深A(yù)股的最新行情

王志軍

很多時候，我們需要即時獲取特定頁面的網(wǎng)頁信息，如果使用的 Excel版本是 2016，那么我們可以借助 Powery Query實(shí)現(xiàn)類似的需求，如圖1所示，這里以獲取證券之星行 情 中 心（http://quote.stockstar.com/stock/ranklist_a_3_1_1。html）滬深A(yù)股的95個頁面信息為例進(jìn)行說明：

第1步：讀取Web信息

打開Excel 2016，切換到“數(shù)據(jù)”選項卡，在“獲取和轉(zhuǎn)換”功能組依次選擇“新建查詢→從其他源→從 Web”，隨后會打開“從Web”對話框，在這里粘貼相應(yīng)頁面的URL地址；單擊“確定”按鈕建立連接，很快就可以看到“導(dǎo)航器”界面，在這里選擇“滬深A(yù)股”，很快就可以看到圖2所示的豐富信息。

第2步：修改M語句

點(diǎn)擊“編輯”按鈕；隨后會自動打開查詢編輯器，點(diǎn)擊“查詢”功能組的“高級編輯器”按鈕，如圖3所示，這是原來的M語句，我們需要在這里自定義一個可以獲取網(wǎng)頁的函數(shù)，也就是最前面添加一行“（page as number）as table=〉”的內(nèi)容，同時在“源”這一行最后一個“1”替換為“"&Number.ToText（page）&"”的內(nèi)容，請參考圖4所示進(jìn)行修改，最后點(diǎn)擊右下角的“已完成”按鈕。

為便于操作，建議在右側(cè)的“查詢設(shè)置”窗格將名稱修改為“getdata”，當(dāng)然也可以使用其他的名稱。檢查無誤之后，返回“開始”選項卡，單擊“關(guān)閉并上載”按鈕。

第3步：新建空白查詢

返回Excel主界面，接下來需要打一個空的查詢表，仍然切換到“數(shù)據(jù)”選項卡，在“獲取和轉(zhuǎn)換”功能組依次選擇“從其他源→空白查詢”命令，此時會打開“高級編輯器”對話框，刪除原有的內(nèi)容，手工輸入“｛195｝”，單擊“已完成”按鈕，可以看到圖5所示的列表界面。

第4步：添加自定義列

接下來需要將其轉(zhuǎn)換為table，點(diǎn)擊左上角的“列表”按鈕，可以看到圖所示的界面，點(diǎn)擊“轉(zhuǎn)換”功能組的“到表”按鈕，關(guān)閉隨后彈出的對話框；切換到“添加列”選項卡，打開“添加自定義列”對話框，新列名修改與否可自行決定，在這里自定義列公式“=getdata（［Column1］）”，可參考圖6所示進(jìn)行操作，檢查無誤之后點(diǎn)擊“確定”按鈕，轉(zhuǎn)換為表的操作需要一些時間，請耐心等待。

完成上述操作之后，點(diǎn)擊“Custom”按鈕右側(cè)的雙箭頭按鈕，在彈出的對話框勾選所有復(fù)選框，選擇“擴(kuò)展”，確認(rèn)之后關(guān)閉對話框；任意選擇某個股票，可以看到類似于圖7所示的信息。返回“開始”選項卡，點(diǎn)擊“關(guān)閉并上載”按鈕，可以返回Excel主界面，以后可以在右側(cè)窗格隨時點(diǎn)擊“查詢1”進(jìn)行查詢，需要指出的是，每次后臺查詢都需要下載數(shù)據(jù)，因此需要一些時間進(jìn)行刷新，效果如圖8所示。

如果查詢其他網(wǎng)頁的信息，可以參考上述步驟進(jìn)行操作，感興趣的朋友不妨一試。

With the Aid of Powery Query to Obtain the Latest Quotation of Shanghai&Shenzhen Shares A

Wang Zhijun