Thema Datum  Von Nutzer Rating
Antwort
04.08.2008 11:58:11 Manuela
NotSolved
Blau Aw:VBA Zeilen ausblenden, aber nur wenn...
 04.08.2008 14:41:43 Holger
NotSolved

Ansicht des Beitrags:
Von:
Holger		 Datum:
04.08.2008 14:41:43		 Views:
812		 Rating:
     
Antwort:
  Ja
Thema:
Aw:VBA Zeilen ausblenden, aber nur wenn...
Hallo Manuela,
versuche es mit

Sub ...
Dim i,ansp
For i = 1 To Range(Cells(Rows.Count, 1), Cells(Rows.Count, 1)).End(xlUp).Row
Ansp = Range(Cells(i, Columns.Count), Cells(i, Columns.Count)).End(xlToLeft).Column
If Ansp = 1 Then Rows(i).Hidden = True
Next i
End sub

Gruß
Holger


Manuela schrieb am 04.08.2008 11:58:11:

... in der kompletten Zeile, außer Spalte A nichts enthalten ist.
Formeln ausgenommen.

Hi, ich würde mich freuen ihr mir bei diesem Problem helfen könntet!

Bis jetzt habe ich Folgendes:

Sub LeereZeilenAusblenden()
Dim Markierung As Range, Wert As String
Set Markierung = ActiveSheet.Range("C2:C15")
For Each Zelle In Markierung
Wert = Zelle.Value

If Wert = "" Or Wert = "0" And
' wenn irgendein wert in der zeile nicht leer' Then Rows(Zelle.Row).Hidden = False

If Wert = "" Or Wert = "0" Then Rows(Zelle.Row).Hidden = True
Next Zelle
End Sub

Ich danke auch schonmal im Voraus!
:)

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.08.2008 11:58:11 Manuela
NotSolved
Blau Aw:VBA Zeilen ausblenden, aber nur wenn...
 04.08.2008 14:41:43 Holger
NotSolved