Hallo allerseits.

Ich scheitere mit einer Fehlermeldung die beim Debuggen auftaucht:

"OBJEKT ERFORDERLICH"

bei der Zuweisung in Zeile 8 [AktiveSheet ......]

Es soll eine Spalte (ziel_splte=14) von 1 bis Zeile (letzt_zle=58) mit einen Zeichen (delte_kez="X") gefüllt werden.

Ich habe bereits diese Zeile mit Set und mit .Value ergänzt gehabt, aber immer dieselbe Fehlermeldung bekommen.

' Zielspalte mit "X" füllen
ziel_splt = Worksheets("Statistik").Cells(15, 2)
letzt_zle = Worksheets("Statistik").Cells(20, 2)
delte_kez = Worksheets("Statistik").Cells(25, 2)

For I = 1 To letzt_zle
  AktiveSheet.Cells(I, ziel_splt) = delte_kez ' Zeile 8
Next I

Ich frage mich, welches Objekt hier fehlt?

Aber vielleicht ist es nur eine Kleinigkeit, die ich mit und ohne Brille mangels Erfahrung nur nicht erkenne!

Vielen Dank für eure Hilfe!

-Hermann-