[CODE]-Quick find in Access cu combobox

Închis
Avatar utilizator
mesersmith
Mesaje:2088
Membru din:Sâm Oct 23, 2010 6:44 am
Localitate:calarasi
Contact:
[CODE]-Quick find in Access cu combobox

Mesaj de mesersmith » Mar Noi 01, 2011 12:01 pm

la sugestia lui cvmircea, a aparut o discutie pe forum legata de quick find intr-un combo sau text box.
faza e ca nu merge intotdeauna, dar cred ca nu fac eu ceva corect.
totusi, codul conform cu Access™ 2007 VBA Programming FOR DUMmIES este:

Cod: Selectaţi tot

Private Sub QuickFind_AfterUpdate()
Dim MyRecSet As Object
Set MyRecSet = Me.Recordset.Clone
MyRecSet.FindFirst “[numele campului pt care se face cautarea] = “ & Me![numele combo-box-ului]
Me.Bookmark = MyRecSet.Bookmark
End Sub

Avatar utilizator
mesersmith
Mesaje:2088
Membru din:Sâm Oct 23, 2010 6:44 am
Localitate:calarasi
Contact:

Re: [CODE]-quick find in access

Mesaj de mesersmith » Lun Noi 07, 2011 11:54 pm

si pt ca microsoft se batea cu pumnii in piept prin toate cartile cum ca functia quick find functioneaza, insistand, am gasit, cred, modul in care se face in mod automat un combo quick find.
evident, calea mai simpla era cea corecta.
nu e nevoie de niciun cod, access 2007 stie singur sa-l faca printr-o comanda macro.
am verificat in toate bazele mele si merge perfect oricat de complexe ar fi.
astept opinii si rezultate de la colegi sa vedem daca functioneaza indiferent de alte coduri sau mai stiu eu ce de prin baze.

asadar, intr-un form deja construit, nu conteaza cum,
-se intra in design view
-se selecteaza combo box din ribonul controls
-se da click pe form acolo unde se doreste sa fie acel combo.
-va aparea un wizard pt acel combo si aici e smecheria pe care eu am gresit-o de o mie de ori
-in wizard-ul care apare, access ne intreaba cum sa managerieze datele si trebuie sa selectati "Find a record on my form based on the value I selected in my combo box"
ScreenShot005.jpg
-selectati campul dupa care doriti sa efectuati cautarea.
ScreenShot006.jpg
asta e tot, nu se scrie nicun cod, nu se seteaza nimic, access creaza un macro pe care puteti sa-l vedeti la evenimentul after update al combo-ului.
se pot crea tot felul de selectii pt continutul combo-ului.

cam asa arata formul functional.
ScreenShot004.jpg
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.

Avatar utilizator
mesersmith
Mesaje:2088
Membru din:Sâm Oct 23, 2010 6:44 am
Localitate:calarasi
Contact:

Re: [CODE]-Quick find in Access cu combobox

Mesaj de mesersmith » Dum Noi 13, 2011 12:35 pm

adriane, se pare ca pe un moderator ceva mai proaspat si mai cu sufletul la gura, l-a deranjat aprecierea ta si a ales sa ne stearga posturile in mod cu totul si cu totul arbitrar.
nici nu a avut bunul simt sa scrie motivul stergerii si nici cine a facut-o.
pacat.

Închis

Înapoi la “Visual Basic for Application (VBA) - Intrebari tehnice”