| 
                              
                                  Thema
                              
                           | 
                          
                              
                                  Datum 
                           | 
                          
                              
                                  Von Nutzer
                           | 
                          
                              
                                  Rating
                           | 
                          
                               
                                  Antwort 
                           | 
                      
                      
 | 
18.01.2009 10:47:44 | 
Werner | 
 | 
 | 
  Aw:Ausgabe immer in mm mit 3 stellen hinter dem Ko  | 
18.01.2009 15:55:19 | 
Holger | 
 | 
 | 
 | 
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 15:55:19 | 
										Views:
                                             
                                            1165 | 
										Rating:
                                                                          | 
										Antwort: 
                                             
                                             
                                             | 
									
									
										Thema:
                                             
                                            Aw:Ausgabe immer in mm mit 3 stellen hinter dem Ko | 
									
									
										 
                                            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 | 
 | 
 | 
  Aw:Ausgabe immer in mm mit 3 stellen hinter dem Ko  | 
18.01.2009 15:55:19 | 
Holger | 
 | 
 | 
 | 
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 | 
 | 
 |