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

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

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

      Excel中使用VBA函數(shù)快速隱藏鎖定單元格的操作方法

      時(shí)間: 曉生931 分享

        excel使用vba來(lái)快速隱藏鎖定單元格,具體該怎么去進(jìn)行的呢?今天,學(xué)習(xí)啦小編就教大家在Excel中使用VBA函數(shù)快速隱藏鎖定單元格的操作方法。

        Excel中使用VBA函數(shù)快速隱藏鎖定單元格的操作步驟:

        首先讓我們打開(kāi)一個(gè)工作樣表作為例子。

        進(jìn)入vba編輯器,插入一個(gè)新的模塊,在編輯器中輸入以下代碼:

        Sub 鎖定和隱藏公式()

        If ActiveSheet.ProtectContents = True Then

        MsgBox "工作表已保護(hù)!"

        Exit Sub

        End If

        Worksheets("Sheet1").Range("A1").CurrentRegion.Select

        Selection.Locked = False

        Selection.FormulaHidden = False

        Selection.SpecialCells(xlCellTypeFormulas).Select

        Selection.Locked = True

        Selection.FormulaHidden = True

        Worksheets("Sheet1").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

        Worksheets("Sheet1").EnableSelection = xlNoRestrictions

        End Sub

        一開(kāi)始我們需要判斷本工作表是否在保護(hù)狀態(tài),如果活動(dòng)工作薄,也就是當(dāng)前工作薄是已經(jīng)鎖定保護(hù)的狀態(tài),則彈出信息對(duì)話框提示工作表已保護(hù)。

        接著選取sheet1工作薄當(dāng)前活動(dòng)區(qū)域單元格。大家還記得CurrentRegion函數(shù)的作用嗎?CurrentRegion函數(shù)是定位活動(dòng)(指定)單元格區(qū)域,我們這里的語(yǔ)句是選取指定的單元格區(qū)域。并將其鎖定隱藏設(shè)定為false。

        然后下面的語(yǔ)句 Selection.SpecialCells(xlCellTypeFormulas).Select是選擇含有公式的單元格,并將其設(shè)置為鎖定和隱藏公式,其值為TRUE。

        最后兩句代碼定義的是保護(hù)工作薄中的圖像,內(nèi)容不被修改和允許選取單元格。

        添加按鈕指向這個(gè)宏,在開(kāi)發(fā)工具中點(diǎn)擊插入按鈕命令,并編輯指向?yàn)檫@個(gè)宏,點(diǎn)擊來(lái)運(yùn)行這個(gè)宏,查看結(jié)果。


      Excel中使用VBA函數(shù)快速隱藏鎖定單元格的操作方法相關(guān)文章:

      1.Excel中使用vba快速隱藏鎖定單元格的操作方法

      2.excel 鎖定和隱藏公式的方法

      3.Excel中進(jìn)行將編輯欄函數(shù)公式隱藏的操作方法

      4.Excel中使用vba循環(huán)語(yǔ)句輸入單元格的操作方法

      5.excel2007快速鎖定有公式單元格的方法

      6.excel單元格公式鎖定的方法

      7.excel單元格隱藏公式的方法

      2327140