討論串[VBA ] EXCEL 新增分頁命名的問題
共 5 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓5(5推 0噓 1→)留言6則,0人參與, 最新作者Marty (DNA探針)時間18年前 (2007/10/20 10:17), 編輯資訊
0
0
0
內容預覽:
引述《yaochi (ddd)》之銘言:. --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 219.84.11.70. '原PO程式碼. Sub 新增分頁(). Dim sheetname As String. Dim j As Integer. For j = 2 To
(還有352個字)

推噓3(3推 0噓 1→)留言4則,0人參與, 最新作者Marty (DNA探針)時間18年前 (2007/10/20 00:10), 編輯資訊
0
0
0
內容預覽:
你的問題在於跑迴圈的時候cells(1,j)的值並不會傳到sheetname中... 假設你原本的資料在sheet1,則在原本的程式中加入:. (上略). sheet1.Activate '在這個位置加入即可. sheetname = Cells(1, j). (下略). --. 發信站: 批踢

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者yaochi (ddd)時間18年前 (2007/10/19 22:37), 編輯資訊
0
0
0
內容預覽:
MsgBox "sheetname= " & sheetname. 我在 sheetname 後加一行 MsgBox "sheetname= " & sheetname. 當 j=3 的時候 讀不到sheetname 而 Cells(1,3) 的值. 為 bbbbbb 之類的純字串 並無 /.% .

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者m9556 (紫色天平Boy)時間18年前 (2007/10/19 22:20), 編輯資訊
0
0
0
內容預覽:
你先察看Cells(1,3)這一欄的文字,是否有無法用於命名的文字,. 不確定的話,可以將該cell的文字,用一個純文字檔命名看看,. 或許可以知道為什麼~~. 建議 sheetname =cstr(Cells(1, j)) <<這樣改. 我的拙見~~參考看看~~. --. 發信站: 批踢踢實業

推噓0(0推 0噓 1→)留言1則,0人參與, 最新作者yaochi (ddd)時間18年前 (2007/10/19 20:48), 編輯資訊
0
0
0
內容預覽:
請教一下各位. 我想要依照儲存格的名稱 命名新的分頁. 分別是 位址 Cells(1,2) Cells(1,3) Cells(1,4) ............. 寫了一段主體程式如下. 在 j=2 (第一次回圈) 還正常 但是到 j=3 的時候. 就會卡在 ### 那一行 錯誤碼 1004 不知道
(還有88個字)
首頁
上一頁
1
下一頁
尾頁