[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『シート保護しながらの結合について』(たぬき)
シート保護をしてるシート内のセルの結合を行うが為に調べてコード作ってみて、下記のコードで結合するまでは問題なく動くのですが、再度シート保護をかけるのがうまくいきません。コードのどこがおかしいのか教えて頂けないでしょうか。
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
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.