Excel Makro - Variable Zelleneingabe im Blatt suchen?

Hallo, ich suche seit gut 8 Monaten (ja.. eine lange Zeit bis dato ohne Lösung) einen Weg um folgendes Umzusetzen:

Makro-Ausführung:

In eine Zelle soll ein Buchstabe eingegeben werden, diese Zelle soll vom Makro kopiert werden, den Textinhalt in die Suche eingefügt werden, das Blatt nach dem Text durchsuchen und die Zelle bei einer Liste finden, mit den Pfeiltasten einmal auf die Zelle rechts davon springen, diesen Text kopieren und in eine andere Zelle einfügen.

Makro-Aufnahme:

Zum aufnehmen des Makros gebe ich vor der Aufnahme in die gewisse Zelle (siehe Bild unten) einen Buchstaben (B) ein. Dann starte ich das Makro.

Die Zelle mit dem Buchstaben "B" wird kopiert, die normale Excel-Suche wird geöffnet, der Textinhalt wird bei der Suche eingefügt, Suche gestartet. Buchstabe "B" wird im aktuellen Blatt (Liste) gefunden. Ich springe mit der Pfeiltaste rechts in die benachbarte Zelle ("Baum") kopiere die Zelle und füge sie wo anders als "Ausgabe" ein. Ich beende die Aufnahme.

Problem:

Wenn ich dann in die gewisse Zelle den Buchstaben "A" eingebe, und aus "Ausführen" klicke, wird das vorherige aufgezeichnete Makro gestartet. Dann soll in der Suche der Buchstabe A eingefügt werden und nach "A" gesucht werden.

Aufgrund eines eigenartigen Fehlers wird aber der WIRKLICHE BUCHSTABE VON DER MARKO-AUFZEICHNUNG ("B") EINGEFÜGT - UND NICHT A.

(Ich habe beim Aufzeichnung natürlich über die Einfüg-Funktion den Zellinhalt ("B") eingefügt und nicht manuell eingetippt.)

Ich muss es schaffen, dass die Suche immer einen anderen Buchstaben einfügt, welcher von der Zelle kopiert wurde.

Wenn möglich, nur Methoden zur Aufzeichnung angeben, keine VBA Befehle - da ich davon nichts verstehe :P Ausser es ist wirklich anders nicht umsetzbar.

Bitte um dringende Hilfe, mit läuft die Zeit davon :p Ich hab das sicher schon 25 Mal neu gemacht, immer etwas anders und andere Methoden gesucht, ich werden nicht fündig.

Hier ein Bild darunter, für besseres Verständis. Ich freue mich über jede Hilfe!

Danke Danke Danke!

Bild in groß öffnen

Answer 1

[Suboptimierer]

Ui, erstmal ein Lob für die für diese ausführliche Ausformulierung der Frage.

Mein Ansatz wäre, in dem Makro einmal nach "B" zu suchen und dieses durch TabelleX.Range("I2").Value zu ersetzen. TabelleX ist das Arbeitsblatt, auf dem sich die Eingabezelle befindet.

Comments

[Suboptimierer]

Dein Problem lässt sich übrigens auch recht simpel ohne VBA lösen:

I3: =SVERWEIS(I2;A3:B5;2;0)

Answer 2

[KHSchindelar]

Wie wäre es damit ?

Comments

[augsburgchris]

Alternative: =INDEX(B:B;VERGLEICH(E2;A:A;0))

;-)

Answer 3

[IchMalWiederXY]

Es wäre günstig du hättest den Code gepostet, dass man sieht an welcher Stelle man im Makro ggf etwas ergänzen kann. Ich gehe jetzt mal davon aus, das der Simple SVERWEIS nicht deiner gewünschten Lösung entspricht, da dies nur greift wenn der Suchparameter genau übereinstimmt UND dein Makro in diesem Fall überhaupt nicht nötig wäre.
==
Normalerweise wird mit SRTG + F der Such Dialog gestartet und man gibt den Such-Text ein. Dies kann man alles auch in VBA machen, ohne dass man diesen Dialog sieht. Alle gefundenen Ergebnisse kann man dann, wohin auch immer kopieren.
==
In welche Richtung soll es gehen ?