19.08.2020, 11:59
Hallo Zusammen,
ich versuche eine VBA Schleife zu bauen für eine Datei.
Diese Schleife soll das gesamte Tabellen- Blatt durchlaufen.
Die Schleife soll die Untere Abfrage für das gesamte Blatt sein.
Genauer sollen alle bereiche zwischen Debitoren Nr. und Ergebnis durchlauen werden.
Aber immer nur 4 Spalten.
So weit funktioniert alles, ich finde nur keinen weg mit der Schleife.
Danke für die Hilfe
Gruß
Aritmatos
ich versuche eine VBA Schleife zu bauen für eine Datei.
Diese Schleife soll das gesamte Tabellen- Blatt durchlaufen.
Die Schleife soll die Untere Abfrage für das gesamte Blatt sein.
Genauer sollen alle bereiche zwischen Debitoren Nr. und Ergebnis durchlauen werden.
Aber immer nur 4 Spalten.
So weit funktioniert alles, ich finde nur keinen weg mit der Schleife.
Zitat:Dim zeile As Integer
Dim spalte As Integer
Dim löschZeile As Integer
Dim löschSpalte As Integer
löschSpalte = 4
zeile = 5
spalte = 3
Set bereich = Range("C:C").Find("Debitoren Nr. ")
zeile = bereich.Row + 1
Set bereich = Range("C:C").Find("Ergebnis")
löschZeile = bereich.Row - 1
Range("C" & zeile & ":F" & löschZeile).Clear
Danke für die Hilfe
Gruß
Aritmatos