若是有一批資料，不確定列的個數？

各位好，我現在有一批資料(如附圖)，必須計算最後一列的各項總計，但這批資料的列數非固定但欄是固定的，我必須在最後一列的每個儲存格，撰寫不同函式來計算每欄的不同數值，我初步構想是將這些函式寫成類似巨集的東西，然後當我資料一匯入完成確定資料總數之後，就可以在最後一列以插入的方式插入這些函式，請問應該怎麼做呢？

樓主熱帖

tku0216

中學生 Rank: 2

帖子: 209
主題: 43
精華: 0
積分: 262
點名: 0
作業系統: win 7
軟體版本: office 20**
閱讀權限: 20
性別: 男
註冊時間: 2011-11-3
最後登錄: 2017-4-16

10^#

發表於 2012-5-17 18:52 | 只看該作者

這下真的全部搞懂了，謝謝register313大大不厭其煩地回復。

TOP

register313

　頭銜: 麻辣路人甲

大學生 Rank: 4

帖子: 967
主題: 0
精華: 0
積分: 1001
點名: 0
作業系統: WIN XP
軟體版本: OFFICE 2003
閱讀權限: 50
性別: 男
來自: 台北
註冊時間: 2010-11-29
最後登錄: 2022-5-17

2012龍年全勤獎章熱烈參與勳章

9^#

發表於 2012-5-17 18:20 | 只看該作者

回復 8# tku0216

直接在儲存格下公式
=COUNTIF(D2:D8,"選項A")
用VBA下公式
Cells(a + 1, "d").FormulaR1C1 = "=countif(r[" & 1 - a & "]c:r[-1]c,""選項A"")"

2者比較一下,應可知為什麼了(後者總是比前者多了"")

TOP

tku0216

中學生 Rank: 2

帖子: 209
主題: 43
精華: 0
積分: 262
點名: 0
作業系統: win 7
軟體版本: office 20**
閱讀權限: 20
性別: 男
註冊時間: 2011-11-3
最後登錄: 2017-4-16

8^#

發表於 2012-5-17 18:12 | 只看該作者

回復 7# register313

may i ask why?^^

TOP

register313

　頭銜: 麻辣路人甲

大學生 Rank: 4

帖子: 967
主題: 0
精華: 0
積分: 1001
點名: 0
作業系統: WIN XP
軟體版本: OFFICE 2003
閱讀權限: 50
性別: 男
來自: 台北
註冊時間: 2010-11-29
最後登錄: 2022-5-17

2012龍年全勤獎章熱烈參與勳章

7^#

發表於 2012-5-17 18:08 | 只看該作者

回復 6# tku0216

Cells(a + 1, "d").FormulaR1C1 = "=countif(r[" & 1 - a & "]c:r[-1]c,""選項A"")"

TOP

tku0216

中學生 Rank: 2

帖子: 209
主題: 43
精華: 0
積分: 262
點名: 0
作業系統: win 7
軟體版本: office 20**
閱讀權限: 20
性別: 男
註冊時間: 2011-11-3
最後登錄: 2017-4-16

6^#

發表於 2012-5-17 17:52 | 只看該作者

回復 tku0216

R=16(最後一列)
設公式下在H17
H17=SUM(R[-" & R - 1 & "]C:R[-1]C)
=SUM(R[-1 ...
register313 發表於 2012-5-11 16:55

感謝回復：再請教一下，關於formular1c1的用法？
因為我加入countif函數，發現沒有辦法運作，以D欄舉例，我要在D9計算“選項A”的數量，
那我程式寫法理當要"=countif(r[" & 1 - a & "]c:r[-1]c,"選項A")"

但我發現我無法在選項A兩邊加雙引號，否則會有錯誤訊息，請問我該如何解？謝謝。
excel檔載點→http://db.tt/8AJ0mZLF