如何將有大量資料的excel工作簿按照數量要求分解成不同的sheet

時間 2022-03-12 09:30:04

1樓:

估計,你是不想用滑鼠拖曳的方式來選中資料區——太麻煩幾分鐘就搞定了

第一步:在名稱框中輸入a1:e50000,回車該區域被選中複製該區域資料到新表中

後續步驟只需要在名稱框中輸入不同的區域即可:a50001:e100000、a100001:e150000等

2樓:匿名使用者

sub macro1()

for i = 1 to 10 '總表一共多少分成10張表sheets("sheet1").select '選定總表sheet1工作表

r = i * 50000 '每個小表多少行l = r - 49999 '比r值少1倍-1range("a" & l & ":e" & r).select '每50000行為選定區域

selection.copy

sheets.add after:=sheets(sheets.count)

range("a1:e50000").selectactivesheet.paste

next

end sub

3樓:匿名使用者

如果只分解為10個sheet則編**只用一次沒有什麼意義。

如果經常使用並且分解的sheet數很大則程式設計有意義。

不知你的情況如何?

如何將一個excel工作表的資料拆分成多個sheet

4樓:匿名使用者

解決如何將一個excel工作表的資料拆分成多個sheet的步驟如下:

1.開啟excel**之後,我們首先在空白**處依次將要建立的工作表名稱按列輸入。

2.接著我們全選這部分內容,然後點選工具欄中的「插入」,在插入對應的頁面內勾選「**」-「資料透視表」。

3.在彈出的建立資料透視表對話方塊,首先勾選頁面中間的「現有工作表」,然後將位置定位到任一空白單元格內。

4.點選對話方塊的確定,頁面的右側就會出現「資料透視表欄位」視窗,我們將視窗中的sheet名稱拖動到篩選器下方。

5.最後選中剛剛新增的篩選器,然後依次點選「分析」-「選項」-「顯示報表篩選頁」,在彈出的對話方塊直接點選確定,然後多個工作表就建立好了。這樣就解決了如何將一個excel工作表的資料拆分成多個sheet的問題了。

5樓:wps官方

以wps 2019版本為例:

1、開啟「**(excel)」文件;

2、點選「資料-拆分**」;

3、按需選擇「把工作表按照內容拆分」或「把工作簿按照工作表拆分」使用即可。

6樓:月亮愛你

1、在excel的載入項選擇方方格子,選擇彙總拆分功能。

2、在下拉選單中選擇拆分工作簿。

3、設定要拆分出的工作表,以及需要儲存的位置,然後點選確定。

4、執行完成後,會有提示,可以直接檢視檔案。

5、在指定的資料夾內就可以看到拆分好的**。

7樓:辦公小易

如何將一張工作表拆分成多個工作表?

8樓:

可以按下面的步驟:

(1) 在要複製的sheet標籤上點滑鼠右鍵;

(2) 彈出的視窗中選"移動或複製工作表";

(3) 彈出的視窗中點下拉框,然後選"(新工作簿)";

(4) 如果是複製,勾選"建立副本",如果是剪下,不勾選該選項, 確定

(5) 儲存,這樣,一個新的excel檔案就好了。 看看下面的演示過程吧。

9樓:魚木混豬喲

可以通過複製貼上來實現

也可以通過vba按照規律自動實現

看具體的情況和要求

excel將一個工作簿根據a列資料拆分成多個工作表 50

10樓:匿名使用者

我測試了下,沒有任何問題。可能是你的日期列的格式有問題,把日期列的單元格格式要改成文字格式就可以了,如果是日期型別就不行了。

11樓:匿名使用者

不能出現任意的合併單元格,提示操作都要正確

12樓:辦公小易

如何將一張工作表拆分成多個工作表?

13樓:平陽虎

什麼都看不到,怎麼修改呀?

14樓:

可以根據實際情況編寫

excel如何將1個工作表按條件分割成多個工作表? 5

15樓:wps官方

以wps 2019版本為例:

1、開啟「**(excel)」文件;

2、點選「資料-拆分**」;

3、按需選擇「把工作表按照內容拆分」或「把工作簿按照工作表拆分」使用即可。

16樓:匿名使用者

操作步驟:

原始資料表如下(名稱為:資料來源),需要根據b列人員姓名拆分成每個人一個工作表。

點選【開發工具】-【visual basic】或者alt+f11的快捷鍵進入vbe編輯介面。

如下圖所示插入一個新的模組。

如下圖,貼上下列**在模組中:

sub cfgzb()

dim myrange as variant

dim myarray

dim titlerange as range

dim title as string

dim columnnum as integer

myarray = worksheetfunction.transpose(myrange)

title = titlerange.value

columnnum = titlerange.column

dim i&, myr&, arr, num&

dim d, k

for i = sheets.count to 1 step -1

if sheets(i).name <> "資料來源" then

sheets(i).delete

end if

next i

set d = createobject("scripting.dictionary")

myr = worksheets("資料來源").usedrange.rows.count

arr = worksheets("資料來源").range(cells(2, columnnum), cells(myr, columnnum))

for i = 1 to ubound(arr)

d(arr(i, 1)) = ""

next

k = d.keys

