Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Spalten ausblenden
#1
Hallo,

ich benötige wie es die Überschrift so sagt, eine Möglichkeit, alle Spalten auszublenden bis auf eine und diese mit hilfe von Buttoms zu wechseln. GGF mit der Suche auch direkt hinzuwechseln via Art Nr... (siehe Screenshot)

Also das was Gelb ist, sollte sozusagen durchwechseln.

merci für eure Hilfe LG Jürgen


Angehängte Dateien
.xlsx   Neuer Test für Excel Makro.xlsx (Größe: 31,05 KB / Downloads: 5)
Antworten Top
#2
Hallo 2...,

dafür gibt es in Excel unter "Daten">"Gliederung" die Funktion "Gruppieren".
helmut

Für mich ist die Möglichkeit in Excel an Zellen und Bereichen Namen zu vergeben die wichtigste Funktionalität.
Sie macht Formeln und den VBA-code verständlicher. Für Makros gilt die Regel: "Nur über benannte Bereiche auf den Inhalt der Zellen zugreifen."
Und wofür sind Regeln da? Um nachzudenken bevor man sie bricht.





Antworten Top
#3
Hallo Helmut,

ich kenne die Grupierfunktion, aber die nutz man ja für ganze Blöcke.

So wie ich das gerne hätte nur eine Spalte wie auf dem Bild ist nicht möglich?

Auch nicht als VBA?
Antworten Top
#4
Hallo,

Zitat:Auch nicht als VBA?

Deine Datei habe ich nicht gelesen, aber mit VBA ginge Spalten ein-, ausblenden so.
Im Beispiel werden die Spalten D bis R ein-, bzw. ausgeblendet.

Zitat:Option Explicit

Sub Spalten_AUSblenden()
    Columns("D:R").EntireColumn.Hidden = True
End Sub

Sub Spalten_EINblenden()
    Columns("D:R").EntireColumn.Hidden = False
End Sub
________________________________________________________________________
wer aufgibt, ohne es versucht zu haben, gibt einfach nur auf!

Grüße aus Norderstedt, Peter
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste