Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Spalten ausblenden z.B. WENN A1=1





Frage

Hallo, ich möchte Spalte B ausblenden wenn in Zelle A1 der Wert 1 steht. Bei Wert 2 soll Spalte C ausgeblendet werden und Spalte B wieder eingeblendet werden usw. Benötige hierbei HILFE? Danke im Voraus. Gruß Oliver

Antwort 1 von Hajo_Zi

Hallo Oliver,

das geht nur per VBA über das Change Ereignis.

Gruß Hajo

Antwort 2 von neueinsteiger

Hallo Hajo,

könntest du das bitte näher beschreiben.
Wie muss das Change Ereignis gemacht werden, damit das funktioniert?

Gruß Oliver

Antwort 3 von Hajo_Zi

Hallo Oliver,

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Cells.EntireColumn.Hidden = False
Columns(CInt(Target) + 1).EntireColumn.Hidden = True
End If
End Sub

Gruß Hajo

Antwort 4 von neueinsteiger

Hallo Hajo,

das funktioniert super. Danke.

Was muss ich im Code ändern, damit ich beliebige Spalten ausblenden kann. Meine Tabelle ist nämlich etwas größer.

Also z.B.:
Wenn A1=1 dann spalte B
wenn A1=2 dann spalte E
wenn A1=3 dann spalte D
usw.

Danke im Voraus.

Gruß Oliver

Antwort 5 von Hajo_Zi

Hallo Oliver,

da sehe ich keine Logik. Das muß mit select Case gemacht werden.

Gruß Hajo

Antwort 6 von Neueinsteiger

Hallo,

vielleicht sollte ich das Problem anders beschreiben.

Wenn in Zelle A1 der Wert 4 steht sollen die Spalten D, E, F ausgeblendet werden. Wenn der Wert 5 steht soll C, E, F, G ausgeblendet werden und noch viele mehr. Der Zellenwert A1 wird durch bestimmte Bedingungen befüllt. Also bei Wert bestimmte Spalten ausblenden.

Benötige hierbei noch dringend Hilfe, da ich einfach nicht auf die Lösung komm.

DANKE.

Gruß Oliver

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: