Thema Datum  Von Nutzer Rating
Antwort
Rot Autofilter über Textboxen in Userform
 01.07.2020 23:17:08 Ingo
NotSolved
01.07.2020 23:44:58 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Ingo		 Datum:
01.07.2020 23:17:08		 Views:
1553		 Rating:
     
Antwort:
  Ja
Thema:
Autofilter über Textboxen in Userform

Hallo:)

ich bastel gerad an einem Userform, welches mir über Textfelder on the Fly den Autofilter für bestimmte Spalten anwenden soll:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub CommandButton1_Click()
Me.Hide
End Sub
 
Private Sub TextBox1_Change()
If Len(TextBox1.Value) = 0 Then
    Tabelle1.AutoFilterMode = False
 
Else
If Tabelle1.AutoFilterMode = True Then
    Tabelle1.AutoFilterMode = False
End If
Tabelle1.Range("a1:c" & Rows.Count).AutoFilter field:=1, Criteria1:="*" & TextBox1.Value & "*"
 
End If
 
End Sub
 
Private Sub TextBox2_Change()
If Len(TextBox2.Value) = 0 Then
    Tabelle1.AutoFilterMode = False
 
Else
If Tabelle1.AutoFilterMode = True Then
    Tabelle1.AutoFilterMode = False
End If
Tabelle1.Range("a1:z" & Rows.Count).AutoFilter field:=8, Criteria1:="*" & TextBox2.Value & "*"
 
End If
 
End Sub

Wenn ich jetzt nur die  Sub TextBox1_Change

?
1
2
3
4
5
6
7
8
9
10
11
12
als Routine Starte funktioniert alles wunderbar mit dem Filtern einer Spalte. Aber sobald im Quelltext die Private Sub TextBox2_Change() mit ins Spiel kommt funktioniert das ganze nur noch bedingt.
Sobald ich den Inhalt von einem der beiden Textfelder lösche zeigt er mir wieder alle Datensätze in der Tabelle an obwohl der andere noch gesetzt ist.
 
Als Lösung hätte ich natürlich gern, dass wenn ich in Textbox1 "sch" angebe er mir nur datensätze die "sch" enthalten auswirft und wenn zusätzlich Textbox2 mit "aha"gefüllt wird alle Datensätze die "sch" im Namen haben und VON DIESEN "aha" in der Email oder Spalte 8 haben...
 
Lange Rede kurzer Sinn- ich denke ihr wisst was ich meine ;)
Mega Cool wäre natürlich auch wenn man über ne Checkbox noch sagen könnte ob nur die Schnittmenge von Textbox1 und Textbox 2 gefiltert werden sollen oder alle Datensätze angezeigt werden, welche eins der beiden Attribute erfüllen... Aber will jetzt ja auch nicht gleich zu anspruchsvoll werden:)
 
Desweiteren werden dann einige dieser Textfelder anfallen. Macht es da Sinn das ganze ala Funktionen oder so zu optimieren?
 
Danke für Eure Hilfe
Ingo

 

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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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
Rot Autofilter über Textboxen in Userform
 01.07.2020 23:17:08 Ingo
NotSolved
01.07.2020 23:44:58 ralf_b
NotSolved