亚洲欧美精品沙发,日韩在线精品视频,亚洲Av每日更新在线观看,亚洲国产另类一区在线5

<pre id="hdphd"></pre>

  • <div id="hdphd"><small id="hdphd"></small></div>
      學(xué)習(xí)啦>學(xué)習(xí)電腦>工具軟件>辦公軟件學(xué)習(xí)>Excel教程>Excel2007教程>

      Excel2007如何將無數(shù)據(jù)空列隱藏

      時(shí)間: 宇能938 分享

        在Excel操作中,我們有時(shí)需要自動(dòng)的隱藏某些空列,如何自動(dòng)的實(shí)現(xiàn)呢?這就需要用到VBA代碼,具體怎么做?對(duì)于新手來說還是有一定難度,怎么辦?下面學(xué)習(xí)啦給大家分享Excel2007將無數(shù)據(jù)空列隱藏的方法。

        Excel2007將無數(shù)據(jù)空列隱藏的方法

        打開Excel文件,設(shè)置表單控件按鈕并明確要隱藏列的數(shù)據(jù)范圍。

        同時(shí)按下ALT+F11鍵,在VBA代碼書寫界面寫下VBA代碼,如下。

        保存后,返回Excel SHEET表內(nèi),將表單按鈕指定到宏。

        點(diǎn)擊按鈕,直接運(yùn)行宏代碼,運(yùn)行后的效果如下,空列被隱藏了起來。

        對(duì)VBA代碼的解釋,隱藏區(qū)域內(nèi)的空列。

        Sub 運(yùn)行代碼()

        Dim Cel As Range

        For Each Cel In Worksheets("數(shù)據(jù)").Range("A1:Z1")

        If Cel = "" Then

        Cel.EntireColumn.Hidden = True

        Else

        Cel.EntireColumn.Hidden = False

        End If

        Next

        End Sub

        -------------------------------------------------------

        1.Sub后為宏的名稱,也為指定的名稱

        2.將Cel屬性定義為范圍

        3.在數(shù)據(jù)工作表A1:Z1范圍內(nèi)逐個(gè)的查找

        4.For next,如果單元格為空,則所在整列隱藏,如果不為空,則整列不隱藏。

        5.If then else end if語句

        6.End sub結(jié)束宏

        7.EntireColumn整列 EntireColumn整行 Hidden隱藏

        8.Then 和Else的語句必須在下一行


      猜你感興趣:

      1.excel2007取消隱藏列的設(shè)置教程

      2.2007excel表格隱藏后無法取消隱藏

      3.excel怎么隱藏列和取消隱藏列

      4.excel隱藏列怎么不能取消隱藏

      2475503