Thema Datum  Von Nutzer Rating
Antwort
17.03.2011 15:11:03 Samad
NotSolved
17.03.2011 15:46:38 Severusq
Solved
18.03.2011 09:19:47 Samad
NotSolved
Blau Zellen automatisch ausblenden bei auswahl eines Namens
 18.03.2011 11:07:55 Severus
Solved
18.03.2011 11:37:19 Samad
NotSolved

Ansicht des Beitrags:
Von:
Severus		 Datum:
18.03.2011 11:07:55		 Views:
871		 Rating:
     
Antwort:
 Nein
Thema:
Zellen automatisch ausblenden bei auswahl eines Namens

Probier mal

Private Sub Worksheet_Change(ByVal Target As Range) 
Dim strINHALT As String
If Target.Address <> "$D$6" Then Exit Sub
strINHALT = Target.Value
Sheets("1").Activate
With ActiveSheet 'Hier den wirklichen Arbeitsblattnamen eingeben 
     Select Case strINHALT 
     Case Is = "Name1"
     'alle Zeilen Name2 ausnblenden 
          .Rows("29:43").Hidden = True
     'alle Zeilen Name1 nicht ausnblenden 
          .Rows("44:51").Hidden = False
     Case Is = "Name2"
     'Zeilen von Name1 ausnblenden 
          .Rows("44:51").Hidden = True
     'alle Zeilen Name2 nicht ausnblenden 
          .Rows("29:43").Hidden = False
     End Select
End With
Sheets("Inhalt").Activate
End Sub

 

BTW: Das "q" in Severusq war natürlich ein Tippfehler!

Severus

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.03.2011 15:11:03 Samad
NotSolved
17.03.2011 15:46:38 Severusq
Solved
18.03.2011 09:19:47 Samad
NotSolved
Blau Zellen automatisch ausblenden bei auswahl eines Namens
 18.03.2011 11:07:55 Severus
Solved
18.03.2011 11:37:19 Samad
NotSolved