Thema Datum  Von Nutzer Rating
Antwort
12.11.2022 08:57:38 Kati
Solved
Blau Ausblenden von Zeilen nur in bestimmten Tabellenblättern
 12.11.2022 13:35:13 ralf_b
*****
Solved
13.11.2022 10:17:24 Kati
NotSolved

Ansicht des Beitrags:
Von:
ralf_b		 Datum:
12.11.2022 13:35:13		 Views:
692		 Rating:
     
Antwort:
 Nein
Thema:
Ausblenden von Zeilen nur in bestimmten Tabellenblättern

aufgrund deiner Beschreibung, folgender Vorschlag.

Sub test()
    Dim ws     As Worksheet
    Dim i&, j&, cnt&
    
    Set ws = Worksheets("Übersicht")
    On Error Resume Next
    j = Intersect(ws.UsedRange, ws.Columns("C")).SpecialCells(xlCellTypeLastCell).Row
    If Err.Number > 0 Then MsgBox "Abbruch - Fehler bei Bereichsermittlung": Exit Sub
        
    For i = 6 To j
        On Error Resume Next
        With Worksheets(ws.Cells(i, "C").Text)
            If Err.Number > 0 Then
                MsgBox "Blatt '" & ws.Cells(i, "C").Text & "' existiert nicht - "
                On Error GoTo 0
            Else
                For cnt = .Cells(Rows.Count, "A").End(xlUp).Row To 6 Step -1
                    If .Cells(cnt, 1).Value = "" Then
                       .Rows(cnt).Hidden = True
                    End If
                Next
            End If
        End With
    Next
    
End Sub

 

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
12.11.2022 08:57:38 Kati
Solved
Blau Ausblenden von Zeilen nur in bestimmten Tabellenblättern
 12.11.2022 13:35:13 ralf_b
*****
Solved
13.11.2022 10:17:24 Kati
NotSolved