Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
840to844
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
840to844
840to844
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sortierung per VBA funktioniert nicht

Sortierung per VBA funktioniert nicht
05.02.2007 03:21:33
Angie
Hallo Leute,
habe ein geschützes Tabellenblatt wo der Bereich "A8:EJ1000" mit Daten gefüllt ist. Nun möchte ich per VBA diesen Bereich sortieren und zwar nach der Spalte die ich selektiere. Kann mir da vielleicht jemand weiterhelfen? Habe schon aus anderen Beiträgen versucht mir eine "Sub" zusammen zu basteln, aber es hat alles nicht so funtioniert. Würde mich freuen wenn mir einer weiterhelfen könnte.
grüße Angie

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

Betreff
Datum
Anwender
Anzeige
AW: Sortierung per VBA funktioniert
05.02.2007 07:47:34
Erich
Hallo Angie,
probier mal 
Sub sort_A8_EJ1000()
ActiveSheet.Unprotect "abc"
If Not Intersect(Selection, Range("A8:EJ1000")) Is Nothing Then
Range("A8:EJ1000").Sort Key1:=Cells(8, Selection.Column), Order1:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End If
ActiveSheet.Protect "abc"
End Sub
mit abc als Passwort (kannst du weglassen, wenn es kein Passwort gibt).
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Sortierung per VBA funktioniert
05.02.2007 14:20:05
Angie
Hallo Erich,
danke funtioniert für alle spalten, nur leider nicht für die Datums-Spalte. Wenn ich da das Makro anwende sortiert er nicht. Kann es sein das es an der Zellformatierung liegt?
Gruß Anja
Anzeige
AW: Sortierung per VBA funktioniert
05.02.2007 17:04:51
Erich
Hallo Anja,
was meinst du mit "funktioniert nicht für die Datums-Spalte"? Wird da "falsch" sortiert, oder was geht nicht?
Stehen in der Datums-Spalte vielleicht gar keine Datumse, sondern Texte? Dann werden sie anders sortiert.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Sortierung per VBA funktioniert
05.02.2007 19:46:08
Angie
Hallo Erich,
also das Datum gelangt über eine Userform mit dem Code hinein:
Sheets(1).Cells(x, y + 4).Value = Form_Doku.Datebox
Vielleicht muß ich hier an der Stelle eine Formatierung mit einbauen oder? Was würdest du mir empfehlen? Denn so wie es jetzt ist sortiert er falsch, zumindet nicht so dass das Aktuelle Datum ganz unten steht.
Gruß Anja
Anzeige
AW: Sortierung per VBA funktioniert
05.02.2007 19:54:50
Gerd
Sheets(1).Cells(x, y + 4).Value = CDate(Form_Doku.Datebox)
und Zellen entsprechend formatieren.
mfg Gerd
AW: Sortierung per VBA funktioniert
05.02.2007 21:52:13
Erich
Hallo zusammen,
das "CDate(Form_Doku.Datebox)" meine ich wie Gerd,
aber die Formatierung spielt keine Rolle für den Sort.
Sortiert werden Datumse und Uhrzeiten als Zahlen - was sie ja auch sind.
(Die Zelle sollte aber nicht als Text formatiert sein.)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

306 Forumthreads zu ähnlichen Themen

Tabelle nach Anzahl sortieren
Pascal

Hallo,
wie kann ich eine Tablle nach der Anzahl der Wörter in einer Spalte sortieren?
Die Tabelle sieht etwa so aus:
Spalte1 | Spalte2 | Spalte 3
1 | der die | ...
2 | der | ...
3 | der die das | ...
und aussehen soll...
25.09.2008 11:50:39
Thread-ID: 1012284
6 Beiträge
Anzeige
Makro funktioniert nicht richtig, Werte auslesen
Uwe

Hallo zusammen, habe folgendes Problem in dem beigefügtem Makro funktioniert es nicht das er die Werte 2 und 3 aus der Tabelle ausliest. Wert 1 geht wunderbar. Hat jemand eine Lösung?
Hallo Uwe,
unregelmäßig aufgebaute Tabellen per Makro abzuarbeiten ist immer ziemlich aufwendig zu prog...
07.11.2008 08:22:00
Thread-ID: 1022502
2 Beiträge
Tabelle nach Namen durchsuchen -> Wert ausgeben
Aschi

Hallo,
ist es möglich mit einer Excel Funktion eine Tabelle nach gewissen Informationen zu durchlaufen und in einer anderen Zelle dann einen entsprechenden Wert auszugeben?
Also z.B. ich habe eine Liste und in der Zelle E steht „1. FC Köln“, eine Zeile darunter steht in E „FC Bayern Mün...
02.12.2008 16:17:12
Thread-ID: 1029551
8 Beiträge
Anzeige
Tabelle sortiert nicht im Netzwerk ?
A.Franz

Hallo...,
ich hoffe wirklich bei meinem nachfolgendem Problem kann mir jemand helfen,da ich mir das ganze nicht erklären kann.Ich habe eine ListBox mit 5-Spalten die über Row-Source A1:E gefüllt wird.Weiterhin habe ich eine Textbox über die ich einen Suchbegriff für die Auftragsnummer einge...
12.12.2008 11:25:00
Thread-ID: 1032340
2 Beiträge
Autofilter über Makro funktioniert nicht mehr
Ramon

Hallo Excel-Freunde,
ich habe ein ganz komisches Problem:
Wenn ich im Makro die Autofilter-Funktion einbinde, wird beim ausführen des entsprechenden
Makros in dem Modul der Begriff "Autofilter" gelb markiert, mit der Fehlermeldung:
"Fehler beim kompilieren:
Methode oder Date...
23.01.2009 15:01:21
Thread-ID: 1043020
3 Beiträge
Tabellen sortiere und nach wert in zelle
Walli

Guten Tag,
ich habe folgendes Makro für das Sortieren der Tabellenblätter
gefunden, funktioniert auch.:
Sub Tabellenblätter_sortieren() Dim Cnt As Integer Dim N As Integer Dim M As Integer On Error GoTo EndOfMacro Application.ScreenUpdating = False Cnt = ActiveWorkbook.Worksheets....
21.02.2009 11:24:43
Thread-ID: 1052581
7 Beiträge
Auto open funktioniert nicht richtig
Bodo

Guten Tag.
Ich versuche diesen Code hier zum Laufen zu bringen.
Sub Auto_open() ' Auto_öffnen Makro ' Blatt "Grundwerte" ausblenden. Unnötiges ausblenden. Blatt "Hinweise" aktivieren. In Vollbild- _ Modus schalten. Sheets("Grundwerte").Visible = False Sheets("Hinweise").Select ActiveW...
25.02.2009 14:31:35
Thread-ID: 1053941
6 Beiträge
Tabellen in Datei sortieren aber nach ...
walli

Guten Morgen,
ich habe eine große Datei mit vielen Tabellen.
Die Tabellen haben Namen z.B. Busch und Busch M also der gleiche Name
aber nach dem Namen Leerzeichen und ein großes M.
Ich möchte die Tabellen automatisch nach Namen sortieren + direkt
daneben jeweils die Tabe...
18.03.2009 09:17:28
Thread-ID: 1061282
3 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
7
1
7
3
1
2
6
5
2
4
10
16
2
6
2
10
2
4
3
2
14
4
2
1