取工作表名稱再覆制多次 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 取工作表名稱再覆制多次

返回列表下一主題上一主題發帖

[發問] 取工作表名稱再覆制多次

中學生 Rank: 2

帖子: 262
主題: 8
精華: 0
積分: 280
點名: 16
作業系統: xp
軟體版本: Office 2007
閱讀權限: 20
性別: 男
來自: HK
註冊時間: 2015-8-11
最後登錄: 2024-3-28

2016猴年全勤獎章

1^# 跳轉到 »

發表於 2015-8-20 23:51 | 顯示全部帖子

你的代碼重覆填在Sheets("aa").Range("B1").Resize(20)
當然衹會見到最後一頁的頁名, 另外由7~最後一頁的頁名都是數字?

中學生 Rank: 2

帖子: 262
主題: 8
精華: 0
積分: 280
點名: 16
作業系統: xp
軟體版本: Office 2007
閱讀權限: 20
性別: 男
來自: HK
註冊時間: 2015-8-11
最後登錄: 2024-3-28

2016猴年全勤獎章

2^#

發表於 2015-8-21 10:46 | 顯示全部帖子

我有點奇怪,為甚麼missbb先進有過一句 Dim shtname As Integer, 是不是還有後期引用 sheets.name ?
但宣告成整數!

中學生 Rank: 2

帖子: 262
主題: 8
精華: 0
積分: 280
點名: 16
作業系統: xp
軟體版本: Office 2007
閱讀權限: 20
性別: 男
來自: HK
註冊時間: 2015-8-11
最後登錄: 2024-3-28

2016猴年全勤獎章

3^#

發表於 2015-8-21 17:02 | 顯示全部帖子

for i = 你的下標 to  你的上標
  for j = 1 to 20
[a1]=join([a1], 你的物件)
   next i,j

靜思自在 : 靜坐常恩己過、閒談莫論人非。

返回列表下一主題上一主題