bhsm

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-8-9 10:39 | 顯示全部帖子

[發問] 依次記錄各股殖利率

請問版上高手：在小弟的附檔中，由”常用代碼”的工作表雙擊代碼即可於”估價”的工作表C5取得該股殖利率，若小弟想由”常用代碼”的工作表雙擊A2代碼於”估價”的工作表取得A2的殖利率紀錄於”常用代碼”工作表中的C2，接著雙擊A3代碼於”估價”的工作表取得A3的殖利率紀錄於”常用代碼”工作表中的C3，依次直到A27，請問這巨集或VBA該如何寫?謝謝。

殖利率.rar (11.13 KB)

樓主熱帖

年齡不小,但我很想學

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

2^#

發表於 2014-8-9 14:56 | 顯示全部帖子

回復 2# GBKEE

感謝GBKEE大指導.依您的方式已可雙擊"常用代碼"的A2~A27,並於C2~C27取得資料.想進一步請教:如果要讓"常用代碼"的A2~A27自動執行,請問巨集要如何寫?小弟嘗試用錄製巨集的方式,由雙擊A2開始.取得C2資料.再雙擊A3.取得C3資料----直到雙擊A27.取得C27資料後停止錄製巨集.但執行巨集時.游標卻直接跑到A27.請問這巨集該如何寫?謝謝

殖利率1.rar (11.06 KB)

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

3^#

發表於 2014-8-10 15:09 | 顯示全部帖子

回復 4# GBKEE

感謝GBKEE大，小弟安裝上出現一些問題想再請教您，詳情請看TEST.rar內的說明，謝謝。

TEST.rar (710.13 KB)

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

4^#

發表於 2014-8-10 18:22 | 顯示全部帖子

回復 6# GBKEE

非常感謝GBKEE大的有問必答，目前殖利率1-1.xls已可正常運作，但殖利率1-2.xls仍然出現附檔的訊息

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

5^#

發表於 2014-8-11 12:26 | 顯示全部帖子

回復 8# GBKEE
感謝GBKEE大的回答.我重新開機不開任何檔案.也不執行任何程式.直接執行您所附的殖利率1-2.xls.依舊出現400的錯誤訊息.這應該不是您的程式問題.我想應該是我的電腦有問題.幸好有第一個方式可解決.非常謝謝您

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

6^#

發表於 2014-8-11 15:21 | 顯示全部帖子

回復 10# GBKEE
感謝GBKEE大指導.電腦原使用IE11.移除後.重新安裝IE8.結果正常了.沒出現400的訊息.真是謝謝您了

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

7^#

發表於 2015-4-23 13:25 | 顯示全部帖子

GBKEE大您好:
之前小弟曾承蒙您指教VBA程式，但現在因小弟希望增加資料，同樣在”常用代碼"的工作表中雙擊股票編號，但不只能帶入”估價"工作表中的殖利率，也希望能帶入”股本”、”股東權益報酬率”、”上市(櫃)時間”，不知能否請GBKEE大再指導一次，謝謝。

150423.rar (10.62 KB)

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

8^#

發表於 2015-4-23 18:30 | 顯示全部帖子

回復 13# GBKEE
感謝GBKEE大,謝謝您

年齡不小,但我很想學

TOP

bhsm

中學生 Rank: 2

帖子: 96
主題: 12
精華: 0
積分: 116
點名: 289
作業系統: XP
軟體版本: OFFICE2003
閱讀權限: 20
性別: 男
註冊時間: 2010-9-29
最後登錄: 2025-12-5

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章

9^#

發表於 2015-4-24 11:16 | 顯示全部帖子

回復 bhsm
GBKEE 發表於 2015-4-23 14:48

GBKEE大您好:
我把您教的這個VBA套用在公司的檔案上時，用2003操作都沒問題，但把該檔轉成2010時，操作上卻會發生"執行階段錯誤"28" 堆疊空間不足，當我按下偵錯時，程式會指向
"Sheet28.Rng.Resize(, 4) = Array([L5].Text, [L6].Text, [C14].Text, [B13].Text)"，如果在昨天傳給您的150423.rar檔案轉成2010時，操作沒問題，但套用到公司另外檔案時卻會
發生堆疊空間不足，請問應該修改哪裡來排除問題，謝謝

年齡不小,但我很想學

TOP

bhsm