2011-11-15 13 views
1

保護されたセルを持つワークシートがあります。 「行を追加」ボタンがあり、「行を削除」ボタンが必要です。ただし、ユーザーが名前付き範囲内にある場合にのみ行を削除できるようにしたい。Excel名前付き範囲にある行を削除する

ActiveSheet.Unprotectパスワード:= "パスワード"

レンジ( "ProjectList")の中に "を選択した" 場合は、

 Row.EntireRow.Delete Shift:=xlUp 

エンド
た場合のActiveSheet.Protectパスワード:= "パスワード"

答えて

7

あなたはこれを確認するように交差を使用することができます。

If Not Application.Intersect(Selection.EntireRow, Range("ProjectList")) Is Nothing Then 
    Selection.EntireRow.Delete Shift:=xlUp 
End If 
+0

パーフェクト。ありがとうございました! – Steamroller60

関連する問題