實用：批量生成工作簿、工作表和文件夾

實用：批量生成工作簿、工作表和文件夾

1、批量生成工作表

簡要說明：生成數(shù)據(jù)透視表將文本拖動到篩選字段顯示報表篩選頁

2、批量生成工作簿

簡要說明：在A列輸入要生成的工作簿名稱，然后鼠標(biāo)右擊任意工作表標(biāo)簽，查看代碼：

在VBE界面中輸入以下代碼：

Sub newbooks()Dim i&, p$, temp$On Error Resume Next '忽略代碼運行中的錯誤，避免存在異常名稱工作簿等問題時，代碼運行中斷。Application.ScreenUpdating = False '關(guān)閉屏幕刷新p = ThisWorkbook.Path & "\" '取得當(dāng)前工作薄所在路徑For i = 1 To Cells(Rows.Count, 1).End(3).Row '循環(huán)讀取A列數(shù)據(jù)temp = Cells(i, 1) & ".xlsx" 'temp是完整的含文件后綴的工作薄名稱With Workbooks.Add '新建工作薄.SaveAs p & temp '保存工作薄，p & temp是要保存的文件的名稱.Close False '關(guān)閉工作薄End WithNextApplication.ScreenUpdating = True '恢復(fù)屏幕刷新End Sub

按F5鍵執(zhí)行代碼，即可生成指定名稱的工作簿。

3、批量生成文件夾

簡要說明：用公式=”MD “&A2生成批處理命令粘貼到記事本將后綴名.txt修改為.bat，雙擊注意：MD后面有一個空格，不要漏掉

4、批量生成……

打開你的Word，輸入以下公式，按回車，說說你看到了什么？=lorem(20,99)

版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。

版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。