方法
雙擊打開安裝在桌面的Excel。
進入主頁，在A1-A6依次輸入1月銷售表、2月銷售表、3月銷售表、4月銷售表、5月銷售表、6月銷售表。
點擊“插入工作表”。
目標是把Sheet1-Sheet6變成“1月銷售表-6月銷售表”。
按下ALT+F11，打開VBA窗口。
單擊“插入——模塊”。
調出“代碼”輸入框，輸入如下代碼：
Sub 按A列數據修改表名稱()On Error Resume Next '忽略錯誤繼續執行VBA代碼,避免出現錯誤消息Application.Calculation = xlCalculationManual '手動重算Dim i%For i = 1 To Sheets.CountSheets(i).Name = Cells(i, 1).TextNextOn Error GoTo 0 '恢復正常的錯誤提示Application.Calculation = xlCalculationAutomatic '自動重算End Sub
點擊“運行-運行子過程/用戶窗體”。
回到Excel，會發現成功批量重命名工作表。
聲明：本網頁內容旨在傳播知識，若有侵權等問題請及時與本網聯系，我們將在第一時間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com
Copyright ? 2019-2025 51dongshi.com 版權所有
違法及侵權請聯系：TEL:177 7030 7066 E-MAIL:11247931@qq.com 本站由北京市萬商天勤律師事務所王興未律師提供法律服務
