Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Wo liegt der Fehler im Code..?

Forumthread: Wo liegt der Fehler im Code..?

Wo liegt der Fehler im Code..?
08.01.2009 13:29:00
Kathi
Halli Hallo...
Ich bins schon wieder mit einem weiteren problem:
Ich nutze den AutoFilter mit einer Passwortabfrage kombiniert.
...
ElseIf txtOK.Text = p And txtPass.Text = q Then
frmStart.Hide
For I = 3 To 19
ThisWorkbook.Sheets(I).Visible = True
ThisWorkbook.Sheets(I).Columns("A:A").AutoFilter Field:=1, Criteria1:="g", Operator:=xlOr, Criteria2:="j", VisileDropDown:=False
ThisWorkbook.Sheets(I).Rows(146).Hidden = False
ThisWorkbook.Sheets(I).Rows(226).Hidden = False
Application.ScreenUpdating = True
Next
...
Der User der sich hinter txtOk.text bzw. txtPass.Text verbirgt ist nicht als Name in der Filterspalte enthalten. Der User soll die Ansicht von zwei anderen Usern sehen. Daher wollte ich zwei Kriterien einbeziehen.
p & q ist als String geschrieben und ist der User der sich anmeldet.
Er soll die Daten von g und j sehen. Ich glaube ich habe die Kriterien falsch bestimmt...
g = Wagemann
j = Escher
Wie schreibt man das richtig?
Hat jemand ne Idee.. Danke im Voraus!!
Lg Kathi
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wo liegt der Fehler im Code..?
08.01.2009 13:34:29
Josef
Hallo Kathy,
ich glaube das müsste so lauten
ThisWorkbook.Sheets(I).Columns("A:A").AutoFilter Field:=1, Criteria1:="=" & g, Operator:=xlOr, Criteria2:="=" & j, VisileDropDown:=False

Gruß Sepp

Anzeige
AW: Wo liegt der Fehler im Code..?
08.01.2009 13:47:19
Kathi
Hi!
Super funktioniert supi!
Alles Spitze hier.. tolles Forum mit tollen Leuten.
Cu und vielen vielen Dank.
Kathi

Forumthreads zu verwandten Themen

Anzeige