作者WilliamChung (N/A)
看板Visual_Basic
標題Re: [VBA ] 如何快速鍵切換sheet
時間Sun Oct 30 23:50:39 2011
錄製巨集的對話方塊，一共有四個項目分別為：
1.巨集名稱：______ (<-
文字方塊)
2.快速鍵：Ctrl+___ (<-
文字方塊)
3.將巨集儲存在： (<-
下拉式選單)
(1)
個人巨集活頁簿
(2)新的活頁簿
(3)現用活頁簿
4.描述：__________ (<-
文字方塊)
你只需要將巨集儲存在
個人巨集活頁簿，
只要是在同一台電腦使用應用程式Excel，
開啟任何Excel檔案就都有這個巨集可以使用。
若你是直接開啟
VBA Editor 編輯巨集的話，
請將該巨集的模組插入在專案
VBA Project (PERSONAL.XLSB) 底下，
此動作即為將巨集存放在個人巨集活頁簿中。
※ 引述《tenway (等待是必要的)》之銘言：
: 再請教
: 要怎樣讓這個巨集每次開啟EXCEL時
: 就default有這個聚集阿?
: ※ 引述《ClubT ()》之銘言：
: : 先錄製2個巨集
: : Sub NextSheet() '跳到下一個sheet
: : If Application.ActiveSheet.Index < Sheets.Count Then
: : Sheets(Application.ActiveSheet.Index + 1).Select
: : Else
: : Sheets(1).Select
: : End If
: : End Sub
: : Sub PreSheet() '跳到上一個sheet
: : If Application.ActiveSheet.Index > 1 34mThen
: : Sheets(Application.ActiveSheet.Index - 1).Select
: : Else
: : Sheets(Sheets.Count).Select
: : End If
: : End Sub
: : 如果不要跳回第一個或最後一個sheet就自己把else之後的拿掉
: : 然後回到EXCEL編輯這2個巨集的快速鍵 (http://tinyurl.com/3q7kp6o )
: : 這樣就OK囉 ^^
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.160.174.152
※ 編輯: WilliamChung 來自: 118.160.174.152 (10/31 00:22)