- 帖子
- 586
- 主題
- 123
- 精華
- 0
- 積分
- 763
- 點名
- 0
- 作業系統
- WINDOW7
- 軟體版本
- Office 2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-16
- 最後登錄
- 2017-3-14
 
|
樞紐資料標顏色
Sheets("彙總表(明細表)").PivotTables("樞紐分析表1").PivotSelect "尚未收款", xlDataAndLabel, True
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
想問依下 上面標顏色的地方可以用什麼方式讓他不要跑掉嗎
如果我的畫面是停在 Sheets("彙總表(明細表)")這各表就不會跑掉
可是如果在別的工作表再執行該程式碼就會在別的工作表所在儲存格標顏色
我想要的是上面的程式碼有辦法在簡略嗎? 否則好像只能改成下面的嗎?
Sheets("彙總表(明細表)").PivotTables("樞紐分析表1").PivotSelect "尚未收款", xlDataAndLabel, True
Sheets("彙總表(明細表)").select
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With |
|
發表於 2011-11-14 13:44
| 
