- 帖子
- 22
- 主題
- 8
- 精華
- 0
- 積分
- 30
- 點名
- 0
- 作業系統
- windows
- 軟體版本
- 7.0
- 閱讀權限
- 10
- 註冊時間
- 2014-4-6
- 最後登錄
- 2024-3-31
|
數字名稱工作表
小弟目前碰到一個問題
就是小弟想使用vba自動新增不定數量的工作表
而且工作表的名稱為數字，並且在建立好該工作表後在該工作表之A1儲存格填入資料
小弟以下列寫法一直有問題
For i =1 to num
uRng = Workbooks("a.xlsm").Worksheets("代號").cell(i,1) <<<<<<<這邊的儲存格放的都是數字例如1111、132、58752
Workbooks("a.xlsm").Worksheets.Add.Name = uRng
Workbooks("a.xlsm").Worksheets("uRng").cell(1,1) = 某些資料 <<<<<這一段一直顯示有問題
將上一段改成Workbooks("a.xlsm").Worksheets(uRng).cell(1,1) = 某些資料 <<<<<<這樣還是錯
如果改成 Workbooks("a.xlsm").Worksheets(str(uRng)).cell(1,1) = 某些資料<<<<<<<這樣還是錯@@~~~~
Next
請問各位大大小弟到底哪邊弄錯了
懇請指導謝謝 |
|
發表於 2015-11-1 23:59
| 
