Vba excel操作

在Excel中，按Alt+F11調出VB編輯器。單擊菜單“插入”和“用戶表單”以顯示表單和工具箱。選擇工具箱第二行的最後壹個“命令按鈕”,並在窗體上繪制壹個按鈕。然後雙擊按鈕，代碼如下。

===================

私有子命令按鈕1_Click()

Sheet1。列(“e”)。復印紙張2。列(“a”)

Sheet1。列(“g”)。復印紙張2。列(“b”)

Dim a(1到1000)為單個，I為整數

對於i = 1到1000 '把這兩個地方的1000改成妳的最大行數，足夠大了。

a(i) = Val(Sheet1細胞(I，“a”)。值)

然後

對於i = 1到1000 '把這兩個地方的1000改成妳的最大行數，足夠大了。

工作表2。細胞(I，“c”)。Value = Val(Sheet1。單元格(I，“b”)。值)- a(i)

工作表2。單元格(I，“d”)。Value = Val(Sheet1。細胞(I，“c”)。值)- a(i)

工作表2。細胞(即“e”)。Value = Val(Sheet1。單元格(I，“d”)。值)- a(i)

然後

末端接頭

完成後，按F5，新建立的表單將開始運行。點擊按鈕，壹切都會好的。