11/11/2008, 16:18
ozanakkaya
form ve raporunun kayıt kaynağındaki tablonda sıra numarası var. Mesela "SNO"
Form açtıracağın butona aşağıdaki kodu yaz
Rapor özelliklerini aç
Filtre: ([SNO]= 1)
Filtre Açık: evet
Form açtıracağın butona aşağıdaki kodu yaz
Kod:
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "RAPORADI"
stLinkCriteria = "[SNO]=" & Me![SNO]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Rapor özelliklerini aç
Filtre: ([SNO]= 1)
Filtre Açık: evet