Vba Ausblenden

Forumthread: Vba Ausblenden
8 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Vba Ausblenden

Vba Ausblenden

22.02.2025 15:09:17

Hallo
ich bin am Verzweifeln.

B7 habe ich 2 Werte ( Dropdown)

Bei Wahl sollen bei 1
Spaltenbereich L:AA Ausgeblendet und
Spaltenbereich AC:AL Einblenden

Bei Wahl 2 genau anders herum
Spaltenbereich L:AA Einblenden und
Spaltenbereich AC:AL Ausgeblenden

Versuche habe ich schon viele gemacht aber es klappt einfach nicht.

Kann mir jemand bitte Helfen? Danke

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Vba Ausblenden

22.02.2025 15:21:46

Marc
AW: Vba Ausblenden

22.02.2025 16:00:42

Fa
AW: Vba Ausblenden

23.02.2025 00:43:58

Daniel
AW: Vba Ausblenden

23.02.2025 16:35:29

Fa
Na...

22.02.2025 20:06:38

Case
Vielleicht...

22.02.2025 15:58:19

Case
AW: Vba Ausblenden

23.02.2025 11:01:34

GerdL
AW: Vba Ausblenden

23.02.2025 20:58:58

Piet

AW: Vba Ausblenden

22.02.2025 15:21:46

Marc

dann jeweils Bereich anpassen, der angezeigt oder ausgeblendet werden soll





ActiveSheet.Columns("L:AA").Hidden = True

AW: Vba Ausblenden

22.02.2025 16:00:42

Danke und wie kann ich das mit den Auswahl wenn 1 oder 2

Mit den verschiedenen Auswahl

Gruß
Fabian

AW: Vba Ausblenden

23.02.2025 00:43:58

Daniel

Hi

Was genau ist dein Problem?
Das ein- und ausblenden?

Select Case Ranger("B7").Value

    Case 1

        Range("L:AA").entirecolum.hidden = true

        Range("AC:AL").entirecolum.hidden = false

    Case 2

        Range("L:AA").entirecolum.hidden = false

        Range("AC:AL").entirecolum.hidden = true

Case else

Oder ist das Problem, das Makro automatisch über das DropDown auszulösen?

Gruß Daniel

AW: Vba Ausblenden

23.02.2025 16:35:29

Hallo Daniel,

es sollte dich Automatisch ein und Ausblenden. Und eigentlich wollte ich das ohne Modul machen, was scheinbar jedoch nicht funktioniert.

Ich gehe in der VBA Oberfläche auf Speichern und dann soll ich ein Modul erstellen, was ja eigentlich gar nicht haben möchte.

Denke ich falsch?

Gruß Fabian

Na...

22.02.2025 20:06:38

Case

Moin, :-)

... so: ;-)
https://www.herber.de/forum/messages/2006898.html

Servus
Case

Vielleicht...

22.02.2025 15:58:19

Case

Min, :-)

... so? ;-)
https://www.herber.de/bbs/user/175932.xlsb

Servus
Case

AW: Vba Ausblenden

23.02.2025 11:01:34

GerdL

Moin,

bei 1, 2 und 3 mit der Datenüberprüfung in B7 zur Auswahl geht es auch so:

Private Sub Worksheet_Change(ByVal Target As Range)



    If Target.Address = "$B$7" Then

    

        Columns("L:AA").Hidden = (Range("b7").Value = 1)

        Columns("AC:AL").Hidden = (Range("b7").Value = 2)

    

    End If



End Sub

Gruß Gerd

AW: Vba Ausblenden

23.02.2025 20:58:58

Piet

Hallo

du fragst für eine VBA Lösung an, wolltest es dann ohne Modul?? - Das geht nicht!
Wenn du nicht weiss wie man es mit Makro macht, hier hast du eine komplette Funktion.
Dieses Makro befindet sich im Sheet für Tabelle1, es gehört NICHT in ein Modul!!
https://www.herber.de/bbs/user/175941.xlsm

PS Ich habe noch die Zahl drei eingefügt, um alle Spalten Einzublenden. Wenn dich das stört die Zahl 3 löschen.

mfg Piet

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