ich hab da mal wieder eine Frage bei der ich alleine nicht weiterkomme.
Ich habe in, wie in beiliegender Datei zu sehen, eine Userform "Neuer Umsatz" erstellt. Mit dieser möchte ich Umsätze erfassen und diese in die Tabelle im Sheet "Umsätze" übertragen. Grundsätzlich bin ich glaube ich schon ein Stück weit vorangekommen, stehe aber jetzt vor einem Problem bei dem ich eure Hilfe brauche.
Den Code um die letzte freie Zeile zu ermitteln und die Felder der Userform zu übertragen habe ich gefunden, allerdings nur für die erste Zeile. Ich habe aber 10 Eingabezeilen für Artikelumsätze. Wie kann ich es anstellen, dass Excel erkennt wenn was in Artikel ausgefüllt wurde und wenn ja mir jeweils Rechnungsdatum, Kunde/Lieferant und Rechnungsnummer mit in die Tabelle kopiert werden?
Hierzu habe ich noch nichts gefunden mit dem ich was anfangen kann, vielleicht kann mir jemand von euch den richtigen Weg zeigen?
ich steh heute wohl komplett auf der Leitung. Ich habe mir den VBAHTML Umwandler runtergeladen und installiert aber irgendwie bekomme ich das Ding nicht zum laufen (in den Addins wird er mir angezeigt, aber ich kann keinen Befehl einfügen Insertquotes).
Daher habe ich meine bisherige Datei mit meinem erweiterten Code nochmal beigefügt.
2 Dinge sind mir noch unklar:
1. Ich habe einen Code der mir zählt wie oft ein Artikelfeld ausgefüllt wurde. Ich kann diesen Code aber nicht dahingehend verwenden, dass es mir eine bestimmte Anzahl an Zeilen in die Umsatzliste überträgt (Ich habe z.B. 3 Artikel in der Userform ausgefüllt, also soll er mir auch nur diese 3 Zeilen übertragen).
2. Ebenso möchte ich Rechnungsdatum, Kunde/Lieferant und Rechnungsnummer entsprechend oft übertragen.
Vielleicht hat jemand eine Idee was ich falsch gemacht habe?
Eine Combobox ist ein Objekt und kein Range. In einem Userform wäre die Abfrage z.B. so:
ComboBox1.Value
Willst Du das Variabel gestalten, dann so
UserForm1.Controls("ComboBox" & i).Value
So etwas in der Art hast Du doch aber in Deinem Code schon verwendet, z.B. UserForm1.Controls("ComboBox" & i).ListCount
Das Übertragen der Daten könntest Du dann mit in der Schleife erledigen. Für den jeweiligen Index der Combos und TextBoxen verechnest bzw. addierst Du einfach was zum Schleifenzähler,
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
Folgende(r) 1 Nutzer sagt Danke an schauan für diesen Beitrag:1 Nutzer sagt Danke an schauan für diesen Beitrag 28 • Thomas78
der Code an sich funktioniert, ich werd ihn nur noch abändern wie schauan es vorgeschlagen hat.
Allerdings hab ich jetzt noch ein kleines Problem was die ComboBox1 angeht: Ich möchte mir die Kunden / Lieferanten aus der Spalte D anzeigen lassen, ohne doppelte Einträge und sortiert. Einen Code hierfür habe ich glaub ich gefunden, allerdings funktioniert er noch nicht wie er soll. Wenn ich in der Userform auf die ComboBox1 klicke wird mir zwar ein Eintrag angezeigt, aber der 2. usw. nicht mehr. Ich habe leider keine Ahnung wo der Fehler steckt.
Wäre jemand so nett mal über die Datei zu schauen?
03.04.2017, 10:18 (Dieser Beitrag wurde zuletzt bearbeitet: 03.04.2017, 10:18 von Rabe.)
Hi Thomas,
(03.04.2017, 10:06)Thomas78 schrieb: Ich habe leider keine Ahnung wo der Fehler steckt.
Wäre jemand so nett mal über die Datei zu schauen?
wenn ich es bei mir starte, steckt der Fehler darin, daß die ComboBox1 nicht gefunden wird und noch weitere Fehlermeldungen kommen, so daß nichts getestet werden kann.
![[-]](https://www.clever-excel-forum.de/images/collapse.png)
