麻辣家族討論版版 » Excel程式區 » 請教如何設定工作表名稱為變數

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

[發問] 請教如何設定工作表名稱為變數

中學生 Rank: 2

帖子: 150
主題: 40
精華: 0
積分: 215
點名: 0
作業系統: windows xp
軟體版本: sp3
閱讀權限: 20
註冊時間: 2013-7-15
最後登錄: 2024-10-2

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2014-3-29 11:37 | 只看該作者

[發問] 請教如何設定工作表名稱為變數

請教如何設定工作表名稱為變數

下列程式,我想將10302設為變數要如何更改程式碼
      Dim x2 As Worksheet
      Set x2 = Sheets("10302")
      x2.Select

謝謝高手大大幫忙

樓主熱帖

收藏

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

2^#

發表於 2014-3-29 17:48 | 只看該作者

回復 1# blue2263
請參考。
Sub test()
Dim x2 As Worksheet
Dim sh As String
sh = "10302"
Set x2 = Sheets(sh)
x2.Select
End Sub

[b]Kubi[/b]

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

3^#

發表於 2014-3-29 17:58 | 只看該作者

不過既然宣告x2為工作表物件變數，如同版大的程式碼直接取用，可省卻多此一舉的變數程序。

[b]Kubi[/b]

中學生 Rank: 2

帖子: 150
主題: 40
精華: 0
積分: 215
點名: 0
作業系統: windows xp
軟體版本: sp3
閱讀權限: 20
註冊時間: 2013-7-15
最後登錄: 2024-10-2

4^#

發表於 2014-3-29 19:05 | 只看該作者

感謝k大解答,己解決我的問題,謝謝

靜思自在 : 是非當教育，讚美作警惕。

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