Re: [VBA ] EXCEL 新增分頁命名的問題
※ 引述《yaochi (ddd)》之銘言:
: ※ 引述《m9556 (紫色天平Boy)》之銘言:
: : 你先察看Cells(1,3)這一欄的文字,是否有無法用於命名的文字,
: : 不確定的話,可以將該cell的文字,用一個純文字檔命名看看,
: : 或許可以知道為什麼~~
: : 建議 sheetname =cstr(Cells(1, j)) <<這樣改
: : 我的拙見~~參考看看~~
: MsgBox "sheetname= " & sheetname
: 我在 sheetname 後加一行 MsgBox "sheetname= " & sheetname
: 當 j=3 的時候 讀不到sheetname 而 Cells(1,3) 的值
: 為 bbbbbb 之類的純字串 並無 /.% ...等 特殊符號
: 將 Cells(1,j) 改為 CStr(Cells(1,j)) 依然無效
: 請高手幫幫忙 感謝....
你的問題在於跑迴圈的時候cells(1,j)的值並不會傳到sheetname中..
假設你原本的資料在sheet1,則在原本的程式中加入:
(上略)
sheet1.Activate '在這個位置加入即可
sheetname = Cells(1, j)
(下略)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.84.11.70
推
10/20 09:30, , 1F
10/20 09:30, 1F
推
10/20 09:31, , 2F
10/20 09:31, 2F
→
10/20 09:31, , 3F
10/20 09:31, 3F
推
10/20 16:28, , 4F
10/20 16:28, 4F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 4 之 5 篇):