Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
340to344
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
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zahlen aufsteigend sortieren

Zahlen aufsteigend sortieren
24.11.2003 10:27:56
Barbara116
Hallo!!!

Wir wollen in unserer Excel-Tabelle eine Spalte sortieren. Leider werden nicht alle Zahlen sortiert. Die Spalte ist auf Text formatiert, da die dreistelligen Zahlen mit 0 angezeigt werden müssen (z.B. 0112). Aber auch einige andere Zahlen werden einfach nicht sortiert. Wie kann man dieses Problem lösen???

DAnke schön...

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

Betreff
Datum
Anwender
Anzeige
AW: Zahlen aufsteigend sortieren
24.11.2003 11:04:15
Nepumuk
Hallo Barbara,
sind nur Zahlen in der Spalte? Welche Spalte ist es den?
Gruß
Nepumuk
AW: Zahlen aufsteigend sortieren
24.11.2003 11:37:54
Barbara116
Es stehen nur Zahlen in der Spalte, sie sind aus einem Word-Dokument kompiert und dann als Text formatiert worden. Es ist die Spalte D.
AW: Zahlen aufsteigend sortieren
24.11.2003 11:40:15
Barbara116
Es stehen nur Zahlen in der Spalte, sie sind aus einem Word-Dokument kompiert und dann als Text formatiert worden. Es ist die Spalte D.
AW: Zahlen aufsteigend sortieren
24.11.2003 11:57:16
Nepumuk
Hallo Barbara,
öffne die Mappe. Drück die Tastenkombination Alt+F11 - es öffnet sich der VBA - Editor. In dessen Menüleiste klickst du auf Einfügen - Modul. In das Modulfenster kopierst du folgendes Programm:


Option Explicit
Public Sub Barbara()
Dim lngZeile As Long
For lngZeile = 1 To Cells(65536, 4).End(xlUp).Row
If Cells(lngZeile, 4) <> "" Then
If IsNumeric(Cells(lngZeile, 4)) Then Cells(lngZeile, 4) = Cells(lngZeile, 4) * 1
End If
Next
End Sub



Code eingefügt mit: Excel Code Jeanie

Dann schließt du das Editorfenster mit den Schließenkreuz rechts oben. In der Mappe, die richtige Tabelle ist aktiviert, drückst du die Tastenkombination Alt+F8. Das Modulfenser geht auf und du siehst den Modulnamen in der obersten Zeile. Einfach auf ausführen klicken, das war's.
Gruß
Nepumuk
Anzeige

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige