Hallo User
https://abload.de/img/2023.05.08_excel01ukflv.png
ich habe eine intelligente Tabelle erstellt. Nun benötige ich in Spalte 1 keinen Filterpfeil
wie kann ich den Pfeil für Spalte 1 entfernen aber die andern brauche ich noch
Gruß und Danke
Moin!
Das geht nur mittels VBA.
Code:
Tabelle2.ListObjects(1).DataBodyRange.AutoFilter 3, VisibleDropdown:=False
Entfernt den 3. Filterpfeil im ListObject.
Gruß Ralf
Danke für die schnelle Nachricht.
Leider kenne ich mich nicht so gut aus mit VBA
Wenn ich die Tabelle öffne,muss ich dann irgendeine Aktion machen?
Kannst Du mir da helfen?
Da es sich um ein "Wegwerfmakro" handelt, muss nichts gespeichert werden.
Vorteil ist, dass die Datei eine .xlsx bleiben kann.
Folgender Ablauf:
• öffne mittels Alt+F11 den VBA-Editor
• unten müsste es ein Fenster Direktbereich geben
• falls nicht, öffne es mittels Strg+g
• dort hinein kopierst Du obigen Code und bestätigst ihn mit Enter
• den VBA-Editor kannst Du jetzt wieder schließen
Zur Anpassung solltest Du besser den Namen des Tabellenblatts nehmen:
Worksheets("mein Tabellenblatt").ListObjects(1).DataBodyRange.AutoFilter 3, VisibleDropdown:=False
Gruß Ralf
danke,
probiere ich, Bleibt der Pfeil dan verschunden?
Ja!
(siehe Anhang)
Du machst ihn wieder sichtbar, indem Du in obiger Codezeile False durch True ersetzt.
Oder einfach zweimal im Ribbon Daten auf Filtern klickst.
Es heißt:
Worksheets("Passwort-Liste")
nicht
Worksheets(Passwort-Liste)
→ Füßchen der Gänse nicht vergessen!
Da fehlen immer noch die ""!
Ich gebe es auf!