Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
460to464
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
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofilter automatisch aktualisieren UND sortieren

Autofilter automatisch aktualisieren UND sortieren
02.08.2004 16:04:23
Hoffi
Hallo Ihr,
im Thread "Autofilter automatisch aktualisieren" hat Thomas Ramel am 14.07.2004
eine geniale Datei: (https://www.herber.de/bbs/user/8478.xls) veröffentlicht. Mit der kann man Auszugslisten aus einer Basisliste erstellen. Erstmal vielen Dank an Thomas, die ist wirklich super!!!
Nun stellt sich die Frage, ob man diesenoch optimieren kann, indem die Daten auch noch sortiert angezeigt werden.
Kann mir jemand helfen?
Viele Grüße
Hoffi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter automatisch aktualisieren UND sortieren
02.08.2004 16:41:34
Nepumuk
Hallo Hoffi,
klar:


Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    If Sh.Name <> "Basistabelle" Then
        Application.ScreenUpdating = False
        Sheets("Basistabelle").Range("A1").CurrentRegion.AdvancedFilter _
                Action:=xlFilterCopy, _
                CriteriaRange:=Sh.Range("A1:C2"), _
                CopyToRange:=Sh.Range("A4:C4")
        Range("A5:C65536").Sort key1:=Range("B5")
        Application.ScreenUpdating = True
    End If
End Sub


Gruß
Nepumuk
Anzeige
AW: Autofilter automatisch aktualisieren UND sortieren
03.08.2004 08:16:20
Hoffi
Hallo Nepumuk,
vielen Dank, das ist ja super einfach. Was man alles machen kann!
Nun wollte ich noch eine Formatierung einfügen, aber da steigt er mir aus:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Basistabelle" Then Exit Sub
Application.ScreenUpdating = False
Sheets("Basistabelle").Range("A1").CurrentRegion.AdvancedFilter _
Action:=xlFilterCopy, _
CriteriaRange:=Sh.Range("A1:C2"), _
CopyToRange:=Sh.Range("A4:C4")
Range("A5:C65536").Sort key1:=Range("b5")
Range("A5:c65536").NumberFormat:="tttt"
Application.ScreenUpdating = True
End Sub

Wo liegt denn mein Fehler?
Viele Grüße
Hoffi
Anzeige
AW: Autofilter automatisch aktualisieren UND sortieren
03.08.2004 08:37:02
Nepumuk
Hallo Hoffi,
wenn du den Tag anzeigen willst, musst du nicht "tttt" angeben, sondern in englisch "dddd". Außerdem wurde ich 1. nur die Spalte mit Datum formatieren und 2. nur den Bereich, in dem auch Daten stehen. Beispiel:
Range(Cells(5, 1), Cells(Cells(Rows.Count, 1).End(xlUp).Row, 1)).NumberFormat = "dddd"
Damit wird die Spalte A von Zeile 5 bis zur letzten gefüllten Zeile formatiert. Alles andere lässt die Größe der Mappe gewaltig anschwellen.
Gruß
Nepumuk

260 Forumthreads zu ähnlichen Themen

Pivot-Tabellen automatisch aktualisieren
C

Hallo,
ich möchte eine Excel Datei mit mehreren Pivot-Tabellen nachts aktualisieren, damit ich morgens aktuelle Daten vorliegen habe und nicht den Aktualisierungsprozess abwarten muss. Hinter den Pivot-Tabellen liegen Datenbank-Tabellen. Wie bekomme ich das am einfachsten hin?
Vielen D...
28.10.2008 10:27:00
Thread-ID: 1019831
2 Beiträge
Anzeige
Datei automatisch speichern nach Eingabe
Franz

Hallo zusammen,
habe folgendes Problem:
über eine Vorlage (XLT) wird ein neues Arbeitsblatt erstellt. In 2 Zellen (D7 und B13) sollen Kundennummer und Reparaturnummer eingetragen werden. Auf dem Blatt gibt es einen Button der die Datei dann speichert und zwar in der Form: Kundennummer_R...
29.04.2009 13:13:57
Thread-ID: 1071890
2 Beiträge
Pivottabellen automatisch aktualisieren
martin

Hallo,
Ich aktualisiere bis jetzt meine Pivottabellen über folgenden Code: Private Sub Worksheet_Activate() Dim pt As PivotTable For Each pt In Me.PivotTables pt.RefreshTable Next End Sub
dabei muss ich ja immer das Tabellenbaltt neu aktivieren auch wenn ich bereits in dem Tabellenbla...
05.11.2009 12:41:16
Thread-ID: 1114702
3 Beiträge
Anzeige
Filtern nach Eingabe
Steffen

Guten Morgen. Ich tüftle seit ner Weile an folgendem Sachverhalt:
Ich möchte eine Tabelle nacheinander nach allen Werte einer Spalte filtern und als PDF-Drucken. Die Spaltennummer in der gefiltert wird, steht unter
Code:
feg = ThisWorkbook.Worksheets("system").Range("E12").Value...
07.04.2010 17:24:27
Thread-ID: 1150498
7 Beiträge
Excel 2003: Tabelle automatisch aktualisieren
Melanie

Hallo liebe Community,
anbei findet Ihr mein Excel-File. Ich habe auch das Problem darin beschrieben. Falls mir jemand helfen kann, bitte schaut es euch mal an. Ich glaube man braucht dazu VBA-Programmierung.
ich danke euch
vlg
https://www.herber.de/bbs/user/76106.xls
11.08.2011 02:35:44
Thread-ID: 1225605
2 Beiträge
Automatische Änderung eines Textes nach Eingabe
lutz

Hallo Excel-Freunde,
ich würde gerne Eingaben direkt danach durch etwas anderes ersetzen - ähnlich wie eine Autokorrektur.
Die variablen Schreibe ich in Tabelle "var" Zelle D2-..., den Variablennamen in Zelle A2-...
Nach der Eingabe von z.B. "xxxc B6" soll dann daraus etwas anderes...
15.01.2012 22:08:40
Thread-ID: 1246301
3 Beiträge
Zellinhalt automatisch nach Zelleingabe kopieren
Ralf

Hallo Forum,
ich gebe in dem Bereich B21:B28 Zahlen ein und bilde in Zelle B29 daraus die Summe.
Jetzt soll nach Eingabe einer Zahl im Bereich B21:B28 automatisch die Summe nach F29 kopiert werden.
Wie kann man so was in VBA lösen?
Vielen Dank im Voraus für Eure Unterstützung.
05.10.2012 08:02:23
Thread-ID: 1280607
8 Beiträge
Tabelle einfügen & automatisch aktualisieren
Issa

Hallo Leute,
ich habe zwei Probleme bei einer Excel Tabelle..
Vorab relevante Infos:
Ich habe ein Tabellenblatt zusammengestellt, das sich Werte aus Zellen anderer Tabellenblätter rauszieht.
Mein programmiertes Tabellenblatt soll häufiger verwendet werden und ich füge es immer i...
04.03.2015 16:29:16
Thread-ID: 1412757
5 Beiträge
Anzeige

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
1
4
1
2
1
6
1
2
7
4
1
5
2
2
6
7
2
3
1
4
4
15
2
4
1