Excel VBA質問箱 IV

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

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


45507 / 76732 ←次へ | 前へ→

【36218】シートの保護をVBAで書くと・・
質問  an E-MAIL  - 06/3/25(土) 10:42 -

引用なし
パスワード
   いつもお世話になっています。
昨日3枚のシートの保護をかけて別ファイルにそのシートを
コピーし保存するマクロを書いて実行しました。
2枚のシートに保護はかかったのですが、3枚目は
保護されませんでした。
また、ロック解除されているセル以外は、選択もできない
設定にしましたが、保存されたファイルを確認すると
選択出来てしまっています。(入力などは出来ませんが、、)
これはエクセル(2002)の仕様なのでしょうか?

お分かりになる方がいらっしゃいましたら
教えていただけると助かります。

記録マクロ---------------------------------------------------------------

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
  ActiveSheet.EnableSelection = xlUnlockedCells
  Sheets("Sheet2").Select
  ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
  ActiveSheet.EnableSelection = xlUnlockedCells
  Sheets("Sheet3").Select
  ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
  ActiveSheet.EnableSelection = xlUnlockedCells
  ActiveWorkbook.SaveAs Filename:= _
    "C:\Documents and Settings\Owner\My Documents\test1.xls", FileFormat:= _
    xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
    , CreateBackup:=False

------------------------------------------------------------------
3 hits

【36218】シートの保護をVBAで書くと・・ an 06/3/25(土) 10:42 質問
【36225】Re:シートの保護をVBAで書くと・・ yuu1 06/3/25(土) 13:51 回答
【36242】Re:シートの保護をVBAで書くと・・ an 06/3/25(土) 18:20 お礼
【36249】Re:シートの保護をVBAで書くと・・ yuu1 06/3/25(土) 23:56 回答
【36264】Re:シートの保護をVBAで書くと・・ an 06/3/27(月) 11:21 お礼
【36285】Re:シートの保護をVBAで書くと・・ yuu1 06/3/27(月) 15:44 回答
【36313】Re:シートの保護をVBAで書くと・・ an 06/3/28(火) 12:01 質問
【36450】Re:シートの保護をVBAで書くと・・ Jaka 06/3/31(金) 14:36 発言
【36581】Re:シートの保護をVBAで書くと・・ Jaka 06/4/4(火) 14:58 発言
【36582】Re:シートの保護をVBAで書くと・・ an 06/4/4(火) 15:32 質問
【36583】Re:シートの保護をVBAで書くと・・ an 06/4/4(火) 15:35 質問
【36584】Re:シートの保護をVBAで書くと・・ Jaka 06/4/4(火) 17:06 発言
【36623】Re:シートの保護をVBAで書くと・・ an 06/4/5(水) 17:57 お礼

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