返回列表 上一主題 發帖

[發問] 如何在 Excel 的圖表中將無資料日期不顯示

回復 10# saleen
問題一:
妳的附件原始檔,之前我在開啟它時曾經足足等了 五 ~ 十分鐘不等還無法進入,
所以我採用分段方式才將妳圖表的問題 (#5 樓  -  回文) 消除。這也是妳說的:
" Excel 的圖表繪圖速度好慢喔..  每次開檔案之後都要等它畫完圖 "
" upd 不知道為什麼還是不會自動執行,一定要我手動點執行巨集它才會跑
  我都已經給它 20 秒的等候時間了 "
事實上、妳那 20 秒的等候時間早就過了不知多久時候了,這亦是不會執行
upd() 的真正原因。除非你有權限能下載附件去覆蓋掉妳的 "成交比重分析.xlsm"
問題二:
TimeScale 的問題是圖表內部控制,無法任由使用者異動。這方面可能要直接去
請教微軟了。

TOP

回復 10# saleen
成交比重分析.rar (35.04 KB)

TOP

回復 10# saleen
我想到了一個解決良方!
剛才我試了一下開啟到完全進入作業的時間
大約需時 30 秒 ~ 或之上,妳把等候時間加上
newSecond = Second(Now()) + 30    '   或者 35 秒
便解決問題了。

TOP

回復 13# c_c_lai


    感謝 Lai 大大 !
我來試試看
等會來回報結果 !
小妹在此向各位大大求教了 Orz

TOP

我改成 40 秒它還是一樣
都顯示 #N/A
><...
小妹在此向各位大大求教了 Orz

TOP

我改成 40 秒它還是一樣
都顯示 #N/A
>
saleen 發表於 2013-11-6 14:25

請你查看一下  J44 到 M44 資料數據是否為 都顯示 #N/A,
如果答案是 Yes:
1.   妳的券商軟體是否已開啟?
2.  開啟順序應為: 券商軟體  --->   Excel  --->  連線作業。
如果答案是 No:
1.  B2 到 E2 欄內容為何?

TOP

回復 16# c_c_lai


   
a1.jpg
2013-11-7 14:55

它就是不會自己執行 upd
手動執行就正常了
好怪 ><
小妹在此向各位大大求教了 Orz

TOP

回復 17# saleen
妳把 upd()  更換成以下的程式碼便OK 了。
  1. Sub upd()
  2.     Dim Rng As Range
  3.    
  4.     With 工作表1
  5.         Set Rng = .[B2].Resize(1, 5)
  6.         
  7.         If .[A2] = Date Then
  8.             Rng(1) = "=J44"
  9.             Rng(2) = "=K44"
  10.             Rng(3) = "=L44"
  11.             Rng(4) = "=M44"
  12.             Rng(5) = "=100-B2-D2"
  13.             Rng.Value = Rng.Value              '  將公式以欄值取代
  14.         End If
  15.     End With
  16.    
  17.     reDraw       '  重新繪製圖表座標值
  18. End Sub
複製代碼
試試看!

TOP

回復 18# c_c_lai


    感謝 Lai 大 ~
雖然最後還是沒獲得解決 T_T
目前就暫時用手動的方式了..
小妹在此向各位大大求教了 Orz

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝,花了許多心血,想盡各式方法要遮擋時間,結果是:浪費了更多時間,且一無所成!
返回列表 上一主題