makro doch recht langsam
13.10.2005 08:03:12
frank
ich habe folgendes problemchen:
in einer tabelle ca 1500nochwas zeilen ist in spalte m eine formel die mir auf grund einer abfrage ja oder "" ausgibt und auf grund dieser formel wird die komplette zeile gelöscht mit folgendem makro:
Sub i()
Dim i As Long
For i = Range("M1510").End(xlUp).Row To 1 Step -1
On Error Resume Next
If WorksheetFunction.CountIf(Cells(i, 13), "JA") > 0 Then Cells(i, 6).EntireRow.Delete
Next
End Sub
jetzt hab ich aber das problem das mein rechner (pIII 797Mhz und 512mb ram) nicht unbedingt ne hochleistungsrechenmaschinerie ist und ich zum ausführen des makros ca. 3-4 minuten brauche...
jetzt meine frage wie kann ich dieses makro beschleunigen...
gruß frank