[VBA ] EXCEL 新增分頁命名的問題

看板Visual_Basic作者 (ddd)時間18年前 (2007/10/19 20:48), 編輯推噓0(001)
留言1則, 1人參與, 最新討論串1/5 (看更多)
請教一下各位 我想要依照儲存格的名稱 命名新的分頁 分別是 位址 Cells(1,2) Cells(1,3) Cells(1,4) ............ 寫了一段主體程式如下 在 j=2 (第一次回圈) 還正常 但是到 j=3 的時候 就會卡在 ### 那一行 錯誤碼 1004 不知道原因為何 請高手指導一下 感謝 Sub 新增分頁() Dim sheetname As String Dim j As Integer For j = 2 To 4 sheetname = Cells(1, j) ### With Worksheets.Add .Name = sheetname End With Next j End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 122.121.227.123

10/19 20:52, , 1F
還是有比較聰明好的寫法嗎????
10/19 20:52, 1F
文章代碼(AID): #176AUFt0 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #176AUFt0 (Visual_Basic)