[發問] 求助~關於vba的程式!

帖子: 47
主題: 5
精華: 0
積分: 116
點名: 0
作業系統: XP
軟體版本: office2007
閱讀權限: 20
性別: 女
註冊時間: 2011-1-14
最後登錄: 2012-3-10

2^#

發表於 2011-1-14 16:30 | 顯示全部帖子

謝謝您~我也持續的在研究中!^^

帖子: 47
主題: 5
精華: 0
積分: 116
點名: 0
作業系統: XP
軟體版本: office2007
閱讀權限: 20
性別: 女
註冊時間: 2011-1-14
最後登錄: 2012-3-10

3^#

發表於 2011-1-16 16:11 | 顯示全部帖子

你好~
已經改成2003版的檔案了!
謝謝你!
^^

帖子: 47
主題: 5
精華: 0
積分: 116
點名: 0
作業系統: XP
軟體版本: office2007
閱讀權限: 20
性別: 女
註冊時間: 2011-1-14
最後登錄: 2012-3-10

4^#

發表於 2011-1-16 23:40 | 顯示全部帖子

本帖最後由 candy516 於 2011-1-16 23:44 編輯

舉例來說：像是2010年1225 福懋油的除權日是9/7(黃底)，所以我去比較1225 福懋油9/7的收盤價是否大於等於9/8，如果沒有，就繼續找，9/6的收盤價是否大於等於9/8的收盤價，直到找到為止!最後得到需要幾天的時間，可以完成填權(某日的收盤價大於等於除權日(9/8))。最後新增一欄，將結果顯示在除權日(黃底旁)!
:)

帖子: 47
主題: 5
精華: 0
積分: 116
點名: 0
作業系統: XP
軟體版本: office2007
閱讀權限: 20
性別: 女
註冊時間: 2011-1-14
最後登錄: 2012-3-10

5^#

發表於 2011-1-17 16:08 | 顯示全部帖子

Hsieh 大大你好：
Sheet1原始資料，像是SGEET1的A2的福懋油，他的除權日2010/9/7，我就先把SHEET2的B85用黃底標示出來，我要計算的是SHEET2的B85(9/7)是否大於等於B86(9/6)(填權的意思是說：除權當日的收盤價是否大於等於除權日前一日的收盤價)，如果以這個例子來說，除權日當天則已經填權，就不要再繼續找9/8，但如果9/7沒有大於9/6，則必須再去看9/8是否大於等於9/6，C85這個儲存格我是想顯示出；需要幾天的時間可以完成填權。(像是福懋油則顯示1，因為他當天即完成填權)
不知道大大懂不懂我的意思，真的是很不好意思，想請教你還把檔案搞得你看不懂!

謝謝你的幫忙!^^

帖子: 47
主題: 5
精華: 0
積分: 116
點名: 0
作業系統: XP
軟體版本: office2007
閱讀權限: 20
性別: 女
註冊時間: 2011-1-14
最後登錄: 2012-3-10

6^#

發表於 2011-1-17 16:37 | 顯示全部帖子

Hsieh大大你好~
哇，你真的好厲害唷!我才把尋找儲存格底色的方法研究出來，你就寫出來了!真是太感謝了!
不過我的解釋好像還是不夠清楚= = !我再說清楚一點：
像是福懋要他是9/7日除權，所以第一步驟就是用9/7的收盤價和9/6的比(14.3>14.26)，所以在C85填上1(天)!
再來是1235興泰，他的除權日是9/13，所以我先用9/13和9/10
(9/13的收盤價46.1<9/10的收盤價46.89)，所以再繼續比
(9/14的收盤價46.3<9/10的收盤價46.89)，所以要再繼續比
(9/15的收盤價48.75>9/10的收盤價46.89)，
在這一天則找到完成填權的!所以就再D81填上"3"(天)
不知道大大這樣了解我的意思嗎?真的不好意思，表達能力不是很好!
真心的謝謝你!^^