Thema Datum  Von Nutzer Rating
Antwort
29.07.2017 15:22:18 Daniela
NotSolved
29.07.2017 16:47:56 Gast30340
NotSolved
Rot Auszugebende Tabellenwerte eingrenzen
29.07.2017 18:38:49 Ben
NotSolved
29.07.2017 18:49:22 Daniela
NotSolved
29.07.2017 21:21:25 Ben
NotSolved
29.07.2017 22:36:42 Gast48376
NotSolved
30.07.2017 00:17:36 Ben
NotSolved

Ansicht des Beitrags:
Von:
Ben
Datum:
29.07.2017 18:38:49
Views:
665
Rating: Antwort:
  Ja
Thema:
Auszugebende Tabellenwerte eingrenzen

Hallo Daniela,

anhand Deiner Erläuterungen kann ich nur zwei Kriterien ausmachen:

Einblenden von Daten, Beginnend mit Spalte D >= 0,1 bis einschließlich Spalte H = 0,01

In wieweit der Wert Vorspannkraft Einflus auf die Bedingungen haben, kann ich nicht bewerten.

Der Code berücksichtigt daher nur die Spalten D und H:

Sub FilterData()
    Dim rng As Range
    Dim bDataOutput As Boolean
    With ActiveWorkbook.Worksheets(1)
        For Each rng In .Range(.Range("A2"), .Range("J2").End(xlDown)).Rows
            If rng.Cells(1, 4) >= 0.1 Then
                bDataOutput = True
            End If
            If bDataOutput And rng.Cells(1, 8) = 0.01 Then
                bDataOutput = False
            End If
            rng.EntireRow.Hidden = Not bDataOutput
            VBA.DoEvents
        Next
    End With
End Sub

LG, Ben


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
29.07.2017 15:22:18 Daniela
NotSolved
29.07.2017 16:47:56 Gast30340
NotSolved
Rot Auszugebende Tabellenwerte eingrenzen
29.07.2017 18:38:49 Ben
NotSolved
29.07.2017 18:49:22 Daniela
NotSolved
29.07.2017 21:21:25 Ben
NotSolved
29.07.2017 22:36:42 Gast48376
NotSolved
30.07.2017 00:17:36 Ben
NotSolved