Re: Wert eines Kombinationsfeldes in Tabelle suchen
25.04.2003 10:11:52
björn
Hallo Bertram,danke für den Tipp.
Leider funktioniert das Makro bei mir nicht wie gewünscht. Wenn ich das Makro Schritt für Schritt mit F8 ausführen lasse erscheint die Fehlermeldung "Laufzeitfehler '1004 Die Activate-Methode des Range-Objektes ist fehlerhaft".
Kann das daran liegen, daß das Tabellenblatt auf dem gesucht werden soll nicht Sheet(2), sondern Tabelle2 heißt?
Ich habe versucht auf dem Tabellenblatt zu suchen auf dem die ComboBox steht.
Dein makro habe dazu umgeschrieben in:
Private Sub ComboBox1_Change()
Dim bereich As Range
Set bereich = Range("A1:F2")
bereich.Find(What:=Me.ComboBox1.Value).Activate
Wenn ich dieses makro mit F8 ausführe funktioniert es auch, wenn ich es über das Combobox-Changeereignis starte erscheint die Fehlermeldung "Laufzeitfehler 1004, Die Find eigenschaft des rangeobjektes kann nicht zugeordnet werden.
Kannst Du mir nochmal helfen?
Vielen dank
Gruß Björn
End Sub