「sample」シートにパスワード「****」でロックをかける
ただし、グループ開閉はさせたいとき、EnableOutliningをTrueにしておく
With Thisworkbook.Worksheets("sample") .EnableOutlining = True .Protect Password:="****", UserInterfaceOnly:=True End With
「sample」シートにパスワード「****」でロックをかける
ただし、グループ開閉はさせたいとき、EnableOutliningをTrueにしておく
With Thisworkbook.Worksheets("sample") .EnableOutlining = True .Protect Password:="****", UserInterfaceOnly:=True End With