Hallo zusammen,

ich bin absoluter Einsteiger, was vba angeht und habe folgendes Problem. Ich möchte aus einer Nutzwertanalyse die Werte aus einzelnen Zellen per Button mit ClearContents löschen, jedoch bekomme ich immer die Fehlermeldung: Laufzeitfehler '1004': Andwendungs- oder objektdefinierter Fehler.

Kann mir jmd helfen? Hier der Code:

Sub Bewertung_NWA_zuruecksetzen()

Worksheets("Technischer_Vergleich_NWA").Range("G8,G21,G28,G38,G46,G59,G72,G79,G89,G101,G113,G120,G130,G140,K8,K21,K28,K38,K46,K59,K72,K79,K89,K101,K113,K120,K130,K140,O8,O21,O28,O38,O46,O59,O72,O79,O89,O101,O113,O120,O130,O140,S8,S21,S28,S38,S46,S59,S72,S79,S89,S101,S113,S120,S130,S140,W8,W21,W28,W38,W46,W59,W72,W79,W89,W101,W113,W120,W130,W140").ClearContents

End Sub
 

Viele Dank im Voraus, 

Daniel