[問題] VBA雙迴圈累加問題

[james733s (史奎德)]

(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:excel2013 VBA

版本:excel2013
K2 = sum(B2,K2)
單一個用VBA的話是

For i = 2 to 11
 工作表8.cells(2,12)=.sum(工作表1.cells(2,i))
Next

問題為
如何用VBA雙迴圈搭cells .sum
把k欄sum用ㄧ個按鈕加起來
麻煩各位大大解惑
如圖：

http://i.imgur.com/nX2hoFs.jpg
http://i.imgur.com/dIlo6cE.jpg


--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 101.12.162.254
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1496946879.A.94C.html
→ waiter337: 不大懂你的問題
→ waiter337: 首先我會建議先別跑那麼多
→ waiter337: 然後我將錯就錯來試試
→ waiter337: 建議先跑3行就好
→ waiter337: 你用錄製巨集在改
→ waiter337: For m = 2 To 4
→ waiter337: Sheets("工作表1").Cells(m, 12) = _
→ waiter337: Application.Sum(Range(工作表1.Cells(m, 2) _
→ waiter337: 工作表1.Cells(m, 11)))
→ waiter337: Next m
→ waiter337: http://imgur.com/a/IsPHS
→ waiter337: 雙迴圈是這樣
→ waiter337: Sub Sumss()
→ waiter337: For m = 2 To 4
→ waiter337: For n = 2 To 11
→ waiter337:  a = a + 工作表1.Cells(m, n)
→ waiter337: Next n
→ waiter337: 工作表1.Cells(m, 12) = a
→ waiter337: a=0
→ waiter337: next m
→ waiter337: end sub
→ james733s: http://i.imgur.com/Owqj34w.jpg
→ james733s: 就是我有個界面可能長這樣
→ james733s: 按鈕ㄧ按
→ james733s: 可以計算出L欄
→ james733s: L欄是B+到k欄的總和
→ james733s: 只能用
→ james733s: For 迴圈 .cells range .sum 可能這四個就做出來這樣
→ james733s: 。 還是感謝大大回復^^