Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeile ausblenden wenn bestimmter Wert

Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:26:00
Patricia
Hallo,
ich würde gerne mit einem Makro die Zeile 25 ausblenden, wenn in der Zelle B27 ein Wert drinnen steht der größer als 0 ist.
Leider habe ich keine Ahnung wie ich das machen kann.
Vielen lieben Dank im Voraus für eure Hilfe
Grüße
Patricia
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:32:56
Hajo_Zi
Hallo Patricia,
ist es eine Eingabe oder Formel ?

AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:35:00
Patricia
...In der Zelle B27 wird manuell ein Wert eingegeben...
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:43:26
Hajo_Zi
HHallo Patricia,
unter dere Tabelle

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Rows("25:25").EntireRow.Hidden = Range("B25") 



nur das einblenden der Zeile mus wieder von Hand erfolgen.
Gruß Hajo

Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:45:37
Hajo_Zi
hallo Patricia,
auf Grund Deines letzten Beitrages
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, Doppelklick auf die Tabelle und Code ins rechte Fenster kopieren, VBA Editor schließen.
Gruß Hajo
Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:46:51
Patricia
Hallo Hajo,
vielen Dank, das funktioniert super... gibt es nicht auch eine möglichkeit die Zeile Automatisch wieder einzublenden wenn der Wert 0 bzw. die Zelle leer ist?
Danke nochmal
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:49:06
Patricia
Hajo, vielen Dank... es funktioniert jetzt beides... Schönen Tag wünsch ich dir noch... lg Patricia
Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:50:32
Hajo_Zi
Hallo Patricia,
wie trägst Du in eine ausgeblendete Zeile was ein?
Mache eine Formel in die Zelle und bei jeder Eingabe in der Tabelle wird die Zeile ein- oder ausgeblendet.
Gruß Hajo
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:34:37
Christian
Servus Patricia,

Sub T()
If IsNumeric(Range("B27")) and Range("B27").Value > 0 Then
Rows(25).Hidden = True
Else
Rows(25).Hidden = False
End if
End Sub


Gruß
Chris

Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:43:02
Patricia
Vielen Dank... leider funktioniert das aber nicht. Es ist nicht so, dass eine Fehlermeldung kommt sondern es macht einfach gar nichts.
Ich bin ein kompletter VBA Neuling... !!! Muss ich vor deinen Code noch etwas hinschreiben?
lg und nochmals Danke
Patricia
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:44:50
Christian
Servus,
bei Eingabe in B27 so:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$27" Then
If IsNumeric(Target.Value) And Target.Value > 0 Then
Rows(25).Hidden = True
Else
Rows(25).Hidden = False
End If
End If
End Sub


Das Makro kommt in das entsprechende Tabellenmodul im VBA-Editor (Alt+F11) (z.B. Tabelle1, da wo es eben laufen soll)
Gruß
Chris

Anzeige
AW: Zeile ausblenden wenn bestimmter Wert
29.10.2008 14:48:00
Patricia
... Vielen Dank, jetzt hat es geklappt ;-)
lg Patricia

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zeilen in Excel ausblenden basierend auf bestimmten Werten


Schritt-für-Schritt-Anleitung

Um in Excel eine Zeile auszublenden, wenn in einer bestimmten Zelle ein Wert größer als 0 steht, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den VBA-Editor:

    • Drücke Alt + F11 in Excel.
  2. Finde das richtige Tabellenmodul:

    • Klicke im Projektfenster auf die Tabelle, in der du die Zeile ausblenden möchtest (zum Beispiel „Tabelle1“).
  3. Füge den folgenden Code ein:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Target.Address = "$B$27" Then
           If IsNumeric(Target.Value) And Target.Value > 0 Then
               Rows(25).Hidden = True
           Else
               Rows(25).Hidden = False
           End If
       End If
    End Sub
  4. Schließe den VBA-Editor:

    • Gehe zurück zu Excel und teste den Code, indem du einen Wert in Zelle B27 eingibst.

Häufige Fehler und Lösungen

  • Code funktioniert nicht: Stelle sicher, dass du den Code im richtigen Tabellenmodul eingefügt hast. Der Code sollte in dem Modul der Tabelle stehen, wo sich die Zelle B27 befindet.

  • Zeile wird nicht ausgeblendet: Überprüfe, ob der Wert in B27 tatsächlich größer als 0 ist und ob die Zelle als Zahl formatiert ist.

  • Eingabe in ausgeblendeter Zeile: Wenn du in einer ausgeblendeten Zeile Werte eingeben möchtest, musst du die Zeile zuerst wieder einblenden, um die Eingabe vorzunehmen.


Alternative Methoden

Wenn du keine VBA-Lösungen verwenden möchtest, kannst du auch bedingte Formatierungen nutzen, um den Inhalt einer Zeile visuell auszublenden:

  1. Markiere die Zeile:

    • Wähle die Zeile, die du ausblenden möchtest.
  2. Gehe zu „Bedingte Formatierung“:

    • Wähle „Neue Regel“ und dann „Formel zur Ermittlung der zu formatierenden Zellen verwenden“.
  3. Gib die Formel ein:

    =B27>0
  4. Wähle die Formatierung:

    • Setze die Schriftfarbe auf die gleiche Farbe wie den Hintergrund (z.B. Weiß auf Weiß).

Diese Methode blendet die Zeile nicht physisch aus, sondern macht sie nur unsichtbar.


Praktische Beispiele

Hier ist ein praktisches Beispiel für das Ausblenden von Zeilen in Excel:

  • Szenario: Du möchtest Zeile 25 ausblenden, wenn in B27 ein Wert größer als 0 eingegeben wird.
  • VBA-Code:
    Private Sub Worksheet_Change(ByVal Target As Range)
      If Target.Address = "$B$27" Then
          If IsNumeric(Target.Value) And Target.Value > 0 Then
              Rows(25).Hidden = True
          Else
              Rows(25).Hidden = False
          End If
      End If
    End Sub

Tipps für Profis

  • Automatisierung: Du kannst den VBA-Code erweitern, um mehrere Zeilen basierend auf verschiedenen Zellen auszublenden.

  • Fehlerbehandlung: Füge eine Fehlerbehandlung im VBA-Code hinzu, um mögliche Laufzeitfehler abzufangen.

  • Zeilen nach Inhalt ausblenden: Verwende ähnliche Logik, um Zeilen mit bestimmten Inhalten auszublenden, indem du den Zellinhalt überprüfst.


FAQ: Häufige Fragen

1. Wie kann ich mehrere Zeilen gleichzeitig ausblenden?
Du kannst die Zeilen in der Rows-Anweisung angeben, wie Rows("25:30").Hidden = True.

2. Funktioniert das auch in Excel Online?
VBA ist in Excel Online nicht verfügbar. Du musst die Desktop-Version verwenden.

3. Was passiert, wenn ich eine Formel in B27 eingebe?
Wenn B27 eine Formel enthält, die einen Wert größer als 0 zurückgibt, wird die Zeile ebenfalls ausgeblendet.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige