Excel VBA: Werte aus Eingabefeld in eine Tabelle eintragen?

Hallo, VBA ist nicht meine Welt, daher hoffe ich hier auf eine kleine Unterstützung. Ich brauche ein Makro, welches sich aus drei Eingabefelder ("B1"; "B2" und "B3") den "B3" Wert entnimmt und in einer Tabelle diesen Wert einträgt. Die Tabelle ist wie folgt aufgebaut: Der Wert (Text), welcher in "B1" steht befindet sich irgendwo zwischen "A7" und "A65" und "B2" befindet sich irgendwo zwischen "C6" und "BB6". Vielen Dank im Voraus!

Answer 1

[PWolff]

Zielzelle.Value = Range("B3").Value

Solange du uns nicht verrätst, wie man herausfindet, in welche Zelle genau dieser Wert eingetragen werden soll, können wir an Information nicht mehr als dies dazu beitragen.

Comments

[sonJanssen]

Bei der Kreuzung von B1 und B2, also angenommen B1 steht in A23 und B2 steht in R6, dann soll der Wert von B3 in R23 reingeschrieben werden.

[PWolff]

@sonJanssen

Am besten über die Tabellenfunktion VERGLEICH - Zugriff über WorksheetFunction.Match

Dim Zielzeile As Long, Zielspalte As Long

Zielzeile = WorksheetFunction.Match(Range("B1"), Range("A7:A65"), 0) + 6
Zielspalte = WorksheetFunction.Match(Range("B2"), Range("C6:BB6"), 0) + 2

Cells(Zielzeile, Zielspalte).Value = Range("B3").Value

Hier kann noch viel verbessert werden, u. a. die Behandlung von Fehlern, aber so sollte es erst mal funktionieren.

Answer 2

[sonJanssen]

Vielen Dank! klappt wunderbar. Top