2017-04-20 159 views
2

Error Message我是新來的Excel,我試圖編寫代碼來鎖定空單元格,並使用值解鎖這些單元格,任何幫助都將非常感謝。這是我的,它給我鎖定空單元格並解鎖空閒單元格

運行時錯誤'1004':方法'對象範圍''全局'失敗。

Sub test() 
    Dim rngTemp As Range 

    For Each rngTemp In Range("grey").Cells 
     With rngTemp 
      If .Value > 0 Or Len(.Value) > 0 Then 
       .Locked = False 
      End If 
     End With 
    Next 
End Sub 
+0

你必須給你的rngTemp一個範圍,例如(「A1:X」) – Ionut

+0

我改變的範圍爲range(「A1:B2」)。細胞,它帶走了錯誤,但是當我去到Excel ,沒有東西被鎖定。還有另一種你認爲我可以寫這個的方式嗎?對不起,這是我第一次,我真的很難與它。 – sa7

+0

爲了鎖定單元格,您還必須使用密碼保護您的工作表,並且只有這樣您纔不能在範圍內的空單元格中寫入某些東西。 – Ionut

回答

2

您的代碼爲我工作得很好。你確定你有一個叫做「灰色」的範圍嗎? Your code works fine for me. Are you sure you have a range called "grey"?

+0

是的,我有灰色,是否有。我有完全相同的東西,但它給我的範圍錯誤。我試圖發佈它的截圖,但它不讓我在評論框 – sa7

+0

試着編輯你的問題,我想你可以在那裏附上截圖。 – Zsmaster

+0

有沒有另一種方式讓你認爲我可以寫這個?對不起,這是我第一次,我真的很難與它。 – sa7