Jörg Lorenz schrieb am 02.June.2010, 12:43:45 in der Kategorie pc.sw.office
Excel VBA Spalten löschen
Hi Toni,
> Mit dem in meiner Anfrage dargestellten Code funktioniert zumindest das > Löschen von \"AZ LJA\" und \"AZ JA\". Diese Spalten liegen in der > Ursprungstabelle direkt nebeneinander.
das ist Zufall und hängt mit der Reihenfolge der If-Abfragen zusammen:
Innerhalb eines Schleifendurchlaufs passiert das:
Es wird \"AZ LJA\" gefunden, also wird die Spalte gelöscht:
If Cells(1, i).Value = \"AZ LJA\" Then Columns(i).Delete
Dadurch rutscht die nächste Spalte nach vorn.
Aber jetzt kommen bei dem Durchlauf bei genau dieser Spalte ja noch die anderen IFs, der Durchlauf ist ja noch nicht fertig:
If Cells(1, i).Value = \"AZ JA\" Then Columns(i).Delete
Und wenn in der Spalte, die ja vorgerutscht ist, nun \"AZ JA\" steht, wird die Spalte gleich nochmal gelöscht.