Nhờ giúp sửa code tách ngày theo tuần trong tháng.

[hamhochoi66]

Chào anh chị,
Nhờ anh chị giúp em sửa đoạn code trong file thay vì code thực hiện vào ô B10 thì sẽ hỏi người dùng địa chỉ ô cụ thể để dán vào. Vấn đề thứ 2 là thay vì chỉ định code thực hiện ở sheet nào đó (trong file sheet tên T12) thì em muốn thực thi tại worksheet đang muốn thực hiện ở đó.

Em cám ơn anh chị ạ!

Sau khi được anh HUONGHCKT hướng dẫn đã mài mò ra được. Em cảm ơn anh.
Đính chính thêm: hôm qua vọc vạch thử up file lên thử chắc quên đính kèm chứ không phải xóa hay "qua cầu rút ván" gì đó mà bác SA_DQ vội đánh giá một người như vậy nhé!
Mong mọi người thông cảm sự cố này!

 

[HUONGHCKT]

Chào anh chị,
1) Nhờ anh chị giúp em sửa đoạn code trong file thay vì code thực hiện vào ô B10 thì sẽ hỏi người dùng địa chỉ ô cụ thể để dán vào.2) Vấn đề thứ 2 là thay vì chỉ định code thực hiện ở sheet nào đó (trong file sheet tên T12) thì em muốn thực thi tại worksheet đang muốn thực hiện ở đó.

Em cám ơn anh chị ạ!

1)Thêm

Dim dongInput As Integer
dongInput = InputBox("Nhap dong đinh gán:", "Nhap sô")
.....

Thay

totalRow = 10
    ws.Rows("10 :" & ws.Rows.Count).Clear

Thành

totalRow = dongInput
    ws.Rows(dongInput & ":" & ws.Rows.Count).Clear

2/ Thay

Set ws = ThisWorkbook.Sheets("T12") ' Thay doi ten sheet neu can

thành

Set ws = ActiveSheet

 

[hoangtuaotrang_hp_vn]

Chào anh chị,
Nhờ anh chị giúp em sửa đoạn code trong file thay vì code thực hiện vào ô B10 thì sẽ hỏi người dùng địa chỉ ô cụ thể để dán vào. Vấn đề thứ 2 là thay vì chỉ định code thực hiện ở sheet nào đó (trong file sheet tên T12) thì em muốn thực thi tại worksheet đang muốn thực hiện ở đó.

Em cám ơn anh chị ạ!

rồi xóa file đính kèm thì làm sao mà người sau xem được?

 

[SA_DQ]

rồi xóa file đính kèm thì làm sao mà người sau xem được?

/(iểu này lại là: 2ua cầu rút ván đây mà!
Loại này nên cho vô danh sách đen, để lần sau cảnh báo cho mọi người;

 

[hamhochoi66]

Ôi, hôm qua em có vào chỉnh sửa lại file để up thử lại nhưng không hiểu sao nó k có file, chắc em quên đính kèm lại anh!

Bài đã được tự động gộp: Hôm nay lúc 08:43

/(iểu này lại là: 2ua cầu rút ván đây mà!
Loại này nên cho vô danh sách đen, để lần sau cảnh báo cho mọi người;

Ui, chưa gì bác lại đánh giá 1 người vội vàng đến vậy sao? Hic

 

[HUONGHCKT]

rồi xóa file đính kèm thì làm sao mà người sau xem được?

Bạn Chủ tút ấy muốn giấu (mà thực ra cũng chẳng có gì để phải bí mật, bí hiểm gì), còn tôi thì lại đăng lên cho ai đó nếu cần có thể tham khảo.
Tôi Sẵn sàng nhận like, tim hay cười (không cần biết là cười nhạo, hay cười mỉa mai, hay gì nữa,...) hay gạch đá, tôi đều hoan hỉ đón nhận hết.

Gửi bạn @hamhochoi66
Tiện đây cũng muốn nói với bạn @hamhochoi66 là : nick của bạn không đúng với thái độ cầu thị của bạn. Nếu không muốn được làm người "nổi tiếng" trong hệ sinh thái của diễn đàn này thì hãy thay đổi ngay từ hôm nay và luôn bây giờ.

 

[hamhochoi66]

Bạn Chủ tút ấy muốn giấu (mà thực ra cũng chẳng có gì để phải bí mật, bí hiểm gì), còn tôi thì lại đăng lên cho ai đó nếu cần có thể tham khảo.
Tôi Sẵn sàng nhận like, tim hay cười (không cần biết là cười nhạo, hay cười mỉa mai, hay gì nữa,...) hay gạch đá, tôi đều hoan hỉ đón nhận hết.

Gửi bạn @hamhochoi66
Tiện đây cũng muốn nói với bạn @hamhochoi66 là : nick của bạn không đúng với thái độ cầu thị của bạn. Nếu không muốn được làm người "nổi tiếng" trong hệ sinh thái của diễn đàn này thì hãy thay đổi ngay từ hôm nay và luôn bây giờ.

Anh xem lại bài em đã chỉnh sửa up file lại rồi nhé. Cái đó có gì mà giấu anh, nếu đã giấu thì em đưa lên diễn đàn nhờ hỗ trợ làm gì. Chỉ là em thao tác đính kèm file mà thấy ai cũng căng thẳng nghiêm trọng vấn đề, sáng này vào lại thấy quá trời cảm xúc em mới xem lại thì phát hiện.
Cái này chỉ là hạt cát với trình độ của các anh chị ở diễn đàn thì giấu được gì vậy nhỉ. Suy nghĩ mãi không hiểu tại sao lại suy nghĩ như vậy.
Thực ra khi anh hướng dẫn em tải lại file ngồi mò vọc vạch xong em định up lại file nhờ xem thử nhưng quên đính kèm chứ này mấy cái này có gì hay ho lợi ích gì mà giấu nhỉ? Các anh chị code cái này 2 3phút là xong, khó hiểu!

 

[HUONGHCKT]

Anh xem lại bài em đã chỉnh sửa up file lại rồi nhé. Cái đó có gì mà giấu anh, nếu đã giấu thì em đưa lên diễn đàn nhờ hỗ trợ làm gì. Chỉ là em thao tác đính kèm file mà thấy ai cũng căng thẳng nghiêm trọng vấn đề, sáng này vào lại thấy quá trời cảm xúc em mới xem lại thì phát hiện.
Cái này chỉ là hạt cát với trình độ của các anh chị ở diễn đàn thì giấu được gì vậy nhỉ. Suy nghĩ mãi không hiểu tại sao lại suy nghĩ như vậy.
Thực ra khi anh hướng dẫn em tải lại file ngồi mò vọc vạch xong em định up lại file nhờ xem thử nhưng quên đính kèm chứ này mấy cái này có gì hay ho lợi ích gì mà giấu nhỉ? Các anh chị code cái này 2 3phút là xong, khó hiểu!

Tôi vẫn luôn hy vọng bạn đúng như nick bạn đã đặt.
Cũng không có gì là nghiêm trọng đâu, bạn cứ nghĩ ngợi nó ra thế thôi. Chỉ cần thành thật nhận lỗi là được mà.
Thế nhé, chúc vui vẻ.