1樓:
這個是沒有辦法的,除非你編巨集。
以下是我做的一個月份累計的例子,拋個磚頭:
attribute vb_name = "模組1"
sub 月合併()
dim msheet as sheets
for i = 1 to activeworkbook.sheets.count - 1
for j = 1 to 20
if (activesheet.cells(3, j) = "合計") then
exit for
end if
next j
for k = 1 to 100
if (activeworkbook.sheets(i).cells(3, k) = "月合計") then exit for
next k
if (activeworkbook.sheets(i).cells(3, k) <> "月合計") then
msgbox ("表「" & activeworkbook.sheets(i).name & "」沒有「月合計」,故沒有統計")
goto nextsheet
end if
activesheet.columns(j).select
selection.insert shift:=xltoright, copyorigin:=xlformatfromleftorabove
activesheet.cells(3, j) = activeworkbook.sheets(i).name
range(cells(5, j), cells(47, j)).formular1c1 = "='" & activeworkbook.sheets(i).
name & "'!rc[" & k - j & "]"
nextsheet:
next i
range(cells(5, j + 1), cells(47, j + 1)).formular1c1 = "=sum(rc[" & (2 - j) & "]:rc[-1])"
end sub
2樓:成都豺狼
引用不同工作表的某一個位置的資料,例如 =sheet1!b2
彙總要根據需要選擇函式,例如 =sum(sheet1:sheet10!b2)
3樓:匿名使用者
點選表1shift1中的d5,然後按住ctrl點選工作簿下面的shift2和shift3,就選中這三個表中的同一位置d5了
4樓:萊昂納德_尤拉
=indirect("'表
有關Excel利用條件格式設定的問題
先給你糾正一個概念,excel中橫的叫行,用行號12345等數字表示,豎的叫列,用列標abcd等字母表示。所以你說法的1 3列是錯誤的,應該是在1 行。再給設定條件格式的方法 選擇a4 g16,條件格式,管理規則 新建規則 用公式確定要設定格式的單元格,公式 min if b 1 g 3 a4,ro...
有關excel選擇題,有關Excel選擇題
1 d2 b 3 c4 c 5 如果答案c中最後一項是 圖表製作。那麼勉強可以作為正確答案。6 b7 a 8 a9 c 10 a 11 a 12 題目有問題。各類資料中 數值靠右,文字靠左,邏輯值居中13 d 1d 2d 3a 4c 5c 6d 7a 8a 9c 10a 11a 12b 13d 1 ...
Excel向下填充問題,EXCEL填充問題
單元格外框右下角有一個小黑點 即填充柄 在d1單元格寫入1後雙擊這個小黑點,就可以完成你的操作了 前提是d列的資料是連續的 否則就只有在名稱框中寫入要填充的區域 按下回車鍵 寫入1 再按下 ctrl d 如何快速填充 方法1,雙擊填充柄,可填充,如果前一列連續多行,則填充相同多行 方法2,先輸入要填...