Formel nach vba

[Bernie]

Hallo zusammen,

hab gerade Problem bei dem ich nicht weiter komme und zwar nachfolgende Formel in VBA-Code umwandeln, wobei ich diesen in der TextBox einer UF verwenden möchte.

Textbox2 = KtoNummer
Textbox3 = Bankleitzahl

Code stammt aus Webseite "excelformeln" um IBAN zu berechnen.
In der Formel ist (A1 = KtoNummer und A2 = BLZ)

Code:

="DE"&TEXT((98-REST((62*(1+REST(A2;97))+27*REST(A1;97));97));"00")&A2&TEXT(A1;"0000000000")

...soll in Textbox6 angewendet werden, beim Verlassen von Textbox5.

Ein großen Danke im Voraus!!!

[mumpel]

Hallo!

IBAN berechnen

Im alten "office-loesung" hat mal jemand eine schöne Datei erstellt, mit der IBAN und BIC anhand der (damals) aktuellen Datenbanken berechnen kann. Leider ist die Datei zu groß um sie hier anzuhängen.

Gruß, René

[Bernie]

Hallo René,

Danke für deine Hilfe.

Den Code zur Berechnung habe ich, wie du im ersten Beitrag siehst. Allerdings schaffe ich es nicht den Code auf eine TextBox einzubinden.
D.h. beim Verlassen von TextBox5 nehme Werte aus Textbox3 und 4 und generiere in Texbox6 anhand der Formel die Iban.

Konnte ich mich klarer ausdrücken?

[mumpel]

Mit einer Formel wirst Du das bei Textboxen nicht hinbekommen. Das musst Du schon mit der Funktion (VBA) machen (ist ohnehin einfacher).

[Bernie]

Hallo René,

Das musst Du schon mit der Funktion (VBA) machen (ist ohnehin einfacher).

Genau, das möchte ich in einer Userform mit VBA, aber muss der Code aussehen?
Kannst du mir helfen?

[mumpel]

Siehe Beispieldatei. Da ist aber keinerlei Fehlerprüfung dabei.

[Bernie]

Hallo René,

hab deinen Code in mein Userform eingefügt und passt.
Textbox3 = KtoNr
Textbox4 = BLZ
Textbox5 = Bankname
Textbox6 = IBAN

Jetzt fehlt mir nur noch die BIC in Textbox7. Habe Tabelle "Bankleitzahlen_DE" hinterlegt, in der sich in Spalte 8 die BIC befindet. In der Tabelle hole ich sie mir mit "SVerweis", aber mit VBA bekomme ich das nicht hin. Soweit reicht mein Wissen noch nicht.

Weißt du wie der Code aussehen könnte?