close
前一篇簡易入門,一定讓大家摸不著頭緒。本篇就來實作一下。
首先先分析一下要用到那些資料,要用到那些活頁簿來存放資料。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303002.jpg)
接下來就是十項指標的定義(希望我沒搞錯)及資料來源位置定義。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303003.jpg)
實作開始
先將所需活頁簿新增完成(如下圖紅線框住處)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303004.jpg)
參數定義:包含股票代號、相關資料網頁的資訊
![](http://f7.wretch.yimg.com/bonddealer/206/1784303005.jpg)
程式改寫,利用前一篇錄製部份修改,並加一些迴圈及判斷;另多寫2支搬移資料的程式(也可以用錄製再修改)。
1. 抓取資訊的程式修改如下圖1。
2. 搬移資訊的程式如下圖2。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303006.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303007.jpg)
製作執按鈕
1.找出工具
![](http://f7.wretch.yimg.com/bonddealer/206/1784303008.jpg)
製作 按鈕(Button)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303009.jpg)
放於適當位置
![](http://f7.wretch.yimg.com/bonddealer/206/1784303010.jpg)
更改標題(Caption)及名稱(Name)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303011.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303012.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303013.jpg)
指定執行程式
![](http://f7.wretch.yimg.com/bonddealer/206/1784303014.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303015.jpg)
十大指標分數存放處,此部份只用到EXCEL的功能(包括函數)。即單一公司執行完抓取資訊後,此部份就會自動秀出資料。至於多筆的部份就是將分數複製一份到活頁簿LIST 中存放
![](http://f7.wretch.yimg.com/bonddealer/206/1784303016.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303017.jpg)
以上拉拉雜雜介紹了製作方法,你可以試試。寫了你才知問題點在那裡。
另附上我執行後的結果
1.97.2Q 我作的VS VS 總大的 (有一些差異)只show 差益部份。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303018.jpg)
2.97.3Q 我作的,有試過若網路順暢10 分鐘內可跑完這28+2家的資料
首先先分析一下要用到那些資料,要用到那些活頁簿來存放資料。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303002.jpg)
接下來就是十項指標的定義(希望我沒搞錯)及資料來源位置定義。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303003.jpg)
實作開始
先將所需活頁簿新增完成(如下圖紅線框住處)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303004.jpg)
參數定義:包含股票代號、相關資料網頁的資訊
![](http://f7.wretch.yimg.com/bonddealer/206/1784303005.jpg)
程式改寫,利用前一篇錄製部份修改,並加一些迴圈及判斷;另多寫2支搬移資料的程式(也可以用錄製再修改)。
1. 抓取資訊的程式修改如下圖1。
2. 搬移資訊的程式如下圖2。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303006.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303007.jpg)
製作執按鈕
1.找出工具
![](http://f7.wretch.yimg.com/bonddealer/206/1784303008.jpg)
製作 按鈕(Button)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303009.jpg)
放於適當位置
![](http://f7.wretch.yimg.com/bonddealer/206/1784303010.jpg)
更改標題(Caption)及名稱(Name)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303011.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303012.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303013.jpg)
指定執行程式
![](http://f7.wretch.yimg.com/bonddealer/206/1784303014.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303015.jpg)
十大指標分數存放處,此部份只用到EXCEL的功能(包括函數)。即單一公司執行完抓取資訊後,此部份就會自動秀出資料。至於多筆的部份就是將分數複製一份到活頁簿LIST 中存放
![](http://f7.wretch.yimg.com/bonddealer/206/1784303016.jpg)
![](http://f7.wretch.yimg.com/bonddealer/206/1784303017.jpg)
以上拉拉雜雜介紹了製作方法,你可以試試。寫了你才知問題點在那裡。
另附上我執行後的結果
1.97.2Q 我作的VS VS 總大的 (有一些差異)只show 差益部份。
![](http://f7.wretch.yimg.com/bonddealer/206/1784303018.jpg)
2.97.3Q 我作的,有試過若網路順暢10 分鐘內可跑完這28+2家的資料
![](http://f7.wretch.yimg.com/bonddealer/206/1784303019.jpg)
全站熱搜