Thema Datum  Von Nutzer Rating
Antwort
04.12.2016 16:56:19 Huber
Solved
04.12.2016 17:35:07 Gast91968
NotSolved
04.12.2016 18:04:40 Gast40901
NotSolved
Blau Zeilen ausblenden
 04.12.2016 20:43:28 Onur
NotSolved
06.12.2016 17:32:13 Gast61365
NotSolved

Ansicht des Beitrags:
Von:
Onur		 Datum:
04.12.2016 20:43:28		 Views:
792		 Rating:
     
Antwort:
  Ja
Thema:
Zeilen ausblenden

 

 


  Sub Zeilenausblenden()
Dim i As Integer
   Dim Reihe As Integer
   For i = 13 To 1000
      Sheets("Struktur").Activate

      Cells(i, 1).Select
      If WorksheetFunction.CountBlank(ActiveCell) <0 Then
         Reihe = i + 1
         Sheets("PlanGesamt").Activate
         Range(Cells(i, 1), Cells(Reihe, 1)).EntireRow.Hidden = True
         i = i + 1
      End If
   Next i
End Sub

WorksheetFunction.CountBlank ignoriert Formeln usw, reagiert nur auf Zahlen oder Text.

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
04.12.2016 16:56:19 Huber
Solved
04.12.2016 17:35:07 Gast91968
NotSolved
04.12.2016 18:04:40 Gast40901
NotSolved
Blau Zeilen ausblenden
 04.12.2016 20:43:28 Onur
NotSolved
06.12.2016 17:32:13 Gast61365
NotSolved