Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
608to612
608to612
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel oder VBA Lösung gesucht

Forumthread: Formel oder VBA Lösung gesucht

Formel oder VBA Lösung gesucht
11.05.2005 09:33:33
Josef
Hallo!
Ich habe eine lange Nummernreihe
0102030405060708091011121314151617181920
Ich möchte nun immer nach zwei Stellen ein Komma setzen:
01,02,03,04,05,06,07,08,09,10 usw
Gäbe es hier bitte hierfür eine Lösung?
Danke
Josef
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Nachtrag
11.05.2005 09:36:38
josef
Hallo1
Diese Zahlenreihen können in einem Arbeitsblatt ca. 800 mal vorkommen.
Josef
AW: Nachtrag
11.05.2005 10:00:29
MichaV
Hi Josef,
kopiere in ein Modul diesen Code


      
Public Function Kommas(Target As Range) As String
Dim i As Integer
Dim txt As String
Dim ktxt As String
txt = Target.Text
For i = 1 To Len(txt) Step 2
  ktxt = ktxt & Mid(txt, i, 2) & ","
Next i
Kommas = Left(ktxt, Len(ktxt) - 1)
End Function 
Dann würde es so gehen:
Tabelle1
  
 AB
1010203040506070809101112131415161718192001,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,19,20
Formeln der Tabelle
B1 : =kommas(A1)
 
 Diagramm - Grafik - Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Oder Du verwendest einen Code, der alle Zellen abfragt (Recherche) und wandelst bei Bedarf die Werte mit der Funktion "Kommas()" um.

Gruß- Micha

PS: Rückmeldung wäre nett.


		

                    

                                    


    
Anzeige

    

        
                    
            
                
    



                        



                    
                                

    
    

        

            
            

                                    

                                                    
                            AW: Nachtrag
                                            

                    

                                                    11.05.2005 10:51:59
                                            

                                

                                            Josef
                                    

            

        

        

                            
Hallo Micha!

Danke für Das Stricken dieser Funktion.
Funktioniert bereits bestens.
Josef

                    

            



                    
                                

    
    

        

            
            

                                    

                                                    
                            Danke für Rückmeldung! :o) owT
                                            

                    

                                                    11.05.2005 11:14:54
                                            

                                

                                            MichaV
                                    

            

        

        

                            
                    

            



                
    ;

    
    
    
                    


    
    
    

    
    
    
            


    

        
        Beliebteste Forumthreads (12 Monate)
    

    
    

 

    
    
    

    
    

    

        

            

                
                    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
                
            

            

                

                
            

        

    




    
    

    
    
            
 

            
            

                
                
                
                


    
Anzeige

    

        
                    
            
                
    



                


    
Anzeige

    

        
                    
            
                
    



                

                
                
                
                


    
Anzeige