Excel 允许更改。添加问题

我在允许的范围内遇到问题。以下代码适用于a1到g1的范围：

Dim ws As Worksheet
Set ws = Application.ActiveSheet
ws.Unprotect
ws.Protection.AllowEditRanges.Add Title:="Classified", Range:=Range("A1:G1"), Password:="pw"
ws.Protect

第二次我将范围更改为

range:=range（$A:$G；$I:$O”）

我得到以下错误：

错误1004:方法范围对象\u全局失败（抱歉转换）

---

任何帮助都将不胜感激

试着像这样输入逗号：

Range("$A:$G,$I:$O")

---

试着像这样用逗号表示：

Range("$A:$G,$I:$O")

VBA始终使用逗号（

，

）作为分隔符-无论区域差异如何。将分号（

；

）替换为逗号。VBA始终使用逗号（

，

）作为分隔符，而不考虑区域差异。用逗号代替分号（

；

）。