Clever-Excel-Forum

Moin Community.

Kurzfassung:

Ich trage per Userform eine Zeit (z.b. 50:45) in eine Textbox ein.Nach dem klick auf "OK" wird diese Zeit ins Sheet eingetragen und mithilfe eines Befehls in ein anderes Sheet kopiert.

Oberhalb der Eintragung ist die Zelle die alles unterhalb dieser Zelle zusammenrechnen soll. Nur tut es das erst wenn ich selber in die Eintragung reinklicke und wieder raus gehe.

"Automatisches Berechnen" = An

"Zellenformat" = Benutzerdefiniert [hh]:mm (In jeder Spalte die genutzt wird)

Zusatz:

Mit der einen Userform wo ich mehreres Eintrage (auch in die besagte spalte) funktioniert es. Wenn ich es aber mit der 2. Userform mache, dass sich nur auf diese eine Spalte beschränkt, läuft es nicht wie bereits oben geschildert.

Der einzige unterschied in den beiden Codes, ist das ich anstatt

[...]

o = 300

For c = 1 To 23Sheets("00 MAIN").Cells(40, K) = Me.Controls("tb" & o).Text

[...]

um mehrere Sachen (23 Textboxen) einzutragen nur

[...]

Sheets("00 MAIN").Range("D30") = tbhours

[...]

schreibe, da ich mich nur auf eine Textbox beschränke.

Bin mit meinem Latain am ende. Wäre für weitere Ideen dankbar :)

Nachtrag:

Schritt 1, daten in die Userform eintragen: [attachment=36142]

Schritt 2, nach "OK" werden die Daten in "Sheet 00" eingetragen: [attachment=36143]

Schritt 3, zeile wird kopiert und in die entsprechende Tabelle eingefügt: [attachment=36144]

Fehler: Anstatt 00:00 müssten bei beiden 50:30 stehen.

Behebung: reinklicken, wieder raus gehen. [attachment=36145] ->[attachment=36146]

Sheets("00 MAIN").Range("D30") = tbhours.text bringt nichts?

tbhours ist die textbox?

genau, "tb" steht bei mir für "Textbox".

Am Code selber ist ja nichts zu bemängeln. Die Zahl kommt ja an, nur wird sie am ende nicht verrechnet.

und aufgrund welcher Informationen sollen dir die Helfer nun helfen? Du sagst es liegt nicht am Code , aber du sagst auch das nur dort der Unterschied liegt. Also das ist schon dürftig. Beispieldatei mit reproduzierbarem Verhalten?

Tut mir Leid, bin neu hier... Habe die Bilder falsch eingefügt. Jetzt sind diese sichtbar.

Ich kann nicht sagen woran es liegt. Deswegen bin ich ja hier. woran kann es denn liegen, dass die Zelle mit dem "=Summe" befehl die Zahl nicht mitrechnet oder das ich manuell reinklicke?

(29.12.2020, 22:55)AS49 schrieb: [ -> ]Ich kann nicht sagen woran es liegt.

Ich auch nicht, Bilder reagieren sehr schlecht bis gar nicht auf Zelleingaben.
Mit Bildern kann hier keiner was anfangen. Du wirst doch wohl ne kleine Beispieldatei, die deiner Anwendung entspricht zusammenklicken können.

Erstell eine userform, füg ne zahl ein und verrechne sie. Ergebnis: Funktioniert.

Ich kann keinen Logikfehler eben mal mit ner neuen Tabelle erstellen.
Mein Problem ist ganz simpel unlogisch.

Zahl wird eingefügt und nicht verrechnet, bis ich manuell reinklicke. <- Dieser eine Satz ist alles was meine Helfer zu wissen brauchen.

Hallo,

Sheets("00 MAIN").Range("D30").Value = CDate(tbhours)

Gruß Uwe

Hat geklappt!
Ich muss mich mal reinlesen warum das so funktioniert... Aber es funktioniert, das ist die Hauptsache. Vielen Dank :)

AS49

ralf_b

AS49

ralf_b

AS49

ralf_b

AS49

Kuwer

AS49