1樓：匿名使用者
sub test()
dim r as long, rng as range, arr(),sum as long
r = range("d65535").end(xlup).rowset rng = range(cells(7, 4), cells(r, 4))
redim arr(1 to r - 6)arr=
for i=1 to r-6
sum=sum+arr(i)
next i
msgbox sum
end sub
雖然也用了for但是應該會比你直接用的快很多，你試試看行不。
excel vba常用**
關於excel vba
excel中的vba是什麼意思，如何用
excel中怎麼使用vba
2樓：excel辦公實戰
excel中的vba**需要在vbe視窗是使用（具體請看下面詳細分析）
excel版本參考：2010
1、alt+f11，進入vbe對話方塊。
2、右擊-插入-模組。
3、輸入**(使用已有**，直接複製貼上進入即可）4、按f5執行或者點選三角按鈕執行**。
5、檢視效果。
3樓：一騎當後
方法/步驟如下：
1、雙擊開啟桌面的excel；
2、單擊右上角的office圖示，找到excel選項，單擊開啟；
3、勾選在功能區顯示「開發工具」選項卡，單擊確定按鈕完成修改。
4、單擊選單欄的開發工具，然後找到visual basic單擊開啟便可以進行相關的vba程式設計。
4樓：匿名使用者
excelhome的vba學習版，希望你能在裡面找到想學習的。
5樓：
如果可以不使用vba就不是用。麻煩。
excel中的vba是什麼意思，如何用
6樓：迷你手工老張
vba主要是觸發和指定單元格。
工具：電腦、excel2007。
1、開啟電腦桌面上的excel2007軟體。
2、開啟一個excel檔案，滑鼠右擊下面的工作表（如sheet1）。選擇「檢視**」，就可以開啟vba介面。
3、選擇如下圖所示的下拉選單，選擇「worksheet」。
4、選擇如下圖所示的下拉選單，選擇對應的觸發模式。這裡選擇beforedoubleclick，意思就是說：在本工作表滑鼠雙擊（之前），將觸發下面的**程式。
5、選擇完成後，會看到下面出現了兩條**；這倆條**其實是在宣告一個函式。將滑鼠放置在這兩行**之間，寫上執行語句：sheet1.
cells(1, 3) =1) +2)。
6、然後點選儲存，回到excel的原始介面。
7樓：匿名使用者
excel中的vba是操作excel軟體自動工作的指令的集合。
請求大神幫忙寫個excel vba**，謝謝！ 50
8樓：自然是種習慣
法如下：一、開發工具。
二、雙擊sheet
三、建立事件。
選擇change事件。
四、編寫**。
private sub worksheet_change(byval target as range)
dim frg as range
if = 2 then
set frg = b:b").find(target)
if not frg is nothing then
"b" &b" &
"c" &c" &
"d" &d" &
"e" &e" &
"f" &f" &
"g" &g" &
"h" &h" &
end if
end if
end sub
五、在分類1中輸入金，後面資料自動出來。
Excel VBA呼叫Excel函式示例 sumif 條件求和
1 示例 sub test1 dim x as long x worksheetfunction.sumif range a2 a9 range c2 value,range b2 b9 range d2 value xend sub 2 如下圖 3 以上 的作用是 呼叫工作表函式sumif，求a2...
excel vba起衝突了，excel中複製工作表的時候提示名稱衝突怎麼解決
一個小小的建議 儘量不要在 vba 中對工作表使用加密和解密操作。當你將這個工作簿設定為共享工作簿的時候就會出問題 確實有必要對工作表進行加密保護，建議在保護前設定好可編輯區域 保護 屬性是選中的，即不允許使用者進行手動操作的區域，但是又需要使用 vba 操作的 設定好許可權 通常是 everyon...
excel vba設定登陸許可權，excel許可權登陸
可以設定excel檔案的工作簿開啟事件 來檢查帳號並執行非法登入則退出操作。提示 1 使用environ函式獲取相關係統資訊，如environ computername 可以返回計算機名，environ username 返回登入使用者名稱等。2 可以用語句來關閉當前檔案。private sub w...