[分享文]用EXCEL VBA網路爬蟲擷取YAHOO股市資料
因應疫情，剛好可以好好學習網路爬蟲，
最簡單的還是用EXCEL裡的VBA來抓資料，
這個範例適用IE物件來抓取，
程式可以用本來改一改就好，細節不要出錯，
很快資料就全部下來了，如下。
用EXCEL錄製巨集爬取YAHOO股市資料，
會有亂碼的問題，用PYTHON來爬取，
對一般人來說門檻又太高，
如果如何在EXCEL VBA就可以輕鬆爬取網路資料，
就是本文所要分享的重點。
當然本文不是要推崇VBA有多棒，Python不好用，
我的想法是只要用對工具，工作可以很愜意，
可以協同應用工具，讓彼此都能發揮最大的強項，
是本文寫說明的，
另外順便分享在EXCEL除了用匯入資料從WEB功能外，
也可以用IE物件，
功能很像是Python的requests加上beautifulsoup4差不多功能，
不同的是，可以將下載的資料直接放在EXCEL，
也就是把EXCEL當成資料庫用，這樣可以減少很多資料庫匯入匯出的麻煩。
完整教學與影片連結：
https://terry55wu.blogspot.com/2021/05/excel-vbayahoo.html
吳老師 2021/5/22
excel匯入資料 在 [算表] 大量txt匯入excel(已解決)，新增一合併字串問題- 看板Office 的必吃
首先，先感謝s大、l大、p大 三位教我的方法
我每一項都試過，也都有遇到一些不同的問題
所以也稍微說一下過程中遇到的，也許對相同情況的人有幫助
首先我試了l大說的ultraedit要檢查，
但從程式中看中間的間隔都是沒有問題的，
匯入的時候還是會有跑掉的情況
（後來才發現是預覽的時候跑掉，其實匯入後是正常的）
然後，用p大說的方適合併檔案，
確實可以合併，但出現的還是會連在一起，得手動換列
最後試了s大說的AeroMerge，可以很順利的合併，且自動換列
不過就在匯入的時候，excel說資料太大量無法全部匯入，
然後匯入的就只會有第一行而已，可是我其實只有用20筆左右測試，
後來再爬文，有人說資料量太大可以先匯入access再匯入excel，
這樣就解決了，但是還是不知道為什麼AeroMerge合併後的會太大不能直接匯入，
在前面的時候我本來想快放棄要一個一個換列的，還好有成功，雖然步驟有點多
---
另外想再請教一個問題，因為合併完的檔案，我需要再加上一欄是合併字串
例如：原本只有ABCD，增加E
A欄 B欄 C欄 D欄 E欄
一列 01 02 03 04 01020304
二列 02 05 06 02 02050602
在打E欄的時候公式會是「=A1&B1&C1&D1」
可是因為我的excel要用SPSS跑統計，結果我用SPSS打開的時候
E欄不會顯示字串，只會顯示1或2而已，
後來發現好像是因為儲存格的內容是帶入公式跑出來的緣故，
我拿了一部分的資料，E欄重新用打的，就沒有這種問題
不知道有沒有什麼方法可以解決這問題，
因為還有很多，很難用手打（那就失去原本合併的意義拉XD）
而且如果把ABCD刪掉只想留下E欄也不行，公式無法帶入就沒有字串了
希望有人能幫忙解惑，謝謝！！
※ 引述《suyimieh (Mieh)》之銘言：
: 軟體: excel
: 版本:2013
: 不好意思！
: 因為最近要弄一些資料，大約有一千多筆
: 每一個txt都只有一筆
: 但不知道怎麼樣比較快的合併到excel
: txt的格式是以逗點作分隔
: 例如
: ID,代號,代號,代號,性別,答案（有45欄，填答1或0）,日期
: 010101,01,01,01,M,1,20140728
: 020202,02,02,02,F,0,20140723
: 我看了很久VBA.......
: 因為不懂程式，連照做都不知道怎麼做
: （很天真的複製查到的程式，可是完全不會動@@）
: 後來看到之前有人教學用CMD將txt檔案放到同個資料夾然後合併成一個dat檔
: 就是打copy *txt a.dat那個，會出現一個dat檔沒錯，
: 可是再用excel開啟，也只會出現第一個txt檔案的內容而已
: 後來找到另一個合併的方式
: 打copy /b *.txt goal.txt
: 的確會出現一個txt檔，不過所有列都會連在一起
: 我試著將每個檔案按enter分隔成不同的列
: 結果再到excel匯入的時候，選擇「逗點」分隔
: 可是卻出現誤差，有幾個檔案把不同的欄位亂分隔了
: 如果用手動分隔，要把逗號也隔開......
: 這樣欄位就太多工程有點大（分到眼睛快脫窗結果還失敗..）
: 可是我在txt看的時候每一列明明都對齊好了
: 想問問是我那邊做錯了嗎
: 因為看懂得能試的都試過
: 我知道VBA好像很快
: 可是對我真的有點難度
: 不知道上述我試的方法有沒有哪裡需要修正
: 或是有其他的方式可以讓我試試看呢
: 謝謝大家，打擾了不好意思！
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 118.167.241.3
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1406643638.A.307.html
※ 編輯: suyimieh (118.167.241.3), 07/29/2014 22:21:23
※ 編輯: suyimieh (118.167.241.3), 07/29/2014 22:22:46
... <看更多>