- 帖子
- 128
- 主題
- 13
- 精華
- 1
- 積分
- 118
- 點名
- 0
- 作業系統
- WinXP
- 軟體版本
- Office2003
- 閱讀權限
- 50
- 性別
- 男
- 來自
- 四川成都邛崃
- 註冊時間
- 2010-9-13
- 最後登錄
- 2017-5-12
|
With Range("mySum").Columns(2)
[b9] = Application.Sum(.Value) - .Cells(1, 1)
End With
With Range("mySum").Columns(2)
[b10] = Application.Sum(.Cells(2, 1).Resize(.Rows.Count - 1, 1))
End With |
|
發表於 2010-9-20 08:44
| 