Chấm công với Barcode và Excel

Liên hệ QC

tinnythekid

Thành viên mới
Tham gia
18/5/11
Bài viết
2
Được thích
0
Chào mọi người,

Xếp mới giao em làm cái máy chấm công cho nhà máy 500 công nhân. Xin báo giá máy cảm ứng và vân tay thì xếp nói "mắc" quá. Vân tay thì hình như đa số công nhân đều mất. Thẻ thì xếp chê mắc.
Xếp đề nghị dùng barcode. Gọi điện tới mấy công ty cung cấp thì họ nói k có loại chấm công này.
Báo lại thì xếp nói: Nghiên cứu đi :(

Thế là em nghiên cứu.
Dùng excel:
+ Đã tạo được barcode dựa vào mã nhân viên. Down font barcode hoặc add-in trong excel chuyển mã nhân viên thành barcode.
+ Lấy dữ liệu từ súng đọc barcode vào file excel
file1 dùng để lấy dữ liệu: Tạo 3 cột trong excel gồm: Mã NV | Ngày | Giờ
file2 lấy dữ liệu từ file1 để tính giờ vào và ra từng ngày trong tháng/ tổng giờ làm trong tháng v.v...

Đang kẹt ở chỗ:

+ Tạo hàm và macro
Mỗi lần súng đọc được 1 barcode: sẽ nhập 1 số vào máy + nhất lệnh Enter

Bảng của em như sau:
| A | B | C
1 | MãNV | ngày | giờ
2 | 00012 | IF($A2="","",TODAY()) | IF($A2="","",NOW())
3
Súng barcode chỉ thao tác trên cột A, mỗi lần quẹt thẻ sẽ tự nhảy xuống 1 dòng. Cột B và C sẽ tự có số liệu về ngày và giờ ngay tại thời điểm quẹt thẻ.

Như công thức của em ở trên thì pó tay. Dữ liệu ở cộ B và C sẽ thay đổi liên tục.
Nếu sau mỗi lần Enter, excel tự cóp dữ liệu của cột B và cột C, đem dán special value vào chính nó thì okay.

Bà con chỉ giúp em với!
Em xin đa tạ và hậu tạ...


*** Súng Barcode: là 1 thiết bị nhập liệu mà thôi, thay vì nhập từ bàn phím, thì nay nhập số bằng súng barcode.
 
Cái này mình nghĩ có thể làm được, bạn thử code sau đặt vào Code của ThisWorkbook, ngày giờ chỉ cần 1 cột là đủ, như vậy tất cả các sheet đề có tác dụng, khi áp dụng thì khống chế những sheet chấm công thôi

Mã:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Row > 1 And Target.Column = 1 Then
Target.Offset(, 1) = Now()
End If
End Sub
 
Lần chỉnh sửa cuối:
Bạn đã được giúp tại bài 2 rồi đó. Bạn bấm Alt + F11 vào code nhìn bên tay trái thấy this workbook thì nhấn vào đó và copy code đó dán vào là ok rồi
 
Hi

I already to write hrm program to automate payroll with barcode system by visual basic for the company around 700 staffs.
 
I already to write hrm program to automate payroll with barcode system by visual basic for the company around 700 staffs.

Bạn ui, nếu biết tiếng Việt thì cứ dùng Tiếng Việt nha bạn, đọc bài bạn tôi thấy chẳng hiểu gì cả!

Hi, you should type in Vietnamese if you can, pls!
 
I already to write hrm program to automate payroll with barcode system by visual basic for the company around 700 staffs.
Tiếng Anh sai rồi bạn: sai văn phạm, thì của động từ, cấu trúc câu, cấu trúc nhóm từ.
Viết tiếng Việt cho chắc (mà có khi cũng không chắc)
 
Dùng Free cái này này:

TASMain.jpg


Khá nhiều chính sách chấm công định nghĩa như thế này:

TAS_Option.jpg


Ngoài ra còn có cái định nghĩa giờ làm việc của các ca nữa (ko có screen demo)

More screenshots: http://www.vnuni.net/forum/index.php?topic=47
 
Lần chỉnh sửa cuối:
bạn ơi cho mình hỏi làm cách nào để Excel lấy được dữ liệu từ súng đọc barcode vậy bạn.... Cảm ơn nhiều

Chào mọi người,

Xếp mới giao em làm cái máy chấm công cho nhà máy 500 công nhân. Xin báo giá máy cảm ứng và vân tay thì xếp nói "mắc" quá. Vân tay thì hình như đa số công nhân đều mất. Thẻ thì xếp chê mắc.
Xếp đề nghị dùng barcode. Gọi điện tới mấy công ty cung cấp thì họ nói k có loại chấm công này.
Báo lại thì xếp nói: Nghiên cứu đi :(

Thế là em nghiên cứu.
Dùng excel:
+ Đã tạo được barcode dựa vào mã nhân viên. Down font barcode hoặc add-in trong excel chuyển mã nhân viên thành barcode.
+ Lấy dữ liệu từ súng đọc barcode vào file excel
file1 dùng để lấy dữ liệu: Tạo 3 cột trong excel gồm: Mã NV | Ngày | Giờ
file2 lấy dữ liệu từ file1 để tính giờ vào và ra từng ngày trong tháng/ tổng giờ làm trong tháng v.v...

Đang kẹt ở chỗ:

+ Tạo hàm và macro
Mỗi lần súng đọc được 1 barcode: sẽ nhập 1 số vào máy + nhất lệnh Enter

Bảng của em như sau:
| A | B | C
1 | MãNV | ngày | giờ
2 | 00012 | IF($A2="","",TODAY()) | IF($A2="","",NOW())
3
Súng barcode chỉ thao tác trên cột A, mỗi lần quẹt thẻ sẽ tự nhảy xuống 1 dòng. Cột B và C sẽ tự có số liệu về ngày và giờ ngay tại thời điểm quẹt thẻ.

Như công thức của em ở trên thì pó tay. Dữ liệu ở cộ B và C sẽ thay đổi liên tục.
Nếu sau mỗi lần Enter, excel tự cóp dữ liệu của cột B và cột C, đem dán special value vào chính nó thì okay.

Bà con chỉ giúp em với!
Em xin đa tạ và hậu tạ...


*** Súng Barcode: là 1 thiết bị nhập liệu mà thôi, thay vì nhập từ bàn phím, thì nay nhập số bằng súng barcode.
 
Mình biết là như thế nhưng hiện tại mình có một barcode scanner hieu Symbol (cua Motorola), sau khi kết nối với máy tính xong mình thử scan với vài loại barcode nhưng dữ liệu ko được máy tính nhận được. Mong chỉ giáo
 
Có phải mình mở excel lên rồi chọn chuột ở cell active , khi bắn barcode là nó tự nhập vô hả bạn.
Đúng rồi, chỉ chú ý là máy quét mã đó phải hỗ trợ nhập vào ô của Excel (cái này nếu không được thì hỏi nhà cung cấp máy)
 
Chào mọi người,

Xếp mới giao em làm cái máy chấm công cho nhà máy 500 công nhân. Xin báo giá máy cảm ứng và vân tay thì xếp nói "mắc" quá. Vân tay thì hình như đa số công nhân đều mất. Thẻ thì xếp chê mắc.
Xếp đề nghị dùng barcode. Gọi điện tới mấy công ty cung cấp thì họ nói k có loại chấm công này.
Báo lại thì xếp nói: Nghiên cứu đi :(

Thế là em nghiên cứu.
Dùng excel:
+ Đã tạo được barcode dựa vào mã nhân viên. Down font barcode hoặc add-in trong excel chuyển mã nhân viên thành barcode.
+ Lấy dữ liệu từ súng đọc barcode vào file excel
file1 dùng để lấy dữ liệu: Tạo 3 cột trong excel gồm: Mã NV | Ngày | Giờ
file2 lấy dữ liệu từ file1 để tính giờ vào và ra từng ngày trong tháng/ tổng giờ làm trong tháng v.v...

Đang kẹt ở chỗ:
+ Tạo hàm và macro

Mỗi lần súng đọc được 1 barcode: sẽ nhập 1 số vào máy + nhất lệnh Enter

Bảng của em như sau:
| A | B | C
1 | MãNV | ngày | giờ
2 | 00012 | IF($A2="","",TODAY()) | IF($A2="","",NOW())
3
Súng barcode chỉ thao tác trên cột A, mỗi lần quẹt thẻ sẽ tự nhảy xuống 1 dòng. Cột B và C sẽ tự có số liệu về ngày và giờ ngay tại thời điểm quẹt thẻ.

Như công thức của em ở trên thì pó tay. Dữ liệu ở cộ B và C sẽ thay đổi liên tục.
Nếu sau mỗi lần Enter, excel tự cóp dữ liệu của cột B và cột C, đem dán special value vào chính nó thì okay.

Bà con chỉ giúp em với!
Em xin đa tạ và hậu tạ...


*** Súng Barcode: là 1 thiết bị nhập liệu mà thôi, thay vì nhập từ bàn phím, thì nay nhập số bằng súng barcode.
Bài đã được tự động gộp:

Tham khảo và tư vấn mã vạch barcode
https://driverzebravn.com/ma-vach-barcodes-gia-re/
 
Web KT
Back
Top Bottom