Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


73569 / 76732 ←次へ | 前へ→

【7638】Re:Protect UserInterFaceonly:=Trueにつ...
発言  ろば  - 03/9/11(木) 0:17 -

引用なし
パスワード
   ▼BOTTA さん:
>ろばさん、こんにちは。
>UserInterFaceOnlyは、一度保存してしまうと無効になるようです。
>
>Private Sub Workbook_Open()
>  Dim i As Integer
>
>  For i = 1 To Sheets.Count
>    ' ↓一度解除して
>    Sheets(i).Unprotect ("password")
>    ' ↓再度、Protect
>    Sheets(i).Protect UserInterFaceOnly:=True, Password:="password"
>  Next i
>End Sub
>
>としてみては。

通常、ユーザフォーム上のオブジェクトを使って、フォームへの
書き込み等をしますので、
Sub UserForm_Initialize()プロシージャに
Sheets(i).Protect UserInterFaceOnly:=True, Password:="password"
を書きましたら、閉じて開いても、VBAを使っての書き込みができたので
取り合えず、用が足りました。
しかし、本来はPrivate Sub Workbook_Open()に書くべきなのでしょうか...?

0 hits

【7624】Protect UserInterFaceonly:=Trueについて ろば 03/9/10(水) 14:45 質問
【7626】Re:Protect UserInterFaceonly:=Trueについて INA 03/9/10(水) 16:36 回答
【7629】Re:Protect UserInterFaceonly:=Trueにつ... Asaki 03/9/10(水) 17:18 発言
【7630】Re:Protect UserInterFaceonly:=Trueにつ... ろば 03/9/10(水) 18:28 お礼
【7631】Re:Protect UserInterFaceonly:=Trueにつ... BOTTA 03/9/10(水) 18:34 回答
【7632】Re:Protect UserInterFaceonly:=Trueにつ... Asaki 03/9/10(水) 19:25 発言
【7633】Re:Protect UserInterFaceonly:=Trueにつ... BOTTA 03/9/10(水) 20:10 お礼
【7635】Re:Protect UserInterFaceonly:=Trueにつ... INA 03/9/10(水) 20:52 回答
【7637】Re:Protect UserInterFaceonly:=Trueにつ... Asaki 03/9/10(水) 21:32 回答
【7638】Re:Protect UserInterFaceonly:=Trueにつ... ろば 03/9/11(木) 0:17 発言
【7639】Re:Protect UserInterFaceonly:=Trueにつ... INA 03/9/11(木) 8:18 回答

73569 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free