欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

打開(kāi)APP
userphoto
未登錄

開(kāi)通VIP,暢享免費電子書(shū)等14項超值服

開(kāi)通VIP
跟煙花入門(mén)VBA之42:Sheets對象

 

工作簿對象介紹完了,接下來(lái)我們講講Sheets對象。

  Sheets對象是指定的或者活動(dòng)工作簿中所有工作表的集合。

  Sheets集合可以合包含工作簿中的所有工作表(圖表工作表和工作表)。

  今天先講講Sheets對象的屬性。


  Count屬性

  返回一個(gè) Long 值,它代表集合中對象的數量。

  示例:

   MsgBox '當前Sheets對象中成員數量:' & Sheets.Count

   Sheets.Add Type:=xlWorksheet

   MsgBox '插入一個(gè)工作表后,集合中成員數量為:' & Sheets.Count

   Sheets.Add Type:=xlChart

   MsgBox '插入一個(gè)圖表工作表后,集合中成員數量為:' & Sheets.Count


   代碼先顯示當前Sheets對象中成員數量,然后再分別插入工作表,圖表工作表并在插入完成后顯示成員數量。


  Parent屬性

  返回指定對象的父對象,只讀。

  Sheets對象隸屬于工作簿對象,so,Parent屬性返回的是包含該Sheets對象的工作簿

  示例:

   MsgBox Sheets.Parent.Name

  

  Item 屬性

  從集合中返回一個(gè)對象。

  語(yǔ)法:Item(Index)

  Index可為對象的名稱(chēng)或索引號。

  之前在講Workbooks時(shí)有提到1”1”的區別,這里同樣適用。

  由于這個(gè)是缺省屬性,所以可以省略。

  Sheets(1)Sheets.item(1)是等價(jià)的。

  示例:

   Dim sht As Object

   Dim str As String

   If Sheets.Count > 0 Then

    str = '當前工作簿中有以下工作表:' & vbCrLf

    For Each sht In Sheets

     str = str & sht.Name & vbCrLf

    Next

    MsgBox str

   End If

  通過(guò)對話(huà)框顯示當前工作簿中Sheets集合中所有成員的名稱(chēng)


  Visible 屬性

  通過(guò)設置True或False,確定對象是否可見(jiàn)。

  隱藏工作表時(shí)需要注意的是,一個(gè)工作簿中,必須有一個(gè)工作表可見(jiàn)。

  除非設置工作簿的isAddin屬性,這樣不光工作表不可見(jiàn),就連工作簿也不可見(jiàn)。
  在使用這個(gè)屬性設置隱藏時(shí),可以批量(注意保留一個(gè)可見(jiàn))
  Sheets(Array( 2, 3, 4)).Visible = False
  如果想逆向再操作,批量取消隱藏,估計會(huì )想當然的用Sheets(Array( 2, 3, 4)).Visible = True。這樣就是萬(wàn)萬(wàn)不能的呢。
  取消就挨個(gè)來(lái)實(shí)現,為什么呢?
  有興趣的童鞋可以動(dòng)手試試,你可以一次選中二個(gè)工作表(假設當前工作簿中有3個(gè)工作表),右鍵隱藏。
  然后你再試試右鍵取消隱藏,能否在對話(huà)框中實(shí)現一次取消多個(gè)?

  
VPageBreaks 屬性

  返回一個(gè) VPageBreaks 集合,它代表工作表上的垂直分頁(yè)符。只讀。

  可以通過(guò)代碼來(lái)對垂直分頁(yè)符集合的操作,這里不做介紹,只需知道有這么個(gè)集合。

  

  HPageBreaks 屬性

  返回一個(gè) HPageBreaks 集合,它代表工作表上的水平分頁(yè)符。只讀。

  示例:

   Dim str As String

   str = '水平分頁(yè)符:' & ActiveSheet.HPageBreaks.Count & vbCrLf

   str = str & '垂直分頁(yè)符:' & ActiveSheet.VPageBreaks.Count

   MsgBox str


  Application 屬性

  如果不使用對象識別符,則該屬性返回一個(gè) Application 對象,該對象表示 Microsoft Excel 應用程序。
  如果使用對象識別符,則該屬性返回一個(gè)表示指定對象(可對一個(gè) OLE 自動(dòng)操作對象使用本屬性來(lái)返回該對象的應用程序)創(chuàng )建者的 Application 對象。
  使用OLE自動(dòng)化操作時(shí)可看出區別。


補充知識點(diǎn):

  Thisworkbook,表示其中正在運行當前宏代碼的工作簿(加載宏內部只能通過(guò)該屬性來(lái)引用加載宏自身)。


  ActiveWorkbook,表示當前的活動(dòng)工作簿。在加載宏內部引用該屬性只會(huì )返回調用該加載宏的工作表。如果沒(méi)有活動(dòng)工作簿,則返回Nothing。


  ActiveSheet,代表活動(dòng)工作簿中或指定的窗口或工作簿中的活動(dòng)工作表(最上面的工作表)。如果沒(méi)有活動(dòng)的工作表,則返回 Nothing。

 

本站僅提供存儲服務(wù),所有內容均由用戶(hù)發(fā)布,如發(fā)現有害或侵權內容,請點(diǎn)擊舉報。
打開(kāi)APP,閱讀全文并永久保存 查看更多類(lèi)似文章
猜你喜歡
類(lèi)似文章
Worksheet對象應用大全(2)-應用進(jìn)階
Excel Application對象應用大全
Sheets集合與Worksheets集合的區別
VBA常用對象概述(轉載)
VBA|Excel對象、事件、對象的選擇和引用
如何正確學(xué)習VBA,才能省心省力又高效?
更多類(lèi)似文章 >>
生活服務(wù)
分享 收藏 導長(cháng)圖 關(guān)注 下載文章
綁定賬號成功
后續可登錄賬號暢享VIP特權!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服

欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久