讀古今文學網 > 別怕,ExcelVBA其實很簡單 > 練習小課堂 >

練習小課堂

(1)使用參數和不使用參數時,複製的工作表名稱一樣嗎?如果想把「工資表」複製到「出勤登記表」前,更名為「工資表備份」,你知道完整的程序應該怎樣寫嗎?試一試,寫下來。

(2)動手寫一個程序,將「工資表」複製到新工作簿中,工作表名為「工資表備份」,同時將文件保存到D盤根目錄下,文件名稱為「7月工資表xls」,要求保存工作簿後,原工作簿仍可以操作。

代碼代碼說明聲明過程複製「工資表」到新工作簿把複製的工作表更名為「工資表備份」將工作簿另存為到D盤,文件名為「7月工資表.xls」,保存後原工作簿可修改關閉Copy方法生成的工作簿,不保存更改結束過程
參考答案

(1)使用參數複製工作表時,將把工作表複製到同一工作簿中,Excel自動為工作表命名,與原工作表不同。不使用參數複製工作表時,將把工作表複製到新工作簿中,名稱與原來相同。

(2)代碼

移動工作表

移動工作表的操作與複製工作表類似。

隱藏或顯示工作表

可以設置工作表的Visible屬性顯示或隱藏該工作表,如圖4-24所示。

圖4-24 通過屬性窗口隱藏或顯示工作表

無論以何種方式隱藏了「工作表」工作表,想用代碼顯示它,可以用下面4句代碼中的任意一句:

獲取工作表的數目

想知道當前工作簿中共有幾張工作表,可以讀取Worksheets的Count屬性值,運行結果如圖4-25所示。

圖4-25 求工作表數量

4.4.3 Sheets與Worksheets

有人說,它們相同

有人說,Sheets同Worksheets沒有區別,如圖4-26所示。

圖4-26 在立即窗口中執行命令

但是,它們相同嗎

其實Sheets與Worksheets代表兩種不同的集合。

Excel裡一共有4種不同類型的工作表,Sheets表示工作簿裡所有類型的工作表的集合,而Worksheets只表示普通工作表的集合,如圖4-27所示。

圖4-27 Sheets與Worksheets集合的區別