Zeile und Spalte ein und ausblenden

[Mom]

Hallo, ich habe hier ein Probelm und komme absolut nicht weiter.



Unzwar muss ich eine Exceltabelle herstellen, inder ich Lastannahmen berrechnen kann.
Das Problem ist, das ich die anzahl der Schichten varrieren muss.

Es soll sich eine Spalte einblenden, sobald eine "1" eingegeben wird.
Wenn eine "2" eingetippt wird, sollen zwei Spalten eingeblendet werden.


Die Zelle in der ich die Anzahl eintippe will, ist C6. Darauf sollen dann die Spalten E,F,G,...,K ein oder ausgeblendet werden. Jenachdem welche Zahl man eingibt (1-8)


Ich hoffe ihr wisst was ich machen möchte.!!!  :s :s :s

[GMG-CC]

Moin,
das geht mit Sicherheit prima mit VBA.
Prüfe die Eingabe in C6. Wenn das 1..8 ist, dann blende alle 8 Spalten aus und je nach Eingabe dann wieder ein.
Das ist gewiss der beste Weg.

[Mom]

Hallo,

Ich habe leider nicht so viel Erfahrung und würde gerne wissen, ob Sie das detailierter erklären könnten :)

[atilla]

Hallo,

folgenden Code in das Codemodul der betreffenden Tabelle einfügen:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address(0, 0) = "C6" Then
   Select Case Target
     Case 1 To 7
     Columns("E:K").Hidden = True
     Range(Cells(1, 4), Cells(1, Target + 4)).EntireColumn.Hidden = False
   End Select
 End If
End Sub

E:K sind 7 Spalten