(04.05.2016, 13: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
