excel中使用vba修改預設工作表名稱
工具/原料
excel2013
更多經驗請關注,如果幫到了你,請在上方給個投票謝謝支援。 好人一生平安。
先頂後看年薪百萬,如果幫到了你,幫忙給個好評,這對小編很重要,萬分感謝。
方法/步驟
首先我們開啟一個工作樣表作為例子。
工作樣表中的工作表標籤,一個是5月工資,一個是sheet1預設工作表名稱,我們使用vba來修改工作表名稱,並且在每次預設開啟時就會修改掉。
我們使用alt+f11組合快捷鍵進入vbe編輯器,插入一個新的模組,並在模組中輸入以下程式碼:
Private WithEvents xla As Application
我們輸入了這段程式碼是在thisworkbook物件中輸入。
thisworkbook是整個工作薄物件,其有一個workbook類屬性,大家都知道,在輸入withevents是指新建一個應用程式類,對其可設定其方法。
我們這裡設定其為新建工作表。
在sub過程中輸入以下程式碼:
dim i as integer
for i =1 to wb.sheets.count
wb.sheets(i).name = "我是新工作表" & i
next
最後,我們需要將Private Sub xla_NewWorkbook(ByVal Wb As Workbook)過程放入workbook類中去,在開啟工作薄時自動執行。set xla as application
注意事項
謝謝你的投票。