Ländereinstellungen abfragen?

29/01/2009 - 10:35 von Marco | Report spam
Hi Leute

Ich hab ein Problem mit einer Funktion im Excel 2K7! Wir haben hier (CH) den
Punkt als Dezimaltrennzeichen, in DE ist es aber ja bekanntlich das Komma
und genau da liegt mein Problem.

Folgende Funktion làuft mit dem Punkt einwandfrei, auf deutschen PC's mit
dem Komma aber nicht mehr, weil er bei der "IF Selection = "98.02" ja nie
was findet, weil da halt 98,02 steht ;-)


CopyPasteNr:
Sheets("Price Summary").Select
TxtCellStart = "H"
TxtCellMIS = 97.98
i = 3
Do 'Daten zusammenkopieren
TxtCell = TxtCellStart & i
Range(TxtCell).Select
Selection.Copy
If Selection = "" Then
TxtCellMIS = TxtCellMIS + 0.01
Selection = TxtCellMIS
Selection.NumberFormat = "##.00"
ActiveCell.Offset(0, 1).Range("A1").Select
Selection = 1
ActiveCell.Offset(0, -1).Range("A1").Select
End If
Selection.Copy
If Selection = "98.02" Then
Selection = 98.99
Exit Do
End If
i = i + 1
Loop

Wie kann ich jetzt ganz am Anfang abfragen, welche Làndereinstellungen der
PC hat und dann mit einem Replace die Punkte mit nem Komma ersetzen?
Oder gibt es da eine intelligentere Variante, wie man das lösen könnte?

Vielen Dank für Eure Hilfe

Marco
 

Lesen sie die antworten

#1 Alexander Wolff
29/01/2009 - 11:35 | Warnen spam
Zu Deinem Problem (allgemein: Als String geschriebene Zahlen regionsabhàngig
vergleichen):

http://xxcl.de/0065.htm
Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2

Ähnliche fragen