1樓：匿名使用者
sub aa()
dim i, j, a(5), b(5), t1, t2, t3, t4
for i = 1 to 5
a(i) = cells(3, i)
b(i) = i
next
for i = 1 to 5
for j = i + 1 to 5
if a(i) < a(j) then
t1 = a(j): a(j) = a(i): a(i) = t1t2 = b(j): b(j) = b(i): b(i) = t2end if
next
next
t3 = 0: t4 = ""
for i = 1 to 5
t3 = t3 + a(i)
if t4 = "" then
t4 = cells(1,b(i))
else
t4 = t4 & "," & cells(1,b(i))end if
if t3 >= 20 then cells(5, 1) = t4: exit for
next
end sub
2樓：匿名使用者
從最大的開始進行sum運算，直到sum大於或等於20時結束sum運算。
—— 說的並不清楚，沒法寫**。
3樓：匿名使用者
程式沒有問題，可以輸出s
呼叫格式類似：call isumlarge(25, range("a2:j2"))
b130487，希望對你有用
Excel VBA程式開發自學寶典（羅剛君）
哥們，你太捨得了，贊一個吧。給你點建議，如果你是熟悉的呢，看羅剛君的書沒錯，理解一下人家的演算法，是怎麼實現的呢。如果你是初學呢，不如好好的跟一位師傅學習一下，理解一下程式設計的思想再逐步深入，本人不才，可以共同 你要的那份沒找到 手上 有份也還不錯的 傳送到你的qq郵箱 注意檢視哦 我有，hi 我...
求別怕excel vba其實很簡單 完整的電子版
自我程式設計 直接看vb書就好了，vba不過是vb的特例，學起來也不難。vb資料一堆 請問密碼是什麼，解壓還要一個密碼，跪求 鸚鵡螺丶 這是第二版的 沈一民 京東價46.6 噹噹網電子書0,99 來自高山寺舞盡霓裳的加菲貓 我要一份完整的，1814111786 qq.com 謝謝！ 同求，現急需，3...
excel中如何計算人的年齡，怎樣在Excel中計算所有人的平均年齡？？！
芮城老憨 假如你的日期在a1 datedif a1,2010 1 31 y 結果為實足年齡，如果兩頭都算，可在公式後加1。然後選中這個有公式的單元格，看到右下角出現小黑十字時，向下拖動，就可計算出所有a對應年齡數值了。 一 假設出生日期寫在a1單元格，則可以在b1單元格寫入公式 if a1 date...