UserForm

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm TextBox
Bild

Betrifft: UserForm
von: FrankS
Geschrieben am: 19.04.2005 08:55:03
Hallo Excel-Profis,
ich habe eine User-Form erstellt in der ich Kundennamen sowie Rechnungsnummer
fortlaufend in die Tabelle „Rechnungsnummer“ übergeben möchte, hier sollte auch
das Rechnungsdatum „automatisch“ hinterlegt werden.
Die neue Rechnungsnummer die ich eingebe sollte auch in der Tabelle „Rechnung“ in Zelle E15 übertragen werden.
Im Feld „letzte Rechnungsnummer“ sollte immer die letzte Rechnungsnummer ersichtlich sein die in er Tabelle „Rechnungsnummer“ als letzte auch abgelegt wurde.
Diese Abfolge ist zwar nicht ganz professionell aber ausreichend.
Ich bin VBA-Anfänger und versuche Schritt für Schritt weiterzukommen
daher sind meine Code’s warscheinlich etwas unkonventionell.
Ich hoffe Ihr könnt mir weiterhelfen!!!!! Danke
Ich habe das File hochgeladen:
https://www.herber.de/bbs/user/21340.xls
Viele Grüsse
Frank

Bild

Betrifft: AW: UserForm
von: Dani
Geschrieben am: 19.04.2005 11:39:12
Hallo Frank,
ich habe deinen Code etwas erweitert und hoffe ich habe dich richtig verstanden.
https://www.herber.de/bbs/user/21348.xls

Gruss Dani
Bild

Betrifft: AW: UserForm
von: FrankS
Geschrieben am: 19.04.2005 13:06:12
Hallo Dani,
funktioniert fast wunderbar
bis auf diesen Laufzeitfehler??????????????????????????????????????
Worksheets("Rechnungen").Cells(15, 5).Value = UserForm1.TextBox2.Text
Danke für deine Hilfe
Frank
Bild

Betrifft: AW: UserForm
von: FrankS
Geschrieben am: 19.04.2005 13:11:47
Hallo Dani,
ich habe den Fehler gefunden
Rechnungen statt Rechnung,
es sollte jetzt nur noch in der UserForm
im Textfeld "letzte Rechnungsnummer"
automatisch die letzte Nummer angezeigt werden.
Gruss
Frank
Bild

Betrifft: AW: UserForm
von: Franks
Geschrieben am: 19.04.2005 13:15:48
Hallo Dani,
eigenartigerweise funktioniert aufeinmal alles.
Herzlichen Dank für deine Hilfe und einen schönen Tag wünscht Dir
Frank
 Bild

Beiträge aus den Excel-Beispielen zum Thema "UserForm"