怎么根據(jù)模板和目錄名批量建立工作簿？
網(wǎng)友解答: 有一個(gè)非常簡(jiǎn)單的方法，就是利用數(shù)據(jù)透視表進(jìn)行新建工作表首先我們選擇插入數(shù)據(jù)透視表，插入后我們將工作名稱拖動(dòng)到篩選字段然后在數(shù)據(jù)透視表的選項(xiàng)中選擇顯示報(bào)表篩選頁(yè)，點(diǎn)擊確定然后E
有一個(gè)非常簡(jiǎn)單的方法，就是利用數(shù)據(jù)透視表進(jìn)行新建工作表
首先我們選擇插入數(shù)據(jù)透視表，插入后我們將工作名稱拖動(dòng)到篩選字段
然后在數(shù)據(jù)透視表的選項(xiàng)中選擇顯示報(bào)表篩選頁(yè)，點(diǎn)擊確定
然后Excel就會(huì)根據(jù)數(shù)據(jù)進(jìn)行表格名稱的創(chuàng)建
我是Excel從零到一關(guān)注我持續(xù)分享更多Excel技巧
沒(méi)看到是新建工作薄，這個(gè)更簡(jiǎn)單，主需要在A列放置需要新建的工作薄名稱，我這里以數(shù)字代替名稱然后點(diǎn)擊vba編輯器，進(jìn)入vba編輯界面，然后選擇插入一個(gè)模塊，復(fù)制如下代碼點(diǎn)擊運(yùn)行即可，新建的工作薄都在d盤
Sub 拆分在D盤()
Dim i
For i = 1 To WorksheetFunction.CountA([a:a])
Cells(i, 1).Copy
ActiveWorkbook.SaveAs "D:" & i & ".xlsx"
ThisWorkbook.Activate
Next i
End Sub