★(發問)一個資料欄位不對稱的資料篩選問題 - Excel程式區

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

26^# 跳轉到 »

發表於 2012-1-6 17:14 | 只看該作者

回復 24# yagami12th
謝謝你期貨我是門外漢
[給你的程式沒有抓最高價,最低價 ]

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

25^#

發表於 2012-1-6 17:04 | 只看該作者

又發現另一種風格的圖，原來可以畫成這樣，有空再來試試。

附件如下(資料來源：大華期貨)：

另一種風格的圖.rar (106.38 KB)

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

24^#

發表於 2012-1-6 16:49 | 只看該作者

本帖最後由 yagami12th 於 2012-1-6 17:17 編輯

我在2010裡畫好圖，到2003不知道能不能順利顯示，GBKEE大如果不行再跟我說，我用小電腦的2007版畫。

附檔是2003年版本，剛命名命錯了，命成2010，已經改了檔名
附檔如下：

2003選擇權圖形.rar (7.44 KB)

2010選擇權圖形.rar (7.4 KB)

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

23^#

發表於 2012-1-6 16:32 | 只看該作者

回復 22# yagami12th
你的檔案 2003版不認識它啊!!!!! ( 可否存成2003版)

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

22^#

發表於 2012-1-6 15:49 | 只看該作者

本帖最後由 yagami12th 於 2012-1-6 16:06 編輯

回GBKEE大，我換了AO753的小電腦，開啟"未執行的2011年近月選擇權"EXCEL檔，執行巨集成功，桌面會產生一個"2010選擇權"EXCEL檔，我將它上傳上來，圖如果畫下去容量會太大，所以傳普通的檔案。

太感謝GBKEE大了，按N個贊，我還在錄程式碼邊學。

附檔如下：

2010年選擇權.rar (9.07 KB)

含圖版(蠻酷的)：

加圖2010年選擇權.rar (18.58 KB)

2010年選擇權.rar (18.58 KB)

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

21^#

發表於 2012-1-6 15:10 | 只看該作者

回復 20# GBKEE大
下載 [執行後2011年近月選擇權.xlsm] 打開一看工作表的畫面都是篩選不到資料這不太對 (應是可顯示最後篩選到的資料)<<我開這個檔案也是這個情形，看來只有換電腦測試一途。等一下要來試另一個程式看看，如果有成功再放上來分享。

不過還是非常感謝GBKEE大

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

20^#

發表於 2012-1-6 14:35 | 只看該作者

回復 19# yagami12th
下載 [執行後2011年近月選擇權.xlsm] 打開一看工作表的畫面都是篩選不到資料這不太對 (應是可顯示最後篩選到的資料)
*** E.[a2].End(xlDown) 是最後一個日期 (一定有資料) **** 搞不清楚.
我重新執行 [執行後2011年近月選擇權.xlsm] 後工作表的畫面都是留在顯示篩選到最後 E.[a2].End(xlDown)的資料
我2003升級到可運行 2007檔案而已,還是2003版本,可請有 2007 版的測試嘹解.

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

19^#

發表於 2012-1-6 13:40 | 只看該作者

回GBKEE大，真的不好意思，也非常感謝你，讓你這麼麻煩，改了剛剛第一行的程式碼之後可以運行了，但變成自動篩選排序的視窗格式，不知是否是正常。

附件如下：

未執行的2011年近月選擇權.rar (640.67 KB)

執行後2011年近月選擇權.rar (644.24 KB)

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

18^#

發表於 2012-1-6 12:00 | 只看該作者

回復 17# yagami12th
真是丈二金剛!!
Dim E As Worksheet, i As Date, M As Variant, AR(), C As Variant 刪掉試試看
成 Dim E As Worksheet, i , M As Variant, AR(), C As Variant
請再上傳你測試的檔案看看

TOP

yagami12th

中學生 Rank: 2

帖子: 88
主題: 13
精華: 0
積分: 104
點名: 0
作業系統: WIN7
軟體版本: OFFICE2010
閱讀權限: 20
性別: 男
註冊時間: 2012-1-3
最後登錄: 2017-12-31

17^#

發表於 2012-1-6 11:45 | 只看該作者

回復 yagami12th
MsgBox E.[a2] '加上看看是否有錯誤
MsgBox E.[a2].End(xlD ...
GBKEE 發表於 2012-1-6 11:04

回GBKEE大，程式碼經測試後，跳出a2欄的日期跟最後一欄的日期為12/16跟1/19的msgbox視窗後，接著出現前面所提的運算過於複雜的錯誤。

如附檔圖中所示：

圖檔.rar (831.52 KB)

TOP

[發問] ★(發問)一個資料欄位不對稱的資料篩選問題

[收藏此主題] [關注此主題的新回復]

[通過 QQ、MSN 分享給朋友]