(04.05.2016, 14:14)BoskoBiati schrieb: ..., aber wie will er die aufrufen? Was soll das werden? Da gibt es doch viel einfachere Lösungen. Das ist nichts anderes als eine sinnlose Aneinanderreihung von WENN nur mit VBA! Ich bin der letzte, der nicht helfen will, aber ...
niemand zwingt Dich dazu, von Deiner Denkweise abweichen und helfen zu müssen. ;) Wobei ich da aber auch keine Aneinanderreihung erkennen kann. :s
hier ein Beispiel, wie es in der ersten IF Abfrage funktioniert:
Code:
If ComboBox1.Text = "A1" Then TextBox44 = "3" TextBox13 = Format((CDate(TextBox12) * 24 + CDbl(TextBox44) * 0.25) / 24, "h:mm") End If
Der Inhalt von Textbox44 wird mit 0,25 multiplitziert Der Inhalt der Textbox mit der Zeit mit 24 multipliziert.
So werden die Zeiten erst einmal in Industriezeiten umgewandelt und aufadiert. Am Ende wird wird die Summe durch 24 geteilt, um wieder eine Zeitangabe zu haben. Der Ganze Ausdruck wird dann für die Anzeige im Format "h:mm" formatiert.
Zitat:jede Zahl ist ein Wert der minuten bedeutet zb 3 ist 0,45 min 2 ist 0,30 min 4 ist 0,60 min und die 5 ist 0,75 min
In meinem obigen Beispiel sind 2 30 Minuten, wenn es bei Dir tatsächlich 0,30 Minuten sein sollen (also 18 Sekunden), dann musst Du meinen Divisor 96 halt auf 96*60=5760 umändern, was ich mir aber nicht vorstellen kann. Ansonsten nimm mein obiges Beispiel oder lade Deine Datei mal hoch …
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Hallo Stefan mag ja sein dass es für dich zu simpel is OK aber nur in der Tabelle Formeln eingeben erschien mir zu simpel darum die Userform da später einige meine Kolegen die Datei bearbeiten sollen und manche keine Ahnung mit PC oder Excel haben daher erschien mir die eingabe über ne uservorm zu öffnen ganz gut und ich lerne was dabei für mich mir gefällt halt nur eine Tabelle nicht ist mir zu simpel und sinnlos aber wenn man etwas ahnung hat von der Mat.hätte man über Entwicklertools das Macro mit den Textboxen und allem gefunden versteh dass du dich nicht auf meine doch geringe kenntniss antworten oder Helfen wills musst du auch nicht also lass es Danke mfG Ralf
Super Stefan genau das suchte ich funzt super gut ich muss mir nur den code genau anschauen um iihn zu verstehen aber ist genau das was ich wollte Danke dir Gruss Ralf
Hallo Stefan ich hab noch einige andere dinge dazu gemacht funktionirt alles mit deinen cods was mir noch fehlt ist der Auto open userform 1 befehl kenne ihn zwar aber funzt nicht mache etwas falsch wenn du mir den noch sagen bzw zeigen könntest wo ich ihn einfügen soll das wäre super Gruss Ralf
