ich benötige mal wieder eure fachmännische Unterstützung.
Ich beziehe meine Beschreibung auf die Beispieltabelle.
Ich möchte, dass wenn ich in C2 anfange einen Firmennamen zu schreiben, er mir automatisch die Auswahlmöglichkeiten aus Tabelle 2 (Firmenname) anzeigt und ich diesen auswählen kann. Die restlichen Felder könnte ich dann automatisch durch einen SVERWEIS ausfüllen lassen aber ich habe keine Möglichkeit gefunden, wie ich die eben beschriebene Funktion hinbekomme.
das ist mit einem Textfeld möglich. Füge ein Textfeld neben dem Feld für den Firmennamen ein. Setze in ein Modul folgenden Code
Code:
Option Explicit
Private Sub TextBox1_Change() Dim a As Range With Tabelle2 Set a = .Range("A2:A9").Find(TextBox1, lookat:=xlPart) If a Is Nothing Then Else Tabelle1.Range("C2") = a End If End With End Sub
Der erste mögliche Name wird sofort ausgefüllt.
Man muss dann noch was für die Beendigung und Abbruch vorsehen, ebenso die weiteren Ausfüllfelder.
31.05.2020, 11:32 (Dieser Beitrag wurde zuletzt bearbeitet: 31.05.2020, 11:32 von schauan.)
Hallöchen,
Du kannst, wenn Du auf den Usernamen klickst, auf der verlinkten Seite sehen, wann er zuletzt im Forum war - am 19.05.... Demzufolge hat er Deine Antwort gar nicht gelesen.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
erstmal einmal vielen Dank für deine Hilfe und die verzögerte Antwort.
Leider kenne ich mich mit Markos nicht aus :/ Ich habe versucht dieses einzufügen unter dem Visual Basic, allerdings wird mit dies nicht als Makro angezeigt, dass ich ausführen kann.
Ich würde den Makro in D2 (Tabelle1) ausführen, ist das grundsätzlich korrekt?
Würde mich freuen wenn du mir nochmal versuchen kannst zu helfen :)
Deine Folgerungen sind alle korrekt. Der Code kommt dann jedoch nicht in ein beliebiges Modul sondern in das Codemodul vom Tabellenblatt. Die Frage wäre jetzt nur, ob Du auch eine TextBox1 in dem Tabellenblatt hast. Der Code reagiert, wie die Bezeichnung des Makros schon sagt, auf Änderung derselben.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
danke für deine Rückmeldung! Ich habe eine UserForm1 aber keine Textbox. Wird die UserForm1 automatisch erstellt, wenn ich meine Ursprungsdaten in Tabelle2 mit Strg+T umwandel?
Kann ich statt Textbox1 einfach die UserForm1 als Datenquelle angeben?
Und wie bekomme ich es in das Codemodul vom Tabellenblatt?
wo kommt denn auf einmal eine Userform her? Du hast eine xlsx hochgeladen und da ist mit Sicherheit keine drin
Wenn Du schon
Zitat:Ich habe versucht dieses einzufügen unter dem Visual Basic
dann siehst Du dort auch im Projektexplorer die Tabellenblätter und wenn Du da doppelklickst geht das Codemodul vom entsprechenden Tabellenblatt auf. Geht aber auch, wenn Du mit der rechten Maustaste auf die Textbox auf dem Blatt klickst und Code anzeigen wählst - vorausgesetzt, Du hast eine ActiveX-Textbox. Das ist beim Einfügen die aus dem unteren Bereich, wenn Du in den Entwicklertools bist. Die aus dem Reiter Einfügen ist ein Formularsteuerelement, da wirkt dieser code nicht.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
