Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
18.01.2009 10:47:44 |
Werner |
|
|
|
18.01.2009 15:55:19 |
Holger |
|
|
Korrektur:Aw:Ausgabe immer in mm mit 3 stellen |
18.01.2009 16:08:24 |
Holger |
|
|
|
19.01.2009 16:21:09 |
Werner |
|
|
|
20.01.2009 09:33:29 |
Holger |
|
|
|
20.01.2009 20:30:41 |
Werner |
|
|
|
22.01.2009 11:53:03 |
Holger |
|
|
|
01.02.2009 10:00:40 |
Werner |
|
|
Von:
Holger |
Datum:
18.01.2009 16:08:24 |
Views:
924 |
Rating:
|
Antwort:
|
Thema:
Korrektur:Aw:Ausgabe immer in mm mit 3 stellen |
Hallo Werner,
es muss natürlich heißen:
sub anzeige
wert=wert+neuwert
if instr(wert),".") then
Label1.caption=Format(val(Wert), "###0.000")
else
Label1.caption=Wert
end if
end sub
Holger schrieb am 18.01.2009 15:55:19:
Hallo Werner,
Label1.caption=Format(Wert, "###0.000")
Wert ist nummerisch, das Ergebnis ist ein String. Beachte, dass du intern den Wert z.B. als String aufbauen kannst, aber das Komma intern als "." (Punkt) darstellen musst.
Ich nehme mal an, dass du eine Private-definierte Variable, z.B. NeuWert hast, in die du mit den Click-Ereignissen der Buttons den vorgesehenen Wert hinein schreibst.
Quick and dirty
Private NeuWert, Wert
sub Button1_Click()
NeuWert="1"
Anzeige
end sub
... Buttons 2-10
sub Button11_Click()
NeuWert="."
Anzeige
end sub
sub anzeige
wert=wert+neuwert
if instr(wert),".") then
Label1.caption=Format(Wert, "###0.000")
else
Label1.caption=Wert
end if
end sub
In der sub Userform1_initialize o.Ä. musst du Wert natürlich für eine neue Eingabe löschen (Wert="")
Gruß
Holger
Werner schrieb am 18.01.2009 10:47:44:
Hallo
noch ne Frage!
Komponenten!
Userform1 mit...
Button 1 (gibt Wert 1)
Button 2 (gibt Wert 2)
Button 3 (gibt Wert 3)
Button 4 (gibt Wert 4)
Button 5 (gibt Wert 5)
Button 6 (gibt Wert 6)
Button 7 (gibt Wert 7)
Button 8 (gibt Wert 8)
Button 9 (gibt Wert 9)
Button 10 (gibt Wert 0)
Button 11(gibt ,)
Button 12(speichert den Wert von Label1 in Tabelle 1)
Label1 ( Hier soll durch betätigen von Button 1-11 eine wert eingegeben werden. Der wert soll so formatiert sein das er immer 3 stellen hinter dem Komma hat. Sobalt das komma eingegben wird muss also der wert 3 stellen hinter dem Komma haben ....
Ausgabe immer in mm
Wenn 1 und 2 und , eingegeben wird soll --- 12,000 erscheinen
Wenn 1 und 2 und , und 3 eingegeben wird soll --- 12,300 erscheinen
Wenn1 und 2 eingegeben wir soll 0,012 erscheinen
Bitte helfen... es ist sehr wichtig und sehr dringend
Gruß
Werner
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
18.01.2009 10:47:44 |
Werner |
|
|
|
18.01.2009 15:55:19 |
Holger |
|
|
Korrektur:Aw:Ausgabe immer in mm mit 3 stellen |
18.01.2009 16:08:24 |
Holger |
|
|
|
19.01.2009 16:21:09 |
Werner |
|
|
|
20.01.2009 09:33:29 |
Holger |
|
|
|
20.01.2009 20:30:41 |
Werner |
|
|
|
22.01.2009 11:53:03 |
Holger |
|
|
|
01.02.2009 10:00:40 |
Werner |
|
|