vba,將特定Sheet名稱移到最後?

2015-08-25 7:00 am
請教VBA高手,
(1)excel,內有很多個Sheet,名稱分別為合計,地址,商品,數量.....工資.
(2)Sheet為合計的順序擺第一個,合計內有VBA 控制一些動作.
問題:我想製作一個按鍵,將Sheet名稱為"地址",移到這份excel Sheet最後一個,該如何做?

回答 (2)

2015-08-25 11:11 am
✔ 最佳答案
Sheets("地址").Move After:=Sheets(Sheets.Count)
2015-08-25 3:42 pm
Sub 巨集1()
For i = 1 To Sheets.Count
If Sheets(i).Name = "地址" Then Sheets("地址").Move After:=Sheets(Sheets.Count)
Next
End Sub


收錄日期: 2021-05-04 01:59:26
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20150824230023AAlerRt

檢視 Wayback Machine 備份