Dado 15.03.2017 12:44
Predmet:Re: VBA kod ne radi

Hvala na odgovoru. rijeÅ¡io sam to na drugi način. Otvorio sam novu formu sa list boxom koji sam vezao za query i kroz filtere dolazim do traženih podatak koje mogu izvoziti u u xcel.

Dado 18.03.2017 20:30
Predmet:Re: VBA kod ne radi

Ovo dole niže radi:

PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub cmdPrikazi1_Click()
  2.     Dim RS As Object, strFilter As String
  3.  
  4.       strFilter = "[rednibrojkorisnika] = " & Me.txtRedniBrojKorisnika
  5.  
  6.     Set RS = Forms!frmUnosOsnovnihPodatakaOKorisniku.Recordset.Clone
  7.     RS.FindFirst strFilter
  8.            If Not RS.EOF Then Forms!frmUnosOsnovnihPodatakaOKorisniku.Bookmark = RS.Bookmark
  9.     Set RS = Nothing
  10.  
  11. DoCmd.Close acForm, Me.Name
  12.  
  13. End Sub