Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Listview Steuerelement unter Access 2K
zurück: Neuer Datensatz in Unterformular mit automatischer KundenNr weiter: Barcode scannen und anschließend löschen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
hellblau
Autodidakt


Verfasst am:
19. Okt 2008, 14:35
Rufname:
Wohnort: München


Listview Steuerelement unter Access 2K - Listview Steuerelement unter Access 2K

Nach oben
       Version: Office 2k (2000)

Hallo Leute!

Ich habe ein Problem mit dem Listview Steuerelement.
In einem Formular verwende ich es zur Anzeige von Inventaren mit den Spalten:
ID; Inv. Nr.; Bezeichnung; Zugang; Abgang; .....
Da die Invetarliste recht lang ist, möchte ich dem User eine Funktion zur Verfügung stellen, mit der er die Items und die Subitems gezielt durchsuchen kann.
Dazu habe ich 2 Felder ("suche_in" für die Spalte in der gesucht werden soll und "suche_was" für den Suchtext) über dem Listview eingefügt. Beim Auswählen eines Eintrages der Suchspalte werden die Einträge im Listview nach der gewählten Spalte sortiert.
Code:
Private Sub suche_was_Change()
'ID;Inventar;Typ;Bezeichnung;Zugang;Abgang;Firma/Ndl.;Raum
    Select Case Me![suche_in]
      Case "ID":           colsuche = 0
      Case "Inventar":     colsuche = 1
      Case "Typ":          colsuche = 2
      Case "Bezeichnung":  colsuche = 3
      Case "Zugang":       colsuche = 4
      Case "Abgang":       colsuche = 5
      Case "Firma/Ndl.":   colsuche = 6
      Case "Raum":         colsuche = 7
      Case Else:           colsuche = 0
    End Select
    Krit = Me![suche_was].Text
    With lstvw_Anzeige
        For I = 1 To .ListItems.Count
            If colsuche = 0 Then
                If Left(.ListItems(I), Len(Krit)) = Krit Then
                    .SelectedItem.EnsureVisible
                    .ListItems.Item(I).Selected = True
                    Exit For
                End If
              Else
                If Left(.ListItems(I).SubItems(colsuche), Len(Krit)) = Krit Then
                    .SelectedItem.EnsureVisible
                    .ListItems.Item(I).Selected = True
                    Exit For
                End If
            End If
        Next I
    End With
    Me![suche_was].SetFocus
End Sub
Das Funktioniert, wenn das Listview unsortiert ist, aber wenn ich die Spalten sortiere, dann wird nur die wird es ein wenig chotisch.....
Kennt jemand eine Möglichkeit die entsprechnde Zeile zu markieren und und in den Vordergrund zu bringen?

_________________
Ich benutze noch ein antiquiertes A00 Smile

Alle lieben Microsoft......
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Formulare: Steuerelement in der Laufzeit erstellen 0 Ekyn 395 05. Aug 2008, 13:02
Ekyn Steuerelement in der Laufzeit erstellen
Keine neuen Beiträge Access Formulare: Steuerelement kann nicht bearbeitet werden 1 JenseN 2761 02. Nov 2007, 14:45
Nouba Steuerelement kann nicht bearbeitet werden
Keine neuen Beiträge Access Formulare: Listview in Access 3 Foxx 13846 29. Okt 2007, 14:33
Gasth Listview in Access
Keine neuen Beiträge Access Formulare: Focus auf letzes Steuerelement zurücksetzen 2 petros66 494 13. Sep 2007, 10:20
petros66 Focus auf letzes Steuerelement zurücksetzen
Keine neuen Beiträge Access Formulare: Zugriff auf ein Steuerelement im Unterformular 3 Mar307 2580 17. Mai 2007, 12:27
jens05 Zugriff auf ein Steuerelement im Unterformular
Keine neuen Beiträge Access Formulare: Steuerelement sperren wenn Formular aktiv! 2 Saskia1 3141 29. März 2007, 13:28
Gast Steuerelement sperren wenn Formular aktiv!
Keine neuen Beiträge Access Formulare: [Access2000] Steuerelement für Datensätze 22 Nil 2860 24. Okt 2006, 16:20
Gast [Access2000] Steuerelement für Datensätze
Keine neuen Beiträge Access Formulare: Texte in Steuerelement wie in inaktivem Menü darstellen 4 Uwe1 900 28. Sep 2006, 15:58
Uwe1 Texte in Steuerelement wie in inaktivem Menü darstellen
Keine neuen Beiträge Access Formulare: Steuerelement Microsoft WebBrowser 0 Jan Grossmann 1928 21. Jun 2006, 21:20
Jan Grossmann Steuerelement Microsoft WebBrowser
Keine neuen Beiträge Access Formulare: Kalender Steuerelement in Formular einbauen 1 it´s only me 3329 11. Apr 2006, 11:03
stpimi Kalender Steuerelement in Formular einbauen
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Formulare: Eigenschaft vergrößerbar für Steuerelement eines Formulars 1 Emilie-Joy 796 17. März 2006, 10:46
lothi Eigenschaft vergrößerbar für Steuerelement eines Formulars
Keine neuen Beiträge Access Formulare: Formatierung im Steuerelement 0 chefgue 491 23. Feb 2006, 15:09
chefgue Formatierung im Steuerelement
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Excel Tipps