Thema Datum  Von Nutzer Rating
Antwort
26.02.2020 14:54:41 Torsten L.
NotSolved
Blau Ausgeblendete Sheets in einer Schleife ignorieren
26.02.2020 15:06:35 Mase
Solved
26.02.2020 15:49:46 Gast28563
NotSolved
26.02.2020 16:25:11 Mase
NotSolved
28.02.2020 07:40:20 Torsten L.
Solved
28.02.2020 07:58:28 Mase
NotSolved
28.02.2020 09:01:35 Torsten L.
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
26.02.2020 15:06:35
Views:
570
Rating: Antwort:
 Nein
Thema:
Ausgeblendete Sheets in einer Schleife ignorieren

Hi,

Sub SheetsVisibleA()
    'https://docs.microsoft.com/de-de/office/vba/api/excel.xlsheetvisibility
    
    Dim wksWorksheet As Worksheet
    For Each wksWorksheet In ActiveWorkbook.Worksheets
        Select Case wksWorksheet.Visible
            Case xlSheetHidden
                Debug.Print wksWorksheet.Name; wksWorksheet.Visible; "xlSheetHidden"
            Case xlSheetVeryHidden
                Debug.Print wksWorksheet.Name; wksWorksheet.Visible; "xlSheetVeryHidden"
            Case Else
                Debug.Print wksWorksheet.Name; wksWorksheet.Visible
        End Select
    Next wksWorksheet
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
26.02.2020 14:54:41 Torsten L.
NotSolved
Blau Ausgeblendete Sheets in einer Schleife ignorieren
26.02.2020 15:06:35 Mase
Solved
26.02.2020 15:49:46 Gast28563
NotSolved
26.02.2020 16:25:11 Mase
NotSolved
28.02.2020 07:40:20 Torsten L.
Solved
28.02.2020 07:58:28 Mase
NotSolved
28.02.2020 09:01:35 Torsten L.
NotSolved