Nhờ tách code VBA (1 người xem)

Liên hệ QC

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

vova2209

Thành viên tích cực
Tham gia
5/4/17
Bài viết
835
Được thích
112
Giới tính
Nam
Nghề nghiệp
Đường bộ
Em có file dưới: nó có 3 cách chạy thông qua sheet phụ, nhờ các bác tách code của cách 3 "sub C3 ()" ra để chạy độc lập như bình thường..
 

File đính kèm

Bạn liên hệ với tác giả của file trên qua số ĐT 0939795092 (Tân) để được trợ giúp, chứ file của người khác mà bạn nhờ vậy khó lắm.
 
Upvote 0
Em có file dưới: nó có 3 cách chạy thông qua sheet phụ, nhờ các bác tách code của cách 3 "sub C3 ()" ra để chạy độc lập như bình thường..
Bạn muốn làm cái gì thì nên đưa File bạn cần lên chứ không nên lấy File của người khác và đề nghị sửa.
 
Upvote 0
Bạn muốn làm cái gì thì nên đưa File bạn cần lên chứ không nên lấy File của người khác và đề nghị sửa.
Chủ đề này đã có nên đăng lên các bác cũng chỉ cho links, giờ em muốn sửa theo ý phục vụ công việc của mình. Nên nhờ các bác giúp đỡ!
 
Upvote 0
Chủ đề này đã có nên đăng lên các bác cũng chỉ cho links, giờ em muốn sửa theo ý phục vụ công việc của mình. Nên nhờ các bác giúp đỡ!
Cách tốt nhất là bạn liên hệ với tác giả để nhờ hỗ trợ. Chứ lấy Code của anh Langtuchungtinh360 về sửa cho hợp yêu cầu của mình thi hơi khó đấy ( 1 rừng xà nu ở trong đó hại não lắm) :D
 
Upvote 0
Cách tốt nhất là bạn liên hệ với tác giả để nhờ hỗ trợ. Chứ lấy Code của anh Langtuchungtinh360 về sửa cho hợp yêu cầu của mình thi hơi khó đấy ( 1 rừng xà nu ở trong đó hại não lắm) :D
Vâng! anh Giaiphap cho số gọi rồi ạ, em cảm ơn anh
 
Upvote 0
Vâng! anh Giaiphap cho số gọi rồi ạ, em cảm ơn anh
Cái vụ biên bản này, hôm trước tôi có trả lời cho Langtuchungtinh360 rồi, chỉ cần thiết kế 1 sheet y như dữ liệu theo dõi rồi dùng nó truy vấn tất cả các loại biên bản thì sẽ dễ dàng hơn là truy vấn từng biên bản, nhưng do bận quá nên tôi chưa thể giúp được chuyện này.
 
Upvote 0
Cái vụ biên bản này, hôm trước tôi có trả lời cho Langtuchungtinh360 rồi, chỉ cần thiết kế 1 sheet y như dữ liệu theo dõi rồi dùng nó truy vấn tất cả các loại biên bản thì sẽ dễ dàng hơn là truy vấn từng biên bản, nhưng do bận quá nên tôi chưa thể giúp được chuyện này.
Vâng anh! em cũng chỉ có 1 sheet 3 biên bản và dùng vlooup links nên chỉ có 1 sheet. Nếu trộn thư ra work thì dễ còn chạy trực tiếp file cell sẽ bị mắc lúc chữ dài qua 1 dòng.
 
Upvote 0
Em có file dưới: nó có 3 cách chạy thông qua sheet phụ, nhờ các bác tách code của cách 3 "sub C3 ()" ra để chạy độc lập như bình thường..
bạn tham khảo lại nhé. code hơi dài dòng tí, tại tư duy kém nên làm tùm lum trường hợp cả. trong biên bản chỗ nào cần gộp, in đậm, in nghiêng ..... nói chung là định dạng trước thì định dạng hết. rồi hãy chạy code, chứ code nó không thông minh đến nỗi biết người dùng muốn định dạng chỗ nào mà định dạng cho luôn đâu nhé bạn. trong code gần cuối mình có ghi chú lại chỗ code ẩn dòng ấy. bạn không muốn ẩn dòng trống thì cứ xóa khúc đó đi.
code mặc định cho font Times New Roman size 13 nhé.
không còn làm thông qua sheet phụ nữa.
dùng có lỗi gì thì thông báo mình
cú pháp
FixRowHight <Địa chỉ vùng cần chỉnh- tức phần được in>
 

File đính kèm

Upvote 0
bạn tham khảo lại nhé. code hơi dài dòng tí, tại tư duy kém nên làm tùm lum trường hợp cả. trong biên bản chỗ nào cần gộp, in đậm, in nghiêng ..... nói chung là định dạng trước thì định dạng hết. rồi hãy chạy code, chứ code nó không thông minh đến nỗi biết người dùng muốn định dạng chỗ nào mà định dạng cho luôn đâu nhé bạn. trong code gần cuối mình có ghi chú lại chỗ code ẩn dòng ấy. bạn không muốn ẩn dòng trống thì cứ xóa khúc đó đi.
code mặc định cho font Times New Roman size 13 nhé.
không còn làm thông qua sheet phụ nữa.
dùng có lỗi gì thì thông báo mình
cú pháp
FixRowHight <Địa chỉ vùng cần chỉnh- tức phần được in>
Anh ơi! tại sao code chạy chậm thế nhỉ, file cũ chạy tận 568 dòng mà chưa đến 1s. Sao lại để chạy macro1 thì mới chạy code dưới. và em ấn Alt+F8 không thấy sub FixRowHight, và sub C3 cũng không kích được vào chỉ chạy thông qua Macro1. a giải thích cho em với
 
Upvote 0
bạn tham khảo lại nhé. code hơi dài dòng tí, tại tư duy kém nên làm tùm lum trường hợp cả. trong biên bản chỗ nào cần gộp, in đậm, in nghiêng ..... nói chung là định dạng trước thì định dạng hết. rồi hãy chạy code, chứ code nó không thông minh đến nỗi biết người dùng muốn định dạng chỗ nào mà định dạng cho luôn đâu nhé bạn. trong code gần cuối mình có ghi chú lại chỗ code ẩn dòng ấy. bạn không muốn ẩn dòng trống thì cứ xóa khúc đó đi.
code mặc định cho font Times New Roman size 13 nhé.
không còn làm thông qua sheet phụ nữa.
dùng có lỗi gì thì thông báo mình
cú pháp
FixRowHight <Địa chỉ vùng cần chỉnh- tức phần được in>
File của em căn chỉnh định dạng chuẩn hết rồi chỉ những ô links Vlookp có những công việc dài quá không tự xuống dòng được, em chỉ cẩn chức năng co và dãn dòng cho cả file hoặc cho những ô bôi mầu vàng từ C2:AF161 hoặc trong vùng in. mọi khi em dùng trộn thư thì không quan tâm lắm, nhưng nhiều khi bị sai 1 số biên bản sửa tay thì in để chèn ở cell thì bị mắc phần co và dãn dòng nhưng ô merge. Cái file cũ của anh chạy nhanh trong nháy mắt đã xong.
 

File đính kèm

Upvote 0
File của em căn chỉnh định dạng chuẩn hết rồi chỉ những ô links Vlookp có những công việc dài quá không tự xuống dòng được, em chỉ cẩn chức năng co và dãn dòng cho cả file hoặc cho những ô bôi mầu vàng từ C2:AF161 hoặc trong vùng in. mọi khi em dùng trộn thư thì không quan tâm lắm, nhưng nhiều khi bị sai 1 số biên bản sửa tay thì in để chèn ở cell thì bị mắc phần co và dãn dòng nhưng ô merge. Cái file cũ của anh chạy nhanh trong nháy mắt đã xong.
xem file chạy đúng chưa nhé bạn. vì sao nó chạy chậm thì mình chịu. đem qua file cũ của mình thì vẫn nhanh.
 

File đính kèm

Upvote 0
Upvote 0
Web KT

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

Back
Top Bottom