[發問] 折線圖用VBA控制多數列資料

earl

請教各位大大,目前已經用VBA控制達到能出現選擇的資料折線

下載 (69.5 KB)

2015-6-12 18:07

但是在全部點選資料在取消的時候會出現刪除錯誤的線或出錯
請問除了透過"ActiveChart.SeriesCollection(1)"可以控制數列外,還有其他指令嗎?
或者有其他辦法可以達到我的需求?
謝謝
Book1.zip (13.97 KB)

下載次數: 10

2015-6-12 18:08

earl

沒人回:L
不過小弟自己試出來了, 提供有興趣的人參考
在每個刪除的部分加上下列的程序: (變數名稱要自行修改:maxline, avgline, minline)

1. If nseries = 3 Then
   
2.             If avgline = 2 Then
   
3.                 If maxline = 3 Then
   
4.                     maxline = maxline - 1
   
5.                 ElseIf minline = 3 Then
   
6.                     minline = minline - 1
   
7.                 End If
   
8.             End If
   
9.         ElseIf nseries = 4 Then
   
10.             If avgline = 3 Then
    
11.                 If maxline = 4 Then
    
12.                     maxline = maxline - 1
    
13.                 ElseIf minline = 4 Then
    
14.                     minline = minline - 1
    
15.                 End If
    
16.             ElseIf avgline = 2 Then
    
17.                 maxline = maxline - 1
    
18.                 minline = minline - 1
    
19.             End If
    
20.         End If
    
21.         nseries = nseries - 1
    
22. End IF

複製代碼

bhsm

回復 2# earl
請教earl大:
        您這個程式太好用了,但小弟才疏學淺,看不懂您第二次發表的修正程式要如何修改?可否上傳或私訊給我您改好的檔案,先在此謝謝您

mike5500

剛學習 正在尋找有關控制圖表顯示區間的範例 是否方便分享 謝謝