|
β様
>この質問を出されたのかがわからなかったので
すみません。説明が下手で。
最初は、注文書Sheet[E2,E4,G4] 外を一般機能を使い
保護解除→マクロでセルに書き込み→再保護と考えていました。
β様が
保護解除→マクロでセルに書き込み→再保護
>って面倒じゃないですか?
>ThisWorkbookモジュールに
>Private Sub Workbook_Open()
> '注文書シートロック UserInterfeceOnly付
> Sheets("注文書").Protect Password:="111", DrawingObjects:=True, _
> Contents:=True, Scenarios:=True, UserInterfaceOnly:=True
> End Sub
>こう書いておくと、操作者からはプロテクト、マクロは自由自在で
>いちいち、解除/再保護する必要がなくなりますよ。
と教えてくれました。
私は、VBAは勉強中なので「こんなやり方があったんだ」と思い
β様のやり方で、注文書Sheet[E2,E4,G4]だけをContents:=Falseに
すれえば良い思って。
'注文書シートロック UserInterfeceOnly付
Sheets("注文書").Protect Password:="111", DrawingObjects:=True, _
Contents:=True, Scenarios:=True, UserInterfaceOnly:=True
Sheets("注文書").Range("E2.E4,G4").Contents:=False
End Sub
としたんですがダメでした。
注文書シート保護をかけても("E2.E4,G4")セルは操作者の入力をさせたい
のです。
宜しくおねがいします
|
|