Punkte aus Zahlen entfernen

[maybebaby]

Hallo nochmal

ich habe eine Exceltabelle in der Zahlen, mit Punkten sind. Diese Punkte würde ich gerne entfernen dass ich vernünftig mit den Zahlen arbeiten kann, sonst bekomme ich in jeder if Abfrage eine Fehlermeldung..

ich lese meine Zahlen wie folgt ein:

For xRows = 4 To 127  'Anzahl Zeilen
        For xCols = 1 To 1 'Anzahl Spalten
            Frequenz = .Cells(xRows, xCols)
            ' in dem Wert Frequenz steht jetzt zB 938.200.000 drinne. Aus dieser Zahl 
            ' möchte ich nun wie aus jeder zahl die ich so einlese die Punkte entfernen  
            
            End If
        
        
        Next xCols
        z = z + 1
    Next xRows

 

[Woll0r]

ich sehe da ein end if aber kein geöffnetes if

versuch es mal so:

      For xRows = 4 To 127  'Anzahl Zeilen

                  Frequenz = .Cells(xRows,1)

                  Frequenz = replace(Frequenz,".","")

          Next xRows

 

[deepthroat]

Hi.

Probier's mal so:

Frequenz = CDbl(.Cells(xRows, xCols))

Ansonsten kannst du natürlich tatsächlich einfach die Punkte entfernen:

Frequenz = Replace(.Cells(xRows, xCols), ".", "")

Gruß

 

[maybebaby]

danke !