UserForm Variable anzeigen

Question

Hallo,

habe keine Erfahrungen mit userform...
Ich möchte nach Ablauf einer Prozedur verschiedenen numerische Variablen mit 2 Dezimalstellen var1, var2, var3, var4 in einer userform anzeigen um das Rechenergebnis noch einmal zu verdeutlichen. Eignet sich dafür ein "Textfeld" oder muss ich eine andere Form wählen und wie wären dann die entsprechenden Codes für diese Felder?
Kann jemand helfen...?
Andreas

Answer 1

Hi Andreas,

selbstverständlich kannst du Textfelder für die Anzeige von Zahlen verwenden

TextBox1 = var1

Sollen die Zahlen ein bestimmtes Format aufweisen, dann kannst du das mit dem Befehl Format machen, also z.B. für ein Datum

TextBox1 = Format(var1, "dd.mm.yyyy")

Bis später,
Karin

Answer 2

Hallo Karin,

danke für die Information. Ich kriege es trotzdem noch nicht hin. Ich habe mal eine Testdatei (s.link) entworfen um das Problem transparent zu machen. Ziel ist die Anzeige der berechneten Var1-var4 in einer userform....
Gruß
Andreas

http://www.file-upload.net/download-8704979/TestUF.xlsm.html

Answer 3

Hi Andreas,

in deinem Fall geht das problemlos ohne Variablen:

Private Sub UserForm_Activate()
TextBox1 = Application.WorksheetFunction.Sum(Range("B1:B2"))
TextBox2 = Application.WorksheetFunction.Sum(Range("B1:B3"))
TextBox3 = Application.WorksheetFunction.Sum(Range("B1:B4"))
TextBox4 = Application.WorksheetFunction.Sum(Range("B1:B1"))
End Sub

Den gesamten restlichen Code kannst du aus dem Codemodul des UserForms löschen.

Bis später,
Karin

Answer 4

Danke Karin!! Perfekt...mein Problem ist damit gelöst...wieder was gelernt!!