Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Thủ Thuật] Liên kết dữ liệu giữa subform và mainform
#11
(02-03-16, 12:14 PM)MatTroiNguQuen Đã viết: Form của bạn không dùng cách trên được, để đáp ứng được các yêu cầu như bạn nói thì làm như sau:

1/Bỏ điều kiện lọc của subform (xóa DK trong query Qryupdate)

2/Code cho sự kiện AfterUpdate của Cobline và Cobgrp như sau:

Mã:
Private Sub Cobline_AfterUpdate()
   ApplyFilter
End Sub

Private Sub Cobgrp_AfterUpdate()
   ApplyFilter
End Sub

Private Sub ApplyFilter()
   Dim strFilter As String
   strFilter = "[Group] Like '*" & Me.[Cobgrp] & "'"
   strFilter = strFilter & " AND [Line] Like '*" & Me.[CobLine] & "'"
   'Debug.Print strFilter
   Me.Frmsubupdate.Form.Filter = strFilter
   Me.Frmsubupdate.Form.FilterOn = True
End Sub

3/Thủ tục Form_Current của subform sửa lại như sau:
Mã:
Private Sub Form_Current()
   Dim rs As DAO.Recordset
 
   Set rs = Me.Parent.Recordset.Clone
   rs.FindFirst "[Staffcode] = '" & Nz(Me.txtStaffcode, "") & "'"
   If Not rs.NoMatch Then
       Me.Parent.Bookmark = rs.Bookmark
   End If
 
   Set rs = Nothing
End Sub

Dear bạn MTNQ: nếu mình thêm 1 điều kiện lọc theo ngày nữa thì cần câu lệnh như nào. Mình có áp dụng dạng lọc từ ngày đến ngày trên diễn đàn nhưng nó không chạy.  và thêm nữa nếu mình muốn thực hiện 1 nút nhấn để chạy code thì bỏ applyfilter bằng sự kiện click fk bạn
Chữ ký của tvn_hut Xin chào, mình là Dameaccess, Tham gia http://thuthuataccess.com/forum từ ngày 06-06 -13.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Nhập dữ liệu trên datagridview. HoangManh 9 197 17-05-17, 10:52 AM
Bài mới nhất: HoangManh
  [Lỗi] Form lọc dữ liệu ngày tháng năm tuanh 8 362 19-04-17, 06:05 PM
Bài mới nhất: huan.backan83
  Sử dụng Class Module và Kết nối dữ liệu SQL SERVER trong Access VBA lehongduc 51 19,295 06-04-17, 01:15 AM
Bài mới nhất: maidinhdan
  Tránh xung đột dữ liệu trong access quocdung9999 17 2,391 11-03-17, 04:12 PM
Bài mới nhất: quocdung9999
  [Hỏi] Căn giữa Table Word vuthaiha90 2 172 10-03-17, 05:57 PM
Bài mới nhất: vuthaiha90

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