根據每張表格的單元格值命名所有表格

我以前使用過這個代碼，但只是將其更改爲另一個單元格，現在正在接收運行時錯誤'1004'對象' _Worksheet'失敗。不知道是什麼原因造成這種根據每張表格的單元格值命名所有表格

Dim ws As Worksheet 
For Each ws In ActiveWorkbook.Worksheets 
ws.Name = ws.Range("FW1") 
Next

2017-06-06 Taylor D

有許多字符這在表單名稱中是不允許的。確保這些單元中沒有這些單元。空白單元格也會導致錯誤。 –

所有工作表的單元格FW 1填充了字母數字文本 –

建議您試試這個'ws.Name = WorksheetFunction.Clean（ws.Range（「FW1」））' – PeterT

的表的名稱必須是一個字符串，你給它分配一個範圍的對象，所以你必須要做到這一點，而不是：

ws.Name = ws.Range("FW1").value

2017-06-06 23:03:29 Ibo

回答