[[20160525163037]]　『シート保護しながらの結合について』（たぬき）　ページの最後に飛ぶ

『シート保護しながらの結合について』（たぬき）

シート保護をしてるシート内のセルの結合を行うが為に調べてコード作ってみて、下記のコードで結合するまでは問題なく動くのですが、再度シート保護をかけるのがうまくいきません。コードのどこがおかしいのか教えて頂けないでしょうか。

Sub 結合()
Const PSWD = "sss"
ActiveSheet.Unprotect Password:=PSWD

  Selection.Merge
ActiveSheet.Protect Password:=PSWD, _
            EnableOutlining:=True, _
            Contents:=True, _
            UserInterfaceOnly:=True, _
            DrawingObjects:=False, _
            AllowFormattingCells:=True, _
            AllowFormattingColumns:=True, _
            AllowFormattingRows:=True, _
            AllowInsertingHyperlinks:=True, _
            AllowInsertingColumns:=True, _
            AllowInsertingRows:=True, _
            AllowSorting:=True, _
            AllowFiltering:=True
End Sub

＜使用 Excel：unknown、使用 OS：unknown ＞

 EnableOutlining
 はWorksheet.Protectメソッドの引数ではなく

 ActiveSheet.EnableOutlining = True
 とProtectとは別に設定するものではないのか？
（ねむねむ） 2016/05/25(水) 16:46

ねむねむさま

回答ありがとうございます。
教えて頂いた通り別にしたらうまくいきました。

大したコードではないとは思うのですが自分で理解できるように再確認致します。
ありがとうございました！
（たぬき） 2016/05/25(水) 16:53

コメント返信：

[ 一覧(最新更新順) ]

[[20160525163037]] 『シート保護しながらの結合について』（たぬき） ページの最後に飛ぶ

[[20160525163037]]　『シート保護しながらの結合について』（たぬき）　ページの最後に飛ぶ