for i = 0 to ubound(k)

set conn = createobject("adodb.connection")

conn.open "provider=microsoft.jet.

oledb.4.0;extended properties=excel 8.

0;data source=" & thisworkbook.fullname

sql = "select * from [資料來源$] where " & title & " = '" & k(i) & "'"

worksheets.add after:=sheets(sheets.count)

with activesheet

.name = k(i)

for num = 1 to ubound(myarray)

.cells(1, num) = myarray(num, 1)

next num

.range("a2").copyfromrecordset conn.execute(sql)

end with

sheets(1).select

sheets(1).cells.select

selection.copy

worksheets(sheets.count).activate

activesheet.cells.select

selection.pastespecial paste:=xlpasteformats, operation:=xlnone, _

skipblanks:=false, transpose:=false

next i

conn.close

set conn = nothing

end sub

如下圖所示,插入一個控制元件按鈕,並指定巨集到剛才插入的模組**。

點選插入的按鈕控制元件,根據提示選擇標題行和要拆分的列欄位,本例選擇「姓名」欄位拆分,當然也可以選擇c列的「名稱」進行拆分,看實際需求。

**執行完畢後在工作簿後面會出現很多工作表,每個工作表都是單獨一個人的資料。具體如下圖所示:

注意:1)原始資料表要從第一行開始有資料,並且不能有合併單元格;

2)開啟工作簿時需要開啟巨集,否則將無法執行**。

17樓:匿名使用者

籠統性的提問最適合籠統的回答。

手動對所謂的「條件」進行篩選,並一一複製到別的sheet。

新建空白sheet,用公式對所謂的「條件」進行篩選。

當然最有效的方法非vba莫屬,**中自動根據條件抓取資料並將資料轉移至需要的sheet。

18樓:清風陪伴心相印

你這麼做的目的是什麼呢?如果是想檢視各個店面的資料的話,其實可以用資料透視表來做的,列印明細也可以點選資料透視表的,它也會自動新建一個**存放你需要檢視的資料

19樓:辦公小易

如何將一張工作表拆分成多個工作表?

如何把一個excel中的資料,按照條件分成若干個** 20

20樓:清風吧吧啦

比如你的資料在sheet1有三列,在bcd三列,那麼在sheet2選中三列輸入公式=if(sheet1!b2=某日期,offset(sheet1!a2,,1,3,1),""),shift+ctrl+enter三件確定,然後向下拉,最後將空格選中刪除。

21樓:鼎中人

假如都是6月份的話,假設定位時間所在的列為a列,2013-6-17 9:44所在的單元格為a2單元格,可以在空白列(如c列)中c2單元格中寫入公式:=day(a2) ,然後下拉,即在c列生成定位時間的日期(多少號)然後在以c列為單元格進行排序,最後按天分批覆制就好了。

22樓:閒拉呱

你這個做起來很複雜,首先在時間列假設是b列前邊插入一列

使用公式=text(int(value(b2)),"yyyy-mm-dd")把日期都提到前邊一列中,

23樓:匿名使用者

採用資料透視表 將日期做為頁欄位

資料透視表可以根據總表分解為不同日期的分表。

24樓:

把問題作為內容(郵件主題一定要包含「excel」,本人以此為依據辨別非垃圾郵件,以免誤刪)、excel樣表檔案(請特別注意:要03版的(如果是03以後的,把檔案「另存為」一下,型別框可以選擇03的),把現狀和目標效果表示出來)作為附件發來看下 [email protected]

25樓:

選中相對的列---點選工具---篩選新增按鈕,確定。請採納!

26樓:匿名使用者

按需求做幾個你要的資料透視表,然後只需要更新資料來源的資料,然後重新整理透視表即可。很方便的。

27樓:百年正道

使用資料透視表功能,可以實現!不過時間列需要新增一列!

28樓:匿名使用者

不太好辦。用公式那功夫真的早就複製貼上完了。。。。。你沒有必要折騰。。。

29樓:回憶似冷風

公式不知道有沒有,我知道一個相對感覺簡單的方法,就是你可以直接複製你的工作表,不是直接複製**,然後再刪除你不要的就行了卅 。

EXCEL中如何篩選大量重複的資料

風會教育 excel如何快速篩選重複資料 人生的董摃 用一個簡單的公式可以解決你的問題。在a 旁邊另起一列,在b1 格里輸入 countif a1 a1000,a1 其中1000 是a 列的行數,如果不到1000 或超過1000,請自行修改。這個公式的作用是統計a 列從第一行 a1 到最後一行 a1...

如何將Excel資料匯入MATLAB中

豆其英磨香 matlab如何匯入excel資料的方法如下 1 一xlsread 函式,比import簡單的多,具體語句 a xlsread yourfilename.xls 直接在matlab中定義矩陣,再複製貼上得了 定義矩陣就先定義個空的 比如一維 a zeros 1,n 這是1xn的 2 二維...

如何將Excel資料匯入MATLAB中

將excel中的資料匯入matlab中可以使用 xlsread 命令,也可用uiimport直接匯入 1.使用 xlsread命令 num xlsread filename num xlsread filename,sheet num xlsread filename,xlrange num xls...