Suchergebnisse

Ich sehe da 2x for, aber nur 1x next. Die Anzahl muss natürlich identisch sein. Zudem empfehle ich, zur besseren Lesbarkeit, hinter next die jeweilige Variable anzugeben, z. B. next s. Und logischer wäre es, wenn man erst die Zeilen und dann die Spalten durchläuft. Und du schreibst 3x Cells(r, s). D. h. immer in dieselbe Zelle. EDIT: Stell doch mal die Einstellungen von VBA wie im Anhang ein (das Markierte), damit du Fehler direkt siehst. Anscheinend sind deine Einstellungen so, dass VBA erstmal…

Ich würde r als Long deklarieren. Denn das Tabellenblatt kann mehr Zeilen haben als in einen Integer passen. Ansonsten sieht das gut aus. Du könntest über dem If noch das hier machen, damit nicht zuviele Zeilen durchlaufen werden: Visual Basic-Quellcode (1 Zeile) Oder direkt so: Visual Basic-Quellcode (18 Zeilen)