Thema Datum  Von Nutzer Rating
Antwort
07.11.2022 10:12:14 Gast12786
Solved
Blau Beispiel
 07.11.2022 11:10:49 Mase
NotSolved
07.11.2022 15:35:58 Flotter Feger
NotSolved
07.11.2022 15:50:37 Mase
NotSolved
14.11.2022 07:37:56 Gast12786
Solved

Ansicht des Beitrags:
Von:
Mase		 Datum:
07.11.2022 11:10:49		 Views:
257		 Rating:
     
Antwort:
  Ja
Thema:
Beispiel

Hinweis:

Ich nehme an, dass das Referenzieren des ListObjects kein Problem darstellt.

 

Ausgangslage:

 

Code:

Option Explicit

Sub Main()

    Dim iDurchmesser    As Integer
    Dim iToleranz       As Integer
    
    iDurchmesser = 50
    iToleranz = 10
            
    ActiveSheet.ListObjects(1).Range.AutoFilter _
                                                Field:=1, _
                                                Criteria1:=">=" & (iDurchmesser - iToleranz), _
                                                Operator:=xlAnd, _
                                                Criteria2:="<=" & (iDurchmesser + iToleranz)
    
        
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
07.11.2022 10:12:14 Gast12786
Solved
Blau Beispiel
 07.11.2022 11:10:49 Mase
NotSolved
07.11.2022 15:35:58 Flotter Feger
NotSolved
07.11.2022 15:50:37 Mase
NotSolved
14.11.2022 07:37:56 Gast12786
Solved