Cách đếm record theo nhóm?Ai chỉ mình với

duyduy_123

New Member
Hội viên mới
Mình có 1 table đại khái như sau:
tenkhach tenhang
A me
A dua
B oi
C mit
Ở đây có 3 khách hàng nhưng có tới 4 mặt hàng.Mình muốn thiết kế 1 form có 2 text box: Số khách hàng là: 3 Số mặt hàng là : 4 Mình có dùng hàm count(tenkhach) và count(tenhang) nhưng kết quả ra 4.Không ra được 3 khách hàng như mình muốn.Bạn nào có cách nào count theo nhóm ko? giúp mình với.Mình cám ơn
 
Sửa lần cuối:
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Bạn tạo 2 query trung gian

Q1="SELECT Table1.[Tenkhach] FROM Table1 GROUP BY Table1.[Tenkhach]"
Q2="SELECT Table1.[TenHang] FROM Table1 GROUP BY Table1.[Tenhang]"

xong bạn dùng hàm Dcount để đếm từ 2 query Q1 và Q2 gán vào 2 textbox.
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Cụ thể như thế nào ban chỉ mình với.control soure của form lấy từ đâu?contrl soure của 2 textbox?hàm dcount trong trường hợp này viết như thế nào?mình tự học nên hơi bị noob.Bạn thông cảm.Thank
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Mình có 1 table đại khái như sau:
tenkhach tenhang
A me
A dua
B oi
C mit
Ở đây có 3 khách hàng nhưng có tới 4 mặt hàng.Mình muốn thiết kế 1 form có 2 text box: Số khách hàng là: 3 Số mặt hàng là : 4 Mình có dùng hàm count(tenkhach) và count(tenhang) nhưng kết quả ra 4.Không ra được 3 khách hàng như mình muốn.Bạn nào có cách nào count theo nhóm ko? giúp mình với.Mình cám ơn

Có thể tạm làm như sau:

Textbox1 - Control Source: =DCount("tenkhach","SELECT DISTINCT tenkhach FROM table")
Textbox2 - Control Source: =DCount("tenhang","SELECT DISTINCT tenhang FROM table")
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Textbox1 - Control Source: =DCount("tenkhach","SELECT DISTINCT tenkhach FROM table")??

Mình làm vẫn chưa được ban ơi.mình đánh y chang câu lệnh của bạn cũng ko được(ten filed:tenkhach va ten bảng:table).Bạn xem lai dùm nhe
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Bạn thử the cách này xem sao: Viết sub và đặt biến:
- Đếm khách hàng:
Mã:
Sub demkh()
Dim DB As Database, RS As Recordset, Dim sokh as Double
Set db = CurrentDb
Set RS = DB.OpenRecordset("khachhang", DB_OPEN_DYNASET)
sokh = rs.recordcount
rs.close
set rs = nothing
set db = nothing
End sub
- Sau đó, bạn gọi demkh và bạn đặt code update vào textbox và gán giá trị textbox = sokh
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Bạn thử the cách này xem sao: Viết sub và đặt biến:
- Đếm khách hàng:
Mã:
Sub demkh()
Dim DB As Database, RS As Recordset, Dim sokh as Double
Set db = CurrentDb
Set RS = DB.OpenRecordset("khachhang", DB_OPEN_DYNASET)
sokh = rs.recordcount
rs.close
set rs = nothing
set db = nothing
End sub
- Sau đó, bạn gọi demkh và bạn đặt code update vào textbox và gán giá trị textbox = sokh

Làm như bạn không đúng yêu cầu của chủ topic, tham khảo cách viết của bạn phatnq2002.
Thân
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Làm như bạn không đúng yêu cầu của chủ topic, tham khảo cách viết của bạn phatnq2002.
Thân
Gõ nguyên như anh PHAT vào control source đâu có được.
Hình như bị thiếu cái gì đó. Bởi vì: "SELECT DISTINCT tenkhach FROM table" chỉ là một string, không phải là query.
 
Sửa lần cuối:
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Gõ nguyên như anh PHAT vào control source đâu có được.
Hình như bị thiếu cái gì đó. Bởi vì: "SELECT DISTINCT tenkhach FROM table" chỉ là một string, không phải là query.

Bạn nên xem lại cú pháp của hàm DCount.

Ở cái chuỗi thứ hai, bạn có thể sử dụng tên của một table, query hoặc một chuỗi lệnh SQL.

Có thể bạn xem chưa tới, cố gắng thêm chút nữa bạn nhé.
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Bạn nên xem lại cú pháp của hàm DCount.

Ở cái chuỗi thứ hai, bạn có thể sử dụng tên của một table, query hoặc một chuỗi lệnh SQL.

Có thể bạn xem chưa tới, cố gắng thêm chút nữa bạn nhé.
Tôi học chưa được bao nhiêu. Copy y nguyên của bác vào nhưng không chạy được.
Bác PHAT kiểm tra giúp file này nhé.
http://www.mediafire.com/?sharekey=7c775eefab9943a81f8e0fff488e27e04fa358c7bea205689d4bfef7ef5beeff
Cám ơn bác.
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Tôi học chưa được bao nhiêu. Copy y nguyên của bác vào nhưng không chạy được.
Bác PHAT kiểm tra giúp file này nhé.
http://www.mediafire.com/?sharekey=7c775eefab9943a81f8e0fff488e27e04fa358c7bea205689d4bfef7ef5beeff
Cám ơn bác.

Nếu không hiểu bạn làm cách sau cho dể nè:
-Tạo 1 Query có tên là Query1 như sau:
Mã:
SELECT Table1.KHACHID
FROM Table1
GROUP BY Table1.KHACHID;
Sau đó vào textbox của form bạn gõ:

Mã:
=DCount("khachid","Query1")

Bạn xem file nhé.
http://www.4shared.com/file/165246802/2af7faf0/Dcount.html
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Nếu không hiểu bạn làm cách sau cho dể nè:
-Tạo 1 Query có tên là Query1 như sau:
Mã:
SELECT Table1.KHACHID
FROM Table1
GROUP BY Table1.KHACHID;
Sau đó vào textbox của form bạn gõ:

Mã:
=DCount("khachid","Query1")

Bạn xem file nhé.
http://www.4shared.com/file/165246802/2af7faf0/Dcount.html
Cái cách bác thì tôi làm được rồi. Tôi đang làm theo câu lệnh của bác PHAT cơ: sao tôi viết y như thế lại không chạy được. (cách của bác PHAT hay hơn vì tôi không phải tạo query1 trong db)
 
Ðề: Cách đếm record theo nhóm?Ai chỉ mình với

Tôi học chưa được bao nhiêu. Copy y nguyên của bác vào nhưng không chạy được.
Bác PHAT kiểm tra giúp file này nhé.
http://www.mediafire.com/?sharekey=7c775eefab9943a81f8e0fff488e27e04fa358c7bea205689d4bfef7ef5beeff
Cám ơn bác.

Bạn có thể thử lại theo cú pháp sau:

SELECT DISTINCT ROW tenkhach FROM table

Đôi khi lẫn lộn cú pháp SQL của nhiều "em",
 

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Cách làm file Excel quản lý lãi vay

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top