Nur nichtleere Zellen kopieren
28.01.2004 19:28:49
Andreas
ich habe in B7-E100 eine Tabelle in der Daten eingefügt werden die per Formel etc.ermittelt werden.Der Datenbestand ändert sich laufend, ich weiß also nie bis zu welcher Zeile in der Tabelle Daten stehen.Nun soll ein Makro die komplette Tabelle kopieren und in eine zweite Tabelle die sich in I7-L100 befindet nur die Werte einfügen. Danach werden diese Daten nach verschiedenen Kriterien gefiltert.Soweit komme ich auch. Nun soll folgender Code nur den Bereich markieren der Daten enthält.Er markiert aber die komplette Tabelle.Das liegt daran das die vermeintlich leeren zellen laut Formeleditor nicht leer sind. Erst wenn ich die leeren Zellen markiere und dücke die Entf-Taste funktioniert das Makro.Was mache ich falsch??
Sub test()
Range("I7:L7").Select
Range(Selection, Selection.End(xlDown)).Select
End Sub
Andreas