Thema Datum  Von Nutzer Rating
Antwort
05.01.2016 14:37:22 kaba
NotSolved
06.01.2016 16:15:32 Gast42640
NotSolved
06.01.2016 18:46:16 Gast61665
NotSolved
06.01.2016 20:29:48 Gast11890
NotSolved
06.01.2016 22:02:52 Gast91364
NotSolved
06.01.2016 22:33:21 Gast72822
NotSolved
07.01.2016 00:41:21 Gast99138
NotSolved
07.01.2016 05:16:31 Gast25261
NotSolved
Rot Text-Suche in Spalte wie bei Autofilter jedoch per Script?
07.01.2016 05:18:42 Gast24746
NotSolved
07.01.2016 10:32:22 Gast89006
NotSolved
07.01.2016 12:42:30 Gast73040
*****
Solved
07.01.2016 15:31:50 kaba
NotSolved

Ansicht des Beitrags:
Von:
Gast24746
Datum:
07.01.2016 05:18:42
Views:
457
Rating: Antwort:
  Ja
Thema:
Text-Suche in Spalte wie bei Autofilter jedoch per Script?

Eins ist mir grad aufgefallen. Beim Filter sollen ja zwei Werte gleichzeitig zutreffen. Dann muss in der Zeile 10 ein xlAnd rein. Der Code unten sollte dann gehen. 

Gruß

 

Sub Autofilter2()
Dim suche

suche = Split(Worksheets(2).Cells(1, 5), ";")

If UBound(suche) = -1 Then End
If UBound(suche) = 0 Then
    Worksheets(1).Range("C:G").AutoFilter Field:=3, Criteria1:="=*" & Worksheets(1).Cells(1, 5) & "*"
Else
    Worksheets(1).Range("C:G").AutoFilter Field:=3, Criteria1:="=*" & suche(0) & "*", Operator:=xlAnd, Criteria2:="=*" & suche(1) & "*"
End If
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
05.01.2016 14:37:22 kaba
NotSolved
06.01.2016 16:15:32 Gast42640
NotSolved
06.01.2016 18:46:16 Gast61665
NotSolved
06.01.2016 20:29:48 Gast11890
NotSolved
06.01.2016 22:02:52 Gast91364
NotSolved
06.01.2016 22:33:21 Gast72822
NotSolved
07.01.2016 00:41:21 Gast99138
NotSolved
07.01.2016 05:16:31 Gast25261
NotSolved
Rot Text-Suche in Spalte wie bei Autofilter jedoch per Script?
07.01.2016 05:18:42 Gast24746
NotSolved
07.01.2016 10:32:22 Gast89006
NotSolved
07.01.2016 12:42:30 Gast73040
*****
Solved
07.01.2016 15:31:50 kaba
NotSolved