Jörg Lorenz: Makros : Datenselect

Beitrag lesen

Hi,

Auf sheet 1 gebe ich einen Wert an.
Aus sheet 2 ,3 und 4 will ich nun die Zeilen finden die dieses Krterium erfüllen und diese dann auf sheet 1 ausgeben.
Wie kann ich das machen und geht das überhaupt ?

ja, mit VBA.

  • Zeilenzähler auf die erste auszufüllende Zeile -1 setzen.
  • Auf Sheet1 das Change-Ereignis abfangen, ggf. noch den Target bzw. bestimmte Eigenschaften abfragen.
  • Per Schleife Find über alle Blätter laufen lassen; ggf. noch die Bereiche eingrenzen, wie z. B. bestimmte Spalten.
    Bei jedem gefundenen Ergebnis:
  • Zeilenzähler um 1 erhöhen.
  • Über die Column-Eigenschaft des gefundenen Objekts die gewünschten Zellen auf Sheet1, in die Zeile Zeilenzähler eintragen lassen.
  • Nicht vergessen, vor dem Start den Bereich mit den Suchergebnissen zu löschen.

Und was anderes...Wie fülle ich ein "Kombinationsfeld" in excel mit daten aus einem anderen Sheet ?

Da gibt es verschiedene Möglichkeiten, z. B. ListFillRange. Ich bevorzuge aber immer AddItem.

Hilft's?

Viele Grüße

Jörg