Imam jednu bazu u kojoj postoje dve tabele. U tabeli Zabelezba se unose podaci o razgovoru sa učenikom. Druga tabela je Klasifikacija sa podacima o školi. Imam formu Zabelezba koja je vezana za tabelu Zabelezba. Na njoj postoji dugme koje otvara report (izveštaj „RazgovorSaUcenikom“) za štampu koji je vezan za tabelu Zabelezba i određenog učenika. Na reportu postoje nekoliko polja od kojih su ključna dva: Datum i Broj. Pitanje glasi: kako da napravim da kada se report otvori i kada je datum manji od 1.1.2024., u reportu u polju Broj bude upisan samo broj iz tabele, a kada je datum veći od 1.1.2024. bude upisano Klasifikacija iz tabele PodaciOSkoli+ Broj
Dakle nešto kao:
Private Sub Report_Open(Cancel As Integer)
If Me.Datum < #1/1/2024# Then
Me.Broj = Me.Broj
Else
Dim Klasifikacija As String
Klasifikacija = DLookup("Klasifikacija", "PodaciOSkoli")
Me.Broj = Klasifikacija & "/" & Me.Broj
End If
End Sub
Ne mora u VBA. Čitao sam da može i preko Expression Builder-a koji se upiše u Controul Source izveštaja, ali mi ni ta varijanta nije pošla od ruke.