用于删除的VBA代码

Question

我正在尝试在用户窗体中的按钮内写入，以清除小区，如果小于1％

Range("G9:G28").Select
Selection.ClearContents if range("g9:g28) < 0

这可能是非常错误的

Answer 1

dim c as range

for each c in activesheet.range("G9:G28")
  if c.value < 0 then c.clearcontents
next