Xin giúp đỡ form nhập liệu (1 người xem)

  • Thread starter Thread starter vunhai
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

vunhai

Thành viên mới
Tham gia
5/11/09
Bài viết
44
Được thích
10
Kính gửi các anh chị.
Em có một form kiểm tra xe như file đính kèm. Yêu tạo nút SAVE và nút PRINT trên sheet gốc để:
- Sau khi nhập liệu xong bấm SAVE sẽ copy bảng mẫu sang sheet khác. Cứ mỗi lần bấm SAVE là 1 lần copy. (Yêu cầu em có ghi trong file excel sẽ là tuyệt vời nếu nút SAVE thực hiện như phần " ghi chú thêm"
- Tạo nút PRINT để in ra toàn bộ các sheet ( hoạt toàn bộ bảng mẫu trong trường hợp copy sang cùng 1 sheet)
Chân thành cảm ơn các anh chị và rất mong được sự hỗ trợ sớm.

email: vu.mnguyenspct@gmail.com
 

File đính kèm

Kính gửi các anh chị.
Em có một form kiểm tra xe như file đính kèm. Yêu tạo nút SAVE và nút PRINT trên sheet gốc để:
- Sau khi nhập liệu xong bấm SAVE sẽ copy bảng mẫu sang sheet khác. Cứ mỗi lần bấm SAVE là 1 lần copy. (Yêu cầu em có ghi trong file excel sẽ là tuyệt vời nếu nút SAVE thực hiện như phần " ghi chú thêm"
- Tạo nút PRINT để in ra toàn bộ các sheet ( hoạt toàn bộ bảng mẫu trong trường hợp copy sang cùng 1 sheet)
Chân thành cảm ơn các anh chị và rất mong được sự hỗ trợ sớm.

email: vu.mnguyenspct@gmail.com
Bạn thử file. Có lỗi hoặc chưa đúng yêu cầu thì báo lại.
 

File đính kèm

Upvote 0
Bạn thử file. Có lỗi hoặc chưa đúng yêu cầu thì báo lại.
Tôi chưa xem qua file của bạn. Nhưng tôi đã xem qua file của chủ thớt. Yêu cầu này làm được, tuy nhiên không ai làm thế. Nếu lưu 1 tờ thành 1 sheet, 1 ngày xử lý bao nhiêu xe ta phải lưu bấy nhiêu sheet. Sau này làm sao kiểm soát? Có phải thêm động tác gộp nhiều sheet thành 1 sheet tổng?
 
Upvote 0
Tôi chưa xem qua file của bạn. Nhưng tôi đã xem qua file của chủ thớt. Yêu cầu này làm được, tuy nhiên không ai làm thế. Nếu lưu 1 tờ thành 1 sheet, 1 ngày xử lý bao nhiêu xe ta phải lưu bấy nhiêu sheet. Sau này làm sao kiểm soát? Có phải thêm động tác gộp nhiều sheet thành 1 sheet tổng?
Tôi lưu nối xuống dưới. Code cũng đơn giản nên thớt chắc biết để sau 1 kỳ thì thay đổi sang sheet khác
 
Upvote 0
... Có phải thêm động tác gộp nhiều sheet thành 1 sheet tổng?
Thì cái tiêu đề "CODE gộp nhiều sheet thành 1 sheet tổng" chẳng phải cứ vài ngày lại thấy nổi lên ở đây?
Điểm quan trọng là cuối cùng họ vẫn giải quyết được cái mình mong muốn. Việc cái họ mong muốn có thực sự là nên thực hiện hay không hoàn toàn chẳng bận tâm. Người ta làm việc trong môi trường và tư tưởng "sếp bảo, mình làm, và cuối tháng lĩnh lương".
 
Upvote 0
Kính gửi các anh chị.
Em có một form kiểm tra xe như file đính kèm. Yêu tạo nút SAVE và nút PRINT trên sheet gốc để:
- Sau khi nhập liệu xong bấm SAVE sẽ copy bảng mẫu sang sheet khác. Cứ mỗi lần bấm SAVE là 1 lần copy. (Yêu cầu em có ghi trong file excel sẽ là tuyệt vời nếu nút SAVE thực hiện như phần " ghi chú thêm"
- Tạo nút PRINT để in ra toàn bộ các sheet ( hoạt toàn bộ bảng mẫu trong trường hợp copy sang cùng 1 sheet)
Chân thành cảm ơn các anh chị và rất mong được sự hỗ trợ sớm.
Cách theo dõi mỗi phiếu 1 sheet là không phù hợp.
Bạn nên suy nghĩ và tự trả lời những câu hỏi dưới đây để có định hướng và phương pháp theo dõi:
1/ Nếu mỗi phiếu là 1 sheet thì theo dõi 1 năm sẽ có bao nhiêu sheet (hàng trăm hay hàng ngàn sheet?).
2/ Nếu có hàng trăm hay hàng ngàn sheet thì làm thế nào để tổng hợp số phiếu theo từng công ty?
3/ Nếu muốn lọc ra 1 công ty hoặc bất kỳ công ty thì làm thế nào để lọc?
4/ Hoặc muốn lọc theo loại Tình trạng xe thì làm thế nào?

Tốt nhất là nên nghe theo góp ý của các thành viên để có cách theo dõi tốt nhất. Nếu tôi theo dõi thì chỉ sử dụng khoảng 3 sheet, thì có thể lọc và tổng hợp bất cứ thứ gì và cũng có thể in lại tất cả các phiếu của bất kỳ công ty nào..
 
Lần chỉnh sửa cuối:
Upvote 0
... tư tưởng "sếp bảo, mình làm, và cuối tháng lĩnh lương".
Mình cũng nên góp ý cho bạn ấy, có khi bạn ấy chưa hiểu vấn đề nên chưa đưa ra phương án tốt cho Sếp xem xét. Còn cái tư tưởng trên thì em xin chịu thua, chỗ em làm nếu gặp vấn đề, Sếp phải lấy ý kiến từ nhân viên xem giải quyết vấn đề như thế nào rồi mới quyết định.
 
Upvote 0
Bạn thử file. Có lỗi hoặc chưa đúng yêu cầu thì báo lại.

Dạ cảm ơn Maika8008 rất nhiều ạ. Quá tuyệt vời! Dạ có thể làm sao cho khi bấm nút PRINT nó cho mình chọn máy in rồi mới in không ạ? Vì chủ yếu in PDF để gửi đi nên nó mặt định chọn máy in mà mình set sẳn đôi khi bất tiện. Cảm ơn rất nhiều ạ. Nếu không tiện sửa code thì file này là tuyệt vời quá rồi.
Bài đã được tự động gộp:

Cách theo dõi mỗi phiếu 1 sheet là không phù hợp.
Bạn nên suy nghĩ và tự trả lời những câu hỏi dưới đây để có định hướng và phương pháp theo dõi:
1/ Nếu mỗi phiếu là 1 sheet thì theo dõi 1 năm sẽ có bao nhiêu sheet (hàng trăm hay hàng ngàn sheet?).
2/ Nếu có hàng trăm hay hàng ngàn sheet thì làm thế nào để tổng hợp số phiếu theo từng công ty?
3/ Nếu muốn lọc ra 1 công ty hoặc bất kỳ công ty thì làm thế nào để lọc?
4/ Hoặc muốn lọc theo loại Tình trạng xe thì làm thế nào?

Tốt nhất là nên nghe theo góp ý của các thành viên để có cách theo dõi tốt nhất. Nếu tôi theo dõi thì chỉ sử dụng khoảng 3 sheet, thì có thể lọc và tổng hợp bất cứ thứ gì và cũng có thể in lại tất cả các phiếu của bất kỳ công ty nào..


Dạ em cảm ơn sự góp ý ạ.

Ban đầu em cũng nghĩ sẽ lưu mỗi bản 1 sheet nhưng đúng như anh chị nói là nếu như file này có 1000 xe vậy em có 1 nghìn sheet. Và em muốn kiểm tra xem 1 xe nào đó em nhập có nhầm không thì em không biết xe đó nằm ở sheet nào. Nếu như tổng hợp trên 1 sheet như Maika8008 đã làm giúp em thì em có thể vào sheet đó Ctrl+F mà tìm xố xe ạ.

Mục đích của em là in ra file dpf rồi gửi bản kiểm tra này cho khách hàng. Vì đúng là có cả hàng nghìn xe nên muốn tiết kiệm nên không muốn dùng giấy nhiều liên để viết tay vừa mất thời gian vừa bất tiện.
 
Lần chỉnh sửa cuối:
Upvote 0
Dạ cảm ơn Maika8008 rất nhiều ạ. Quá tuyệt vời! Dạ có thể làm sao cho khi bấm nút PRINT nó cho mình chọn máy in rồi mới in không ạ? Vì chủ yếu in PDF để gửi đi nên nó mặt định chọn máy in mà mình set sẳn đôi khi bất tiện. Cảm ơn rất nhiều ạ. Nếu không tiện sửa code thì file này là tuyệt vời quá rồi.
Tôi chưa biết cách, và tôi nghĩ bạn nên chọn máy in trước khi chạy lệnh.
 
Upvote 0
Thì cái tiêu đề "CODE gộp nhiều sheet thành 1 sheet tổng" chẳng phải cứ vài ngày lại thấy nổi lên ở đây?
Điểm quan trọng là cuối cùng họ vẫn giải quyết được cái mình mong muốn. Việc cái họ mong muốn có thực sự là nên thực hiện hay không hoàn toàn chẳng bận tâm. Người ta làm việc trong môi trường và tư tưởng "sếp bảo, mình làm, và cuối tháng lĩnh lương".

Dạ em cảm ơn ạ. File hỗ trợ của Maika8008 là tuyệt quá luôn ạ.
Bài đã được tự động gộp:

Tôi chưa biết cách, và tôi nghĩ bạn nên chọn máy in trước khi chạy lệnh.

Dạ. Em cảm ơn nhiều lắm ạ. Vậy để chọn máy in trước khi in.
 
Upvote 0
Kính gửi các anh chị.
Em có một form kiểm tra xe như file đính kèm. Yêu tạo nút SAVE và nút PRINT trên sheet gốc để:
- Sau khi nhập liệu xong bấm SAVE sẽ copy bảng mẫu sang sheet khác. Cứ mỗi lần bấm SAVE là 1 lần copy. (Yêu cầu em có ghi trong file excel sẽ là tuyệt vời nếu nút SAVE thực hiện như phần " ghi chú thêm"
- Tạo nút PRINT để in ra toàn bộ các sheet ( hoạt toàn bộ bảng mẫu trong trường hợp copy sang cùng 1 sheet)
Chân thành cảm ơn các anh chị và rất mong được sự hỗ trợ sớm.

email: vu.mnguyenspct@gmail.com
Nếu là tôi thì tôi làm theo cách nhập liệu vào Form, rồi cho nó lưu vào 1 sheet ==> từ đó muốn in ra phiều thì có thể gọi về từng phiếu để in ---- Chứ sao phải lưu thành mấy trăm sheet làm gì cgo nặng máy nhỉ ???
 
Upvote 0
Nếu là tôi thì tôi làm theo cách nhập liệu vào Form, rồi cho nó lưu vào 1 sheet ==> từ đó muốn in ra phiều thì có thể gọi về từng phiếu để in ---- Chứ sao phải lưu thành mấy trăm sheet làm gì cgo nặng máy nhỉ ???
Ờ thì các thành viên ở trên cũng nói về chuyện đó và đã gợi ý lưu thành 1 CSDL. Khi in chỉ việc gọi các record cụ thể ra biểu mẫu để in.
 
Upvote 0
Dạ em cảm ơn ạ. File hỗ trợ của Maika8008 là tuyệt quá luôn ạ.
Bai 2 chỉ lưu riêng từng phiếu thì cũng không đáp ứng được nội dung tôi nêu ở bài 6 (bạn sẽ khó khăn trong vấn đề tổng hợp), cụ thể như sau:
1/ Nếu riêng từng phiếu thì hàng trăm hay hàng ngàn phiếu thì bạn tổng hợp bằng cách nào?
2/ Nếu muốn tổng hợp số phiếu theo từng công ty thì làm sao?
3/ Nếu muốn lọc riêng dữ liệu của 1 công ty hoặc bất kỳ công ty thì làm thế nào để lọc?
 
Lần chỉnh sửa cuối:
Upvote 0
Hình như chọn máy in là không có cách nào luôn đó bác, cũng có thể do hiểu biết của em hạn chế
Có thể có nhưng phải can thiệp sâu vào hệ điều hành. Tạm thời mình phải bằng lòng rằng lâu lâu mới in và việc gì phải in tự động rất nhiều trang để dễ xảy ra mất kiểm soát như hết mực, kẹt giấy, giấy in đùn ra rớt lung tung...
 
Upvote 0
Ờ thì các thành viên ở trên cũng nói về chuyện đó và đã gợi ý lưu thành 1 CSDL. Khi in chỉ việc gọi các record cụ thể ra biểu mẫu để in.

Dạ, em cũng biết là nên làm CSDL sẽ tốt hơn nhưng em không biết là thế nào. Nếu được Maika8008 có thể giúp em luôn 1 file CSDL không ạ. Muôn vàng cảm ơn. ( Coi như quà giáng sinh cho em ạ)
 
Upvote 0
Dạ, em cũng biết là nên làm CSDL sẽ tốt hơn nhưng em không biết là thế nào. Nếu được Maika8008 có thể giúp em luôn 1 file CSDL không ạ. Muôn vàng cảm ơn. ( Coi như quà giáng sinh cho em ạ)
Để tôi xem thử. Cũng hơi lâu lâu đó, bạn chờ và thấy lâu thì nhắc tôi 1 cái :D
 
Upvote 0
Dạ Maika8008 ơi. File CSDL khi chọn in thì có thể truy xuất in tùy chọn theo tên tàu (Vls name), theo số bill (B/L number) hoặc theo số xe (Marks & Number) ạ. Cảm ơn nhiều.
Tại dòng 1 của sheet Data là địa chỉ các ô chứa dữ liệu và tên các checkbox. Bạn điền giúp tiêu đề cột mong muốn tương ứng vào dòng 2.
 
Upvote 0
Dạ điền vào đâu ạ? Maika8008 ơi em không có file CSDL đó.
Ví dụ tại sheet Data, ô A1 có giá trị là sheet1!P2 thì bên sheet1 giá trị P2 là ngày 18/12/2020, bạn cần điền vào ô A2 là Ngày tháng hay Date gì đó tùy bạn...

Tương tự với tên checkbox:
Check box 49 (Nó ở dòng 17 của sheet1, bạn chuột phải vào checkbox nhìn lên hộp name trên bên phải thanh địa chỉ sẽ thấy tên nó) là để đánh dấu cho Brand-new nên bạn gõ vào ô Data!BR2 (vì BR1 là check box 49) là Brand-new hoặc dịch sang tiếng Việt tùy bạn
 
Upvote 0
Ví dụ tại sheet Data, ô A1 có giá trị là sheet1!P2 thì bên sheet1 giá trị P2 là ngày 18/12/2020, bạn cần điền vào ô A2 là Ngày tháng hay Date gì đó tùy bạn...

Tương tự với tên checkbox:
Check box 49 (Nó ở dòng 17 của sheet1, bạn chuột phải vào checkbox nhìn lên hộp name trên bên phải thanh địa chỉ sẽ thấy tên nó) là để đánh dấu cho Brand-new nên bạn gõ vào ô Data!BR2 (vì BR1 là check box 49) là Brand-new hoặc dịch sang tiếng Việt tùy bạn
[

Dạ. Maika8008 gửi em file CSDL với. Em không có file Maika ơi.
 
Upvote 0
Rồi. Bạn thử chạy xem. Có gì báo lại

Dạ Cảm ơn Maika 8008 nhiều lắm. Phần filter Maika giúp chỉnh lại thay vì K1 và L1 và M1 thì sửa lại là K1 hoặc L1 hoặc M1. Có nghĩa nhu cầu đôi khi in theo K1, hoặc chỉ theo L1, hoặc chỉ in 1 xe là M1 thôi ạ. Dạ và giải thích giúp phần checkbox nếu giá trị là 1 thì stick và -4146 là không stick đúng không ạ? Vui và cảm ơn lắm.
 
Upvote 0
Dạ Cảm ơn Maika 8008 nhiều lắm. Phần filter Maika giúp chỉnh lại thay vì K1 và L1 và M1 thì sửa lại là K1 hoặc L1 hoặc M1. Có nghĩa nhu cầu đôi khi in theo K1, hoặc chỉ theo L1, hoặc chỉ in 1 xe là M1 thôi ạ. Dạ và giải thích giúp phần checkbox nếu giá trị là 1 thì stick và -4146 là không stick đúng không ạ? Vui và cảm ơn lắm.
Đã sửa theo yêu cầu.

Ghi vào checkbox thì = 0 cũng được nhưng không hiểu sao khi lấy value của checkbox nó lại ghi ra là -4146
 

File đính kèm

Upvote 0
Đã sửa theo yêu cầu.

Ghi vào checkbox thì = 0 cũng được nhưng không hiểu sao khi lấy value của checkbox nó lại ghi ra là -4146

Trên cả tuyệt vời!!! Nhập từ form cũng được mà sửa trực tiếp từ sheet data cũng được luôn. Dạ em cảm ơn Maika8008 nhiều lắm ạ.
 
Upvote 0
Đã sửa theo yêu cầu.

Ghi vào checkbox thì = 0 cũng được nhưng không hiểu sao khi lấy value của checkbox nó lại ghi ra là -4146

Maika8008 ơi! Làm phiền anh lần nữa. Do nhu cầu thực tế các ô tô màu đỏ ít được nhập trước nên em muốn các ô đó bỏ trống thì phải làm sao ạ (phần lớn là ra rồi viết tay ký thông tin đó vào, thỉnh thoảng mới có dữ liệu nhập trước). Maika8008 giúp với ạ, em tự bỏ trống nó báo không có dữ liệu. Cảm ơn nhiều ạ
 

File đính kèm

Lần chỉnh sửa cuối:
Upvote 0
Maika8008 ơi! Làm phiền anh lần nữa. Do nhu cầu thực tế các ô tô màu đỏ ít được nhập trước nên em muốn các ô đó bỏ trống thì phải làm sao ạ (phần lớn là ra rồi viết tay ký thông tin đó vào, thỉnh thoảng mới có dữ liệu nhập trước). Maika8008 giúp với ạ, em tự bỏ trống nó báo không có dữ liệu. Cảm ơn nhiều ạ
Nó báo không có data in phải không bạn? Nếu vậy tôi đã chỉnh lại rồi. Chừ bạn đừng chừa trống thông tin: Theo yêu cầu của... là được.
 

File đính kèm

Upvote 0
Nó báo không có data in phải không bạn? Nếu vậy tôi đã chỉnh lại rồi. Chừ bạn đừng chừa trống thông tin: Theo yêu cầu của... là được.

Alo! Maika8008 ơi. Trong file có 1 checkbox khi stick vào nó báo lỗi như hình. Mấy checkbox khác ok chỉ có mỗi cái em khoanh màu đỏ nó bị vậy. Anh kiểm tra và chỉnh lại giúp em ạ.
vir.jpg
 
Upvote 0
Upvote 0
Bạn chuột phải vào checkbox -> Assign Macro -> Xóa chữ trong hộp Macro Name đi -> OK

Anh ơi!. File hiện tại chạy rất tốt đáp ứng yêu cầu. Vừa triển khai và nếu lấy sheet data làm gốc để nhập liệu thì sử dụng file hiện tại cũng ok luôn. Tuy nhiên phần dữ liệu cho checkbox có tính nghịch nhau (cái đã stick yes thì bên kia hiển nhiên là no như hình minh họa). Maika8008 có thể cho một đoạn code khi nhập dữ liệu trên sheet data bên phần tô vàng thì bên phần tô xanh nó tự gán cho giá trị ngược lại không ạ. Cảm ơn Maika8008 nhiều ạ.

asddasd.jpg
 
Upvote 0
Anh ơi!. File hiện tại chạy rất tốt đáp ứng yêu cầu. Vừa triển khai và nếu lấy sheet data làm gốc để nhập liệu thì sử dụng file hiện tại cũng ok luôn. Tuy nhiên phần dữ liệu cho checkbox có tính nghịch nhau (cái đã stick yes thì bên kia hiển nhiên là no như hình minh họa). Maika8008 có thể cho một đoạn code khi nhập dữ liệu trên sheet data bên phần tô vàng thì bên phần tô xanh nó tự gán cho giá trị ngược lại không ạ. Cảm ơn Maika8008 nhiều ạ.

View attachment 251612
Tôi thấy điều đó và tôi muốn làm thế này tại sheet Form khi kích chọn vào checkbox Yes thì cái checkbox No kia dù đang ở trạng thái nào cũng đều chuyển sang không chọn và ngược lại. Tuy nhiên làm thế phải mất công nữa nên tôi để bạn nhập như lâu nay vẫn nhập.
 
Upvote 0
Tôi thấy điều đó và tôi muốn làm thế này tại sheet Form khi kích chọn vào checkbox Yes thì cái checkbox No kia dù đang ở trạng thái nào cũng đều chuyển sang không chọn và ngược lại. Tuy nhiên làm thế phải mất công nữa nên tôi để bạn nhập như lâu nay vẫn nhập.

Dạ em cảm ơn Maika8008
 
Upvote 0
Bạn chỉ cần bấm cột checkbox Yes thôi nhé. Checkbox No sẽ có giá trị ngược lại. Các ô ở cột W và X có số 0, 1 mờ mờ đó là tôi lưu trạng thái của checkbox. Bạn có thể cho chữ màu trắng để tàng hình chúng đi.
 

File đính kèm

Upvote 0
Hi cả nhà,
Nhờ cả nhà giúp mình công thức bị lỗi ở thẻ kho với ạ, vui lòng xem file đính kèm ạ.
Cám ơn cả nhà nhiều.
z2240779214775_878b17ffef5ba559c67e138b8445dda7.jpg
 

File đính kèm

Upvote 0
Bạn của bạn đang xen ngang & lưu ý bạn đây là ngăn để nói về 'Lập trình' chứ không 'Công thức'
 
Upvote 0
Bạn ơi thế bạn giúp mình với được ko vì mình ko tìm thấy topic chủ đề ạ, thank bạn nhiều
Để đăng bài mới với chủ đề "Hàm và công thức Excel", bạn vào đây nhé.
Nếu không viết tắt và chỉ dùng tiếng Việt thì hay biết mấy.
 
Lần chỉnh sửa cuối:
Upvote 0
Nó báo không có data in phải không bạn? Nếu vậy tôi đã chỉnh lại rồi. Chừ bạn đừng chừa trống thông tin: Theo yêu cầu của... là được.
Dạ, em chào Maika8008. Hy vọng Maika8008 đã có một kỳ nghỉ tết dương lịch vui vẻ ạ. Em triển khai file nhập liệu này mọi thứ chạy rất tốt. Tuy nhiên trong qua trình thực hiện có phát sinh một số nhu cầu nhỏ. Kính mong Maika8008 nhín chút thời gian giúp em. Maika8008 có thể chỉnh lại code để khi bấm nút print thì nó sẽ in sheet " Formin" thay vì in sheet Form như hiện tại không ạ? (Em đã add thêm sheet "Formin" phía sau sheet Form. Nội dung và format của hai sheet này như nhau không khác gì về số dòng và cột cả. Vui lòng xem file đính kèm. Em biết gần Tết công việc bận rộn nhưng rất mong được giúp đỡ ạ. Em cảm ơn. Chúc Maika8008 cuối tuần vui vẻ ạ.
 

File đính kèm

Upvote 0
Dạ, em chào Maika8008. Hy vọng Maika8008 đã có một kỳ nghỉ tết dương lịch vui vẻ ạ. Em triển khai file nhập liệu này mọi thứ chạy rất tốt. Tuy nhiên trong qua trình thực hiện có phát sinh một số nhu cầu nhỏ. Kính mong Maika8008 nhín chút thời gian giúp em. Maika8008 có thể chỉnh lại code để khi bấm nút print thì nó sẽ in sheet " Formin" thay vì in sheet Form như hiện tại không ạ? (Em đã add thêm sheet "Formin" phía sau sheet Form. Nội dung và format của hai sheet này như nhau không khác gì về số dòng và cột cả. Vui lòng xem file đính kèm. Em biết gần Tết công việc bận rộn nhưng rất mong được giúp đỡ ạ. Em cảm ơn. Chúc Maika8008 cuối tuần vui vẻ ạ.
Bạn thêm lệnh sheets("tên sheet cần in").Activate trước lệnh in. Sau đó dùng câu đó quay về sheet form
 
Upvote 0
Dạ em cảm ơn Maika8008 đã phản hồi nhanh nhưng em không biết làm lệnh đó ạ. Maika8008 cho vào file và gửi lại giúp em với. Em Cảm ơn.
Chừ tôi mới xem lại file trên máy tính. Tôi hỏi:
1. Tại sao bạn cần in trên sheet Formin mà không phải là sheet Form?
2. Bạn điền dữ liệu vào sheet Formin thế nào? (Bởi dữ liệu điền vào sheet Form tự động từ sheet LocIn và chạy theo vòng lặp, mỗi lần in 1 dòng cho đến khi hết số dòng đã lọc.
 
Upvote 0
Chừ tôi mới xem lại file trên máy tính. Tôi hỏi:
1. Tại sao bạn cần in trên sheet Formin mà không phải là sheet Form?
2. Bạn điền dữ liệu vào sheet Formin thế nào? (Bởi dữ liệu điền vào sheet Form tự động từ sheet LocIn và chạy theo vòng lặp, mỗi lần in 1 dòng cho đến khi hết số dòng đã lọc.
Dạ, là thế này ạ:
- Trả lời câu 1: Vì sử dụng máy kim, in trên giấy liên tục có mẫu sẳn (phần chữ màu đen và Ô vuông trên giống như trên sheet from). Thật sự chỉ in phần chữ tô màu và dấu stick thôi ( Ô nào có dấu stick thì in dấu stick ra) nên em mới nghĩ sẽ in trên sheet formin ( em sẽ xóa chữ màu trên sheet formin đi) vậy khi in sẽ chỉ in phần chữ tô màu. Vẫn dùng sheet form để nhập liệu. Nếu như trên sheet form mà xóa hết chữ màu đen thì không biết đường nhập liệu. Đó là lỳ do. Em không biết có cách nào làm được như vậy hay không.
- Trả lời câu 2: Dạ Maika8008 bỏ qua cho em vì không biết code chạy thế nào nên xin giúp đỡ điều phi lý. Em xin lỗi.

Em đính kèm lại các thứ cần in ra trong sheet formin. Em xin lỗi nếu nếu cầu phi lý.
 

File đính kèm

Upvote 0
Dạ, là thế này ạ:
- Trả lời câu 1: Vì sử dụng máy kim, in trên giấy liên tục có mẫu sẳn (phần chữ màu đen và Ô vuông trên giống như trên sheet from). Thật sự chỉ in phần chữ tô màu và dấu stick thôi ( Ô nào có dấu stick thì in dấu stick ra) nên em mới nghĩ sẽ in trên sheet formin ( em sẽ xóa chữ màu trên sheet formin đi) vậy khi in sẽ chỉ in phần chữ tô màu. Vẫn dùng sheet form để nhập liệu. Nếu như trên sheet form mà xóa hết chữ màu đen thì không biết đường nhập liệu. Đó là lỳ do. Em không biết có cách nào làm được như vậy hay không.
- Trả lời câu 2: Dạ Maika8008 bỏ qua cho em vì không biết code chạy thế nào nên xin giúp đỡ điều phi lý. Em xin lỗi.

Em đính kèm lại các thứ cần in ra trong sheet formin. Em xin lỗi nếu nếu cầu phi lý.
OK. Giờ tôi phải đi rồi. Tôi sẽ xem lại khi quay về.
 
Upvote 0
Em mong Maika8008 có giải pháp cho vấn đề của em. Thật sự rất cần. Em cảm ơn.
Bạn rà soát lại xem có thông tin nào cần in mà khi in ra bị thiếu (hoặc không cần in mà lại được in ra trong trang in) để tôi sửa lại nhé!
 

File đính kèm

Upvote 0
Bạn rà soát lại xem có thông tin nào cần in mà khi in ra bị thiếu (hoặc không cần in mà lại được in ra trong trang in) để tôi sửa lại nhé!
Dạ. Em cảm ơn Maika8008. sáng giờ bận quá. Em bấm lệnh in nhưng nó không in ra gì hết. Maika8008 kiểm tra lại giúp em ạ.
 
Upvote 0
Dạ. Em cảm ơn Maika8008. sáng giờ bận quá. Em bấm lệnh in nhưng nó không in ra gì hết. Maika8008 kiểm tra lại giúp em ạ.
À. Tôi không có máy in nên phải bỏ qua câu lệnh in mà quên trả lại nguyên trạng. Bạn chuột phải vào nút in, chọn Assign Macro -> Edit -> Xóa cái dấu nháy đơn đầu dòng lệnh ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True là in được
 
Upvote 0
À. Tôi không có máy in nên phải bỏ qua câu lệnh in mà quên trả lại nguyên trạng. Bạn chuột phải vào nút in, chọn Assign Macro -> Edit -> Xóa cái dấu nháy đơn đầu dòng lệnh ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True là in được
Dạ, Em em đã xóa dấu nháy và in được. Có một ô vuông còn hiện lên nư hình đính kèm. Maika8008 giúp em luôn ạ. Mà Maika8008 cho em hỏi em muốn gửi anh chút quà uống cafe thì làm sao ạ. Cho em số tk đi ạ. Dạ vài ly cafe thôi ạ. Nhắn em qua số dt: 0915150977
 

File đính kèm

  • TEST IN.jpg
    TEST IN.jpg
    38.5 KB · Đọc: 9
Lần chỉnh sửa cuối:
Upvote 0
Dạ, Em em đã xóa dấu nháy và in được. Có một ô vuông còn hiện lên nư hình đính kèm. Maika8008 giúp em luôn ạ. Mà Maika8008 cho em hỏi em muốn gửi anh chút quà uống cafe thì làm sao ạ. Cho em số tk đi ạ. Dạ vài ly cafe thôi ạ. Nhắn em qua số dt: 0915150977
Chuột phải vào cái check box bị lộ ra đó (Cracked or chipped) -> Format Control -> chọn tab Properties -> Bỏ chọn Print Object đi

Còn vụ cà phê, cảm ơn bạn, giúp bạn và được bạn ghi nhận thế là vui rồi.
 
Upvote 0
Chuột phải vào cái check box bị lộ ra đó (Cracked or chipped) -> Format Control -> chọn tab Properties -> Bỏ chọn Print Object đi

Còn vụ cà phê, cảm ơn bạn, giúp bạn và được bạn ghi nhận thế là vui rồi.
Dạ em cảm ơn. Em làm được rồi. Nhưng Maika8008 giúp nhiều mà. Em thật sự muốn đền đáp chút cho những người nhiệt tình vì khó khăn của người khác để làm động lực thôi ạ. Triệu like cho Maika8008!
 
Upvote 0
Dạ em cảm ơn. Em làm được rồi. Nhưng Maika8008 giúp nhiều mà. Em thật sự muốn đền đáp chút cho những người nhiệt tình vì khó khăn của người khác để làm động lực thôi ạ. Triệu like cho Maika8008!
Maika8008 ơi! Lại phiền anh nửa rồi. Dữ liệu in trên máy ảo PDF thì ok, máy laser ũng ok như sao in trên máy in kim liên tục nó in ra hết. Không che những phần không cần in? Maika8008 làm ơn kiểm tra giúp. Rất cần ạ.
 
Upvote 0
Vụ này khó trả lời quá vì nó phụ thuộc vào PC, driver và phải có máy in để test.
 
Upvote 0
Vụ này khó trả lời quá vì nó phụ thuộc vào PC, driver và phải có máy in để test.
Maika8008 có thể xem lại đoạn code có liên quan tới Ô stick để chỉ em cách định vị nó không? Vì em kéo ô vuông đi qua cell khác để cho nó đúng với khuông giấy thì nó nhất định in dấu stick ở vị trí định vị trước đó không hà. Không biết sao định vị nếu kéo nó qua cell khác. Em cảm ơn.
 
Upvote 0
Maika8008 có thể xem lại đoạn code có liên quan tới Ô stick để chỉ em cách định vị nó không? Vì em kéo ô vuông đi qua cell khác để cho nó đúng với khuông giấy thì nó nhất định in dấu stick ở vị trí định vị trước đó không hà. Không biết sao định vị nếu kéo nó qua cell khác. Em cảm ơn.
Bạn gửi lại file mới biết muốn kéo những ô nào, đi đâu chứ!

Gửi đi, hồi rảnh rỗi tôi xem.
 
Upvote 0
Dạ em cảm ơn Maika8008 đã phản hồi nhanh nhưng em không biết làm lệnh đó ạ. Maika8008 cho vào file và gửi lại giúp em với. Em Cảm ơn.
Dạ em muốn biết cách làm để tự làm chứ mỗi làn nhờ anh thì phiền lắm ạ. Ví dụ trong file. Di chuyển ô stick từ ô j17 sang k17 thì trong đoạn mã mình dịnh vị thế nào ạ?
 

File đính kèm

Upvote 0
Dạ em muốn biết cách làm để tự làm chứ mỗi làn nhờ anh thì phiền lắm ạ. Ví dụ trong file. Di chuyển ô stick từ ô j17 sang k17 thì trong đoạn mã mình dịnh vị thế nào ạ?
Tôi xem lại chứ lâu ngày quên mất rồi.
 
Upvote 0
Dạ em muốn biết cách làm để tự làm chứ mỗi làn nhờ anh thì phiền lắm ạ. Ví dụ trong file. Di chuyển ô stick từ ô j17 sang k17 thì trong đoạn mã mình dịnh vị thế nào ạ?
Bạn làm trên sheet nào: Form hay Formin? Tôi chạy lệnh in trên sheet Form, kéo checkbox đi đâu thì nó in ở đấy chứ code đâu có định vị bạn à. Code in chỉ làm nhiệm vụ là check hay không check vào checkbox, điền dữ liệu vào các ô rồi in thôi. (Lệnh in chỉ chạy trên sheet Form thôi chứ không chạy trên Formin đâu nhé)

Bạn xem lại rồi nói rõ bạn chạy code gì khác không?
 
Lần chỉnh sửa cuối:
Upvote 0
Bạn làm trên sheet nào: Form hay Formin? Tôi chạy lệnh in trên sheet Form, kéo checkbox đi đâu thì nó in ở đấy chứ code đâu có định vị bạn à. Code in chỉ làm nhiệm vụ là check hay không check vào checkbox, điền dữ liệu vào các ô rồi in thôi. (Lệnh in chỉ chạy trên sheet Form thôi chứ không chạy trên Formin đâu nhé)

Bạn xem lại rồi nói rõ bạn chạy code gì khác không?
Dạ, em chào Maika8008, Em cảm ơn Maika8008 nhiều. Dạ em không chạy code nào khác ạ. Nhưng không sao. Em chỉnh giấy lại cũng tạm ổn. Giờ phát sinh thêm 2 vấn đề em nghĩ sẽ khó hơn rất nhiều mong Maika8008 có thể giúp được.

1. Cũng như file đính kèm, code ban đầu là mỗi lần save sẽ nhảy xuống dòng phía dưới hiện chạy rất ổn. Tuy nhiên nếu em muốn cập nhật dữ liệu lại cho xe đã lưu thì nó lại nhảy xuống dòng nữa tức là thêm xe mới như vậy khi in thì 1 xe sẽ in nhiều lần với dữ liệu khác nhau. Có thể nào mình tạo 1 code nó sẽ dựa vào dữ liệu nhập ô M13 để tìm và cập nhật khi mình bấm nút Save không? Cụ thể là code sẽ dựa vào dữ liệu ô M13 quét cột J từ J6 xuống đến hết dữ liệu trong cột J ở sheet Data. Nếu trùng thì cập nhật toàn bộ dòng có dữ liệu trùng, nếu không thì ghi dữ liệu như bình thường.
2. Trong nút lệnh print thì khi bấm nó nạp tuần tự và in cho đến hết. Vấn đề xảy ra là nếu dữ liệu lớn vài trăm đến hơn nghìn thì nguy cơ kẹt giấy in liện tục có thể xảy ra. Vậy nếu khi kẹt mà bấm in lại thì nó lại in lại từ đầu. Maika8008 có cách nào để có thể chọn in tùy ý một lần 20 xe, 30 xe...hay 1 - 2 xe gì không?

Em cảm ơn Maika8008 nhiều.
 

File đính kèm

Lần chỉnh sửa cuối:
Upvote 0
Dạ, em chào Maika8008, Em cảm ơn Maika8008 nhiều. Dạ em không chạy code nào khác ạ. Nhưng không sao. Em chỉnh giấy lại cũng tạm ổn. Giờ phát sinh thêm 2 vấn đề em nghĩ sẽ khó hơn rất nhiều mong Maika8008 có thể giúp được.

1. Cũng như file đính kèm, code ban đầu là mỗi lần save sẽ nhảy xuống dòng phía dưới hiện chạy rất ổn. Tuy nhiên nếu em muốn cập nhật dữ liệu lại cho xe đã lưu thì nó lại nhảy xuống dòng nữa tức là thêm xe mới như vậy khi in thì 1 xe sẽ in nhiều lần với dữ liệu khác nhau. Có thể nào mình tạo 1 code nó sẽ dựa vào dữ liệu nhập ô M13 để tìm và cập nhật khi mình bấm nút Save không? Cụ thể là code sẽ dựa vào dữ liệu ô M13 quét cột J từ J6 xuống đến hết dữ liệu trong cột J ở sheet Data. Nếu trùng thì cập nhật toàn bộ dòng có dữ liệu trùng, nếu không thì ghi dữ liệu như bình thường.
2. Trong nút lệnh print thì khi bấm nó nạp tuần tự và in cho đến hết. Vấn đề xảy ra là nếu dữ liệu lớn vài trăm đến hơn nghìn thì nguy cơ kẹt giấy in liện tục có thể xảy ra. Vậy nếu khi kẹt mà bấm in lại thì nó lại in lại từ đầu. Maika8008 có cách nào để có thể chọn in tùy ý một lần 20 xe, 30 xe...hay 1 - 2 xe gì không?

Em cảm ơn Maika8008 nhiều.
Vấn đề 1 thì dễ rồi. V.đề 2 thì có thể làm 2 ô chỉ định số dòng in (từ ... đến ...)
 
Upvote 0
Dạ, nghe từ dễ sao thấy nó nhẹ lòng. Dạ đợi tin Maika8008.
 
Upvote 0
Dạ em dốt vba quá nên làm phiền các anh nhiều ạ. Các anh chị trên này toàn ra tay nghĩa hiệp. Như anh Maika8008 em cũng có đề xuất nhắn em số tk để em gửi chút cafe mà ảnh từ chối. Em cũng ngại nhưng bí quá...híc.
 
Upvote 0
Dạ em dốt vba quá nên làm phiền các anh nhiều ạ. Các anh chị trên này toàn ra tay nghĩa hiệp. Như anh Maika8008 em cũng có đề xuất nhắn em số tk để em gửi chút cafe mà ảnh từ chối. Em cũng ngại nhưng bí quá...híc.
Bạn chạy thử! Với chức năng in (tại sheet Locin) thì chỉ định dòng in tại E2:F2. Dòng nào xong thì tô màu vàng để biết, khỏi in trùng lần sau
 

File đính kèm

Upvote 0
Bạn chạy thử! Với chức năng in (tại sheet Locin) thì chỉ định dòng in tại E2:F2. Dòng nào xong thì tô màu vàng để biết, khỏi in trùng lần sau
Dạ, Maika8008. hai yêu cầu thỏa mãn nhưng Maika8008 lại cho nó in ra toàn bộ form. Em chỉ muốn nó nạp và in dữ liệu của các ô tô màu xanh và ô nào stick sẽ in ra như hình thôi. Code trước Maika8008 đã viết rồi ạ. Nhưng file này code thay đổi nên nó in ra hết. Em kèm hình yêu cầu và kèm code trước sau để Maika8008 tiện theo dõi ạ. Cả team em đang rối và chờ Maika8008 ạ.
 

File đính kèm

Upvote 0
Dạ, Maika8008. hai yêu cầu thỏa mãn nhưng Maika8008 lại cho nó in ra toàn bộ form. Em chỉ muốn nó nạp và in dữ liệu của các ô tô màu xanh và ô nào stick sẽ in ra như hình thôi. Code trước Maika8008 đã viết rồi ạ. Nhưng file này code thay đổi nên nó in ra hết. Em kèm hình yêu cầu và kèm code trước sau để Maika8008 tiện theo dõi ạ. Cả team em đang rối và chờ Maika8008 ạ.
Đây là hậu quả của tam sao thất bản đây (Khi nhờ làm tiếp 1 việc gì đó, bạn gửi cho tôi cái file với code cũ, tôi cứ thế mà làm chứ đâu có thì giờ kiểm tra code cũ hay mới). Bây giờ chỉ dùng file này thôi bạn nhé. Chịu khó chỉnh lại mấy cái checkbox cho vừa form giấy in. Chạy thử tiếp, có gì báo lại nhé!
 

File đính kèm

Upvote 0
Dạ em xin lỗi ạ. Em sẽ rút kinh nghiệm. Giờ đến mai em và team sẽ làm việc với file mới này. Em sẽ thông báo cho Maika8008 ạ. Triệu like cho anh ạ.
 
Upvote 0
Đây là hậu quả của tam sao thất bản đây (Khi nhờ làm tiếp 1 việc gì đó, bạn gửi cho tôi cái file với code cũ, tôi cứ thế mà làm chứ đâu có thì giờ kiểm tra code cũ hay mới). Bây giờ chỉ dùng file này thôi bạn nhé. Chịu khó chỉnh lại mấy cái checkbox cho vừa form giấy in. Chạy thử tiếp, có gì báo

Em chào Maika8008, nhóm em vẫn đang chỉnh sữa phần in với file code mới . Rất cảm ơn ạ. Có một phần nhỏ trong toàn bộ quá trình là phần lọc và copy dữ liệu. Em có ghi macro như file đính kèm. macro vẫn chạy tốt , tuy nhiên em bị bí ở chổ là khi nó lọc theo dữ liệu copy từ sheet N4 sang sheet COPY nó ghi đè lên dữ liệu đang có. em muốn mỗi lần chạy macro để lọc nó không ghi đè mà copy xuống dưới dòng cuối cùng của sheet COPY. Anh chay macro và chỉnh giúp em ạ. Mong tin
 

File đính kèm

Upvote 0
Em chào Maika8008, nhóm em vẫn đang chỉnh sữa phần in với file code mới . Rất cảm ơn ạ. Có một phần nhỏ trong toàn bộ quá trình là phần lọc và copy dữ liệu. Em có ghi macro như file đính kèm. macro vẫn chạy tốt , tuy nhiên em bị bí ở chổ là khi nó lọc theo dữ liệu copy từ sheet N4 sang sheet COPY nó ghi đè lên dữ liệu đang có. em muốn mỗi lần chạy macro để lọc nó không ghi đè mà copy xuống dưới dòng cuối cùng của sheet COPY. Anh chay macro và chỉnh giúp em ạ. Mong tin
Chạy lần thứ 2 trở đi nếu muốn giữ dòng tiêu đề thì dùng sub Copyfilter, còn muốn xóa tiêu đề thì dùng Copyfilter2
 

File đính kèm

Upvote 0
Chạy lần thứ 2 trở đi nếu muốn giữ dòng tiêu đề thì dùng sub Copyfilter, còn muốn xóa tiêu đề thì dùng Copyfilter2

Dạ, Chỉ có thể nói là trên cả tuyệt vời ạ. Em chiều giờ cứ ở trên máy thấp thỏm chờ vì mai cả nhóm phải làm việc để in dữ liệu trên 2 nghìn xe vào ngày 17/3 tới. Muôn vàng lời xin cảm ơn anh ạ.
 
Upvote 0
Chạy lần thứ 2 trở đi nếu muốn giữ dòng tiêu đề thì dùng sub Copyfilter, còn muốn xóa tiêu đề thì dùng Copyfilter2

Dạ, xin bỏ qua vì làm phiền anh Maika8008 nữa ạ. Em và cả nhóm quần quật cà ngày hôm qua một mình em nguyên tối nay vẫn chưa giải quyết hết việc. Em có file như đính kèm khi em chạy macro thì nó tìm và copy Từ sheet " COPY" qua sheet " Data" ở cuối dòng nhưng ko hiểu sao nó lại đè vào dòng cuối mà không phải copy xuống dưới dòng cuối. ( Trong file dòng màu vàng). Mong anh rủ lòng mà giúp đỡ ạ. Chỉ cần cho nó copy xuống cuối dòng là thỏa mãn ạ. Phần còn lại nhóm em quần tiếp.
 

File đính kèm

Upvote 0
Dạ, xin bỏ qua vì làm phiền anh Maika8008 nữa ạ. Em và cả nhóm quần quật cà ngày hôm qua một mình em nguyên tối nay vẫn chưa giải quyết hết việc. Em có file như đính kèm khi em chạy macro thì nó tìm và copy Từ sheet " COPY" qua sheet " Data" ở cuối dòng nhưng ko hiểu sao nó lại đè vào dòng cuối mà không phải copy xuống dưới dòng cuối. ( Trong file dòng màu vàng). Mong anh rủ lòng mà giúp đỡ ạ. Chỉ cần cho nó copy xuống cuối dòng là thỏa mãn ạ. Phần còn lại nhóm em quần tiếp.
Bạn xem giải thích trong code!
 

File đính kèm

Upvote 0

Bài viết mới nhất

Back
Top Bottom