Anzeige
Archiv - Navigation
1860to1864
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Bestimmtes Ausblenden von Zellen

Bestimmtes Ausblenden von Zellen
06.12.2021 21:11:43
Zellen
Hallo zusammen,
ich verzweifele derzeit an folgender Aufgabenstellung:
Ich möchte die Zelle 15 ausblenden, wenn der Bereich B11:H11 in Summe keine werte aufzeigt oder = 0 ist. Habe es wie folgt versucht:
Sub Nullzeilen_ausblenden()
If Cells(11, 2) = "0" And Cells(11, 3) = "0" And Cells(11, 4) = "0" And _
Cells(11, 5) = "0" And Cells(11, 6) = "0" And Cells(11, 7) = "0" And _
Cells(11, 8) = "0" And Cells(11, 9) = "0" Then
Rows("15").Hidden = True
End If
End Sub Hier passiert leider nichts.
Ich hatte es auch bereits mit folgendem Code ausprobiert:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range(Cells(11, 2), Cells(11, 9)).Select Then
Rows("15").Hidden = Target.Value = "0"
End if
End Sub
Hier nur mit Teilerfolg. Zelle 15 verschwindet sobald ich irgendwo zwischen B11 und H11 eine 0 eingebe. Jedoch wird nicht darauf geachtet, ob in den anderen Feldern irgendwo ein Wert drin ist.
Könntet Ihr mir bitte auf die Sprünge helfen?
Besten Dank und Grüße

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hidden by Sum 0
06.12.2021 23:27:19
GerdL
Moin Theodor!

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range(Cells(11, 2), Cells(11, 9)), Target) Is Nothing Then
Rows(15).Hidden = Application.Sum(Range(Cells(11, 2), Cells(11, 9))) = 0
End If
End Sub
Gruß Gerd
AW: Bestimmtes Ausblenden von Zellen
06.12.2021 23:29:02
Zellen
Hallo Theo,
versuch es mal so:
If WorksheetFunction.Sum(Range("B11:H11")) = 0 Then
    Rows("15").Hidden = True
 End If
Gruß Karl-Heinz
Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige