VBAコードで画像を挿入できるExcelシートを保護

Question

画像の挿入を許可するワークシートを保護しようとしています。その後、VBAコードでWorkSheetを保護する方法を学びましたが、WorkSheetに画像を挿入することはできません。

ワークシートを手動で保護すると、「オブジェクトの変更」のチェックボックスをオンにすると、WorkSheetによって画像の挿入が可能になりました。

は今、私はその後、私は次のコードを持って、Protectメソッドのパラメータのについて検索しています：

With Sheets("Sheet1") 
     .Protect Password:="password", DrawingObjects:=True, Contents:=False, Scenarios:=False 
End With 

私はコードは、画像の挿入を可能にしなければならないパラメータDrawingObjectsを占めていることを想定し、コードが正常に動作しない場合、ワークシートは保護されていますが、イメージの挿入はまだ許可されていません。

Answer 1

あなたのコードは、それらを挿入するのではなく、DrawingObjectsを保護すると思います。これを有効にするには、DrawingObjects:=Falseにする必要があります。

保護されたワークシートでVBAを使用するたびに、まず保護を解除し、VBAで必要な作業を行い、保護を再適用します。または、少なくとも、特定の保護を削除し、それらを再適用します。