- 帖子
- 2035
- 主題
- 24
- 精華
- 0
- 積分
- 2031
- 點名
- 0
- 作業系統
- Win7
- 軟體版本
- Office2010
- 閱讀權限
- 100
- 性別
- 男
- 註冊時間
- 2012-3-22
- 最後登錄
- 2024-2-1
|
本帖最後由 c_c_lai 於 2015-12-17 18:53 編輯
回復 6# 栗栗子
加油!多多參與討論自會有所收穫的。
另外在 stillfish00 大大 模組 (Module1)
裡再加上 .ChartObjects(1).Activate,
如此滑鼠只要在圖表上滑動,指引線
即刻有類似移動的效果,亦即一進入
本表單立即啟動指引線有類似移動的效果- Sub TriggerChartVLine()
- With Sheets(1)
- Set myChart = New EventClassModule
- myChart.InitializeChart .ChartObjects(1).Chart, .Range("U15:U18")
- .ChartObjects(1).Activate ' 一進入本表單指引線即刻有類似移動的效果
- End With
- End Sub
複製代碼 |
|