Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
528to532
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
528to532
528to532
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Problem mit Kommastellen

Problem mit Kommastellen
12.12.2004 20:57:21
simon
Hallo Zusammen
Mit hilfe von Vba Filtere ich in einer Spalte entweder größer als die Zahl im Feld txtwert oder kleiner als die Zahl im Feld txtwert.
das Funktioniert auch ganz gut, nur das Problem taucht dann bei Komma stellen auf, er lässt einfach die stelle hinter dem Komma weg.
Die Variable Wert hab ich mit String deklariert, habs aber auch schon mit Variant probiert. Funktionieren beide, nur eben bei Zahlen mit Kommas gibts die Probleme.
Hier der Code:
wert = txtwert
If opbgrößer = True Then
wert = ">" + wert
ElseIf opbkleiner = True Then
wert = "End If
Selection.autofilter Field:=1, Criteria1:=wert, Operator:=xlAnd
Hoffe mir kann jemand helfen.
gruß Simon

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Problem mit Kommastellen
Jan
Hi Simon,
Der Datentyp ist falsch. Nimm Single oder Double für Dezimalzahlen.
Jan
AW: Problem mit Kommastellen
12.12.2004 21:10:05
simon
hallo Jan
funktioniert nicht, weil ja zu der Variablen noch das Zeichen dazu kommt und somit Text und Zahl ist
AW: Problem mit Kommastellen
12.12.2004 21:19:56
Josef
Hallo Simon!
Probier mal
wert = "&gt" & wert
Gruß Sepp
AW: Problem mit Kommastellen
Luschi
Hallo Simon,
das ist wieder mal typisch amerikanisch. Da Vba im Innersten nach USA-Regeln arbeitet, mußt Du in der Zahl als Kommastelle den Dezimalpunkt angeben.
Die Replace-Funktion (ab Excel 2000) macht diese Ersetzung
Criteria1:="&gt" & Replace(wert, ",", ".")
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Problem mit Kommastellen
PeterW
Hallo Simon,
versuch es mal mit
wert = "&lt" & Replace(wert, ",", ".")
Gruß
Peter
hey cool danke, da wäre ich ja nie drauf gekommen
12.12.2004 21:43:04
Simon
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige