yosi asked in 電腦與網際網路軟體 · 1 decade ago

Excel 如何統計 sheets

請問大家如何用excel的程式統計每張 sheet內的數值(每張 sheet其格式都相同,只有數值不一樣)請大家不吝指教,謝謝大家。

Update:

★(每頁相同欄位的統計,不是只有一個欄位)

有誰能詳細說明回答欄上的執行動作嗎?

因我是新生呀!

Update 2:

我想請教大家的是統計每頁相同儲存格的和。

sheet4(a1) = sheet1(a1)+sheet2(a1)+sheet3(a1)...

sheet4(b1) = sheet1(b1)+sheet2(b1)+sheet3(b1)...

sheet4(c1) = sheet1(c1)+sheet2(c1)+sheet3(c1)...

Update 3:

紅帥的指教是不錯的方法,不過要是有幾百個儲存格時,那不是很費時嗎 ?

看能不能在巨集裏弄個程式,把它簡單化吧!

5 Answers

Rating
  • 呈恩
    Lv 5
    1 decade ago
    Favorite Answer

    1.先用下面的VBA程式吧, 將所有sheet的名字,轉到sheet_summary中的a欄

     所有sheet的a1值,轉到sheet_summary中的b欄後,

    2.用countif去計算, 例如c1欄填入=countif(b:b,"衣服")

    使用方法, 在excel頁面, 按alt-f11

    按插入->模組, 並將上面的程式碼copy到VBA模式中

    再按執行, 就可以了, 最好一次只開一個EXCEL檔

    它會將你所有的SHEET, 都找過一次, 然後將每頁A1值, 做一個摘要

    並且摘要在sheet_summary這個SHEET中, 如果你想在同一個檔案重覆的玩

    請記得將sheet_summary, 這個工作頁刪除

    Sub summary_sheet()

    ActiveWorkbook.Sheets.Add

    ActiveWorkbook.ActiveSheet.Name = "sheet_summary"

    For i = 1 To Sheets.Count

    If Sheets(i).Name <> "sheet_summary" Then

    Sheets("sheet_summary").Cells(i,1) = Sheets(i).Name

    Sheets("sheet_summary").CELLS(i,2)= Sheets(i).range("a1")

    end if

    Next i

    End Sub

    Source(s): 0066
  • 1 decade ago

    謝謝a8350070的指導,妳的程式應是最簡捷的。

  • EH
    Lv 5
    1 decade ago

    試試

    =SUM(Sheet1:Sheet3!A1)

    其中Sheet1:最前面的工作表名稱;

    Sheet3:最後面的工作表名稱

  • Anonymous
    1 decade ago

    在sheet4頁中a1儲存格輸入

    =Sheet1!a1+Sheet2!a1+Sheet3!a1....

    在sheet4頁中b1儲存格輸入

    =Sheet1!b1+Sheet2!b1+Sheet3!b1....

    ........即可

    2006-04-15 18:59:03 補充:

    有幾百個儲存格時,將sheet4頁中a1往右拉及往下拉即可

  • How do you think about the answers? You can sign in to vote the answer.
  • 1 decade ago

    喔喔

    簡單~~~ ^^

    你在 螢幕下方的 sheet 上面 按右鍵

    然後 選複製

    這樣就複製一份完完全全一模一樣的sheet了

    這樣子 格式 跟 數值都複製了

    這之後 再改數值 即可

    ok

    加油!!

    2006-04-11 03:57:17 補充:

    有辦法手動出來但是沒有辦法 自動的耶~~~可能 可以 但是我不知道 不好意思了手動的話 就是=SUM(Sheet1!A1,Sheet2!A1)

    2006-04-20 20:01:47 補充:

    a8350070,

    ur seems to be the easiest

    and it works fine!!

    thank you to let me know ^^ thx

    Source(s): 自己~~~!
Still have questions? Get your answers by asking now.