数式を非表示にしてシートを保護

 

 

Sub test()

    ' 数式を非表示にしてシートを保護


        With Sheets(1)
        .Range("A2").CurrentRegion.SpecialCells(xlCellTypeFormulas).Select
        Selection.FormulaHidden = True
        .Protect
    End With

 

End Sub

 
 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

 

関連記事