2017-02-21 5 views
1

Ich versuche, in einer Schaltfläche in einem Userform zu schreiben, um die Zelle zu löschen, wenn es weniger als 1% istVBA-Code zum Löschen

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

Dies ist wahrscheinlich sehr falsch

Antwort

2
dim c as range 

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

Vielleicht ' wenn c.value2 <0,01 dann c.clearcontents ...? Ich bin mir nicht sicher, ob die Erzählung oder der Code im OP korrekt ist. – Jeeped