大家好
檔案如下 http://1drv.ms/YhI1rU
我想做的是輸入B6的變數 得到O2的結果
B6是從1到10
也就是說我想得到2x10的表格
左欄是1到10 右欄是其值所對應到的結果
我有同事寫出來 跟大家分享 謝謝
Sub 自動()
For i = 0 To 10
Worksheets("體積積分").Range("N" & i + 1).Value = i + 1
Worksheets("體積積分").Range("B6").Value = Worksheets("體積積分").Range("N" &
i + 1).Value
Worksheets("體積積分").Range("O" & i + 1).Value = Worksheets("體積積分
").Range("K2").Value
Worksheets("體積積分").Range("P" & i + 1).Value = Worksheets("體積積分
").Range("L2").Value
Next
End Sub
※ 引述《EricHaze (慵懶)》之銘言：
: 軟體:windows office
: 版本:2010
: 大家好
: 我想請教各位
: 如果我用了整張工作表得到最後數值
: 我想把這個數值依照變數一次輸出，而不用重覆輸入變數
: 有人說要用VBA，但似乎沒那麼快上手
: 請問還有什麼其他方法呢
: 還是說我得乖乖學VBA呢
: 謝謝