ich habe eine Mappe, in der die leeren Zellen nicht leer sind.
Will heißen: =ISTLEER(A1) liefert FALSCH, =LÄNGE(A1) liefert 0.
Einfach zu reproduzieren, indem man in A1 die Formel ="" schreibt und anschließend das Ergebnis durch Inhalte-Einfügen-Werte ersetzt.
Bei der Mappe handelt es sich um irgendeinen Import mit ziemlich vielen Datensätzen (32000 Zeilen). Allerdings sollen die leeren Zellen eben wirklich leer sein.
Kann man das schneller lösen als mit einer For-Each-Schleife nach der Art:
Option Explicit
Sub weg()
Dim C As Range
With Application
.Calculation = xlCalculationManual
For Each C In Tabelle3.UsedRange
If Len(C) = 0 Then C.ClearContents
Next C
.Calculation = xlCalculationAutomatic
End With
End Sub
Das dauert nämlich ziemlich lange - und diese "verquere" Mappe kommt regelmäßig neu.Danke schon mal für Euren Input!
VG, Boris