Nguyễn Văn Hòa
Nguyễn Văn Hòa
Thảo luận 15 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 273 lượt xem

giáo có thể giúp mình viết code tìm ngày cuối tháng của tháng đã nhập

Thầy giáo có thể giúp mình viết code tìm ngày cuối tháng của tháng đã nhập trong 1 ô ( ví dụ trong ô A1 ghi là 5) thì mình muốn viết code cho biến ngày cuối của tháng 5?
Thảo luận 15 câu trả lời
Lượt xem 273 lượt xem
Vỗ tay vỗ tay
Nguyễn Văn Hòa 22:05 - May 05, 2020
và kết quả ra ngày 31 tháng 5 năm 2020. Và mình muốn biến ngày cuối tháng đó lấy số 31 thôi.
Vỗ tay vỗ tay
Nguyễn Văn Hòa 22:05 - May 05, 2020
Chào bạn, đầu tiên bạn xác định đó là ngày tháng và tách nó ra rồi lấy dữ liệu là được. bạn tham khảo nhé:
Sub goi()
Dim hien, hien1 As String
'truong hop dd/MM/YYYY
hien1 = Format(Sheet1.Range("E9").Value, "DD")
' truong hop Ngay .. Tháng ... Nam ...
hien = Application.WorksheetFunction.Trim(Mid(Sheet1.Range("E12").Value, 5, 3))
MsgBox hien1
MsgBox hien
End Sub
ô E9 mình để 31/05/2020 và ô E12 mình để là Ngày 31 tháng 05 năm 2020
Vỗ tay vỗ tay
Nguyễn Văn Hòa 23:05 - May 05, 2020
Thank you,
Vỗ tay vỗ tay
Nguyễn Văn Hòa 00:05 - May 06, 2020
Thực ra mình chỉ muốn nhập vào ô E9 là số 5 thôi. Sau đó viết code trong VBA để tìm biến ngày cuối là lastday= 31. nếu nhập ô E9 là số 6 thì lastday = 30 ( ngày cuối tháng 6), nhập số 7 vào thì lastday = 31. ( Mình đã học bài sự kiện thay đổi rồi, nhưng ở đây mình chỉ muốn tìm giá trị của biến thôi).
Vỗ tay vỗ tay
Nguyễn Văn Hòa 00:05 - May 06, 2020
Chào bạn bạn muốn tìm ngày cuối tháng đúng không? cái này phải dựa vào tháng và năm bạn nhé. bạn tham khảo:
https://gitiho.com/course/default_stu...
Vỗ tay vỗ tay
Nguyễn Văn Hòa 14:07 - Jul 05, 2021

Dạ Em Chào Thầy ah! 

Em có câu hỏi nhờ Thầy hỗ trợ ah.

Câu hỏi:  Làm thế nào  để chọn được nhiều sheet cùng lúc ( cùng ô; cùng cột) để tìm dòng cột dán và giữ giá trị ah? Nhờ Thầy xem giúp và hướng dẫn giúp em cách tối ưu nhất ah.

Em có làm 2 cách sau, xin nhờ thầy hỗ trợ. 

Cách 1: (hình 1):  2 sheet gọi tắt là sheet 16 và sheet 6. Em làm theo cách tìm dòng cuối đơn giản. Code chạy bình thường. Nhưng phải click vào từng sheet ( active từng sheet thì code mới chạy) Không thể chạy cùng lúc 2 sheet.

Cách 2:  Em đã chọn cách Record Marco. Thì Record bình thường ra dc Sub.

Nhưng đến khi bấm run chạy thì nó báo lỗi như hình 2. Nhờ Thầy xem giúp em với ah


Vỗ tay vỗ tay
Nguyễn Văn Hòa 14:07 - Jul 05, 2021

Bạn có thể mô tả rõ hơn mong muốn của bạn được không?

Vỗ tay vỗ tay
Nguyễn Văn Hòa 14:07 - Jul 05, 2021

Dạ Chào Thầy! 

Em có câu hỏi nhờ Thầy hỗ trợ ah.

Câu hỏi:  Làm thế nào  để chọn được nhiều sheet cùng lúc ( cùng dòng; cùng cột) để tìm dòng cuối sau đó copy dán và giữ giá trị ah? Nhờ Thầy xem giúp và hướng dẫn giúp em cách tối ưu nhất ah. Em có làm 2 cách ở trên.


Có nghĩa là em muốn sử dụng công thức tìm dòng cuối như cách 1 ở trên. ( sub đó chạy được) nhưng phải chọn từng sheet thì nó mới chạy. Chứ nó không cho chạy cùng 1 lúc 2 sheet ah. 

Làm thế nào để cho nó chạy 2 sheet đồng thời ah?



Vỗ tay vỗ tay
Nguyễn Văn Hòa 14:07 - Jul 05, 2021
Chào bạn bạn dùng vòng lặp nhé, lặp hai sheets đó với mỗi lần lặp sẽ dán dữ liệu một lần nhé.
Vỗ tay vỗ tay
Nguyễn Văn Hòa 14:07 - Jul 05, 2021

Dạ Chào Thầy! 

Nhờ Thầy hướng dẫn Em 1 code theo sub Capnhat_nhanvienmoi ở trên được không ah?

Vì vừa vòng lặp, vừa tìm dòng cuối mà thao tác cho nhiều sheet em chưa hiểu rõ ah.

Thầy hướng dẫn sơ bộ cho 1 code để em tham chiếu làm dc không Thầy. Thanks Thầy.

Vỗ tay vỗ tay
Nguyễn Văn Hòa 15:07 - Jul 05, 2021

Chào bạn giờ bạn cập nhật cho 1 cái trước nhé, rồi tiếp theo là làm cái tiếp theo tìm dong cuối và cập nhật bạn làm thử bằng code từng cái trước rồi mới đưa vào vòng lặp theo điều kiện chung

Vỗ tay vỗ tay
Nguyễn Văn Hòa 15:07 - Jul 05, 2021

Dạ Cảm ơn Thầy!

Để Em tự tìm hiểu và học thêm ah. Tại vì chỉ có 2 sheet dc chọn thôi. Nếu vòng lập thì nó sẽ duyệt qua các sheet khác nữa rồi sẽ khó với nhiều câu hỏi hơn nữa.

Em thấy Record dc Sub. Nhưng khi chạy thì ko chạy dc. Thầy hướng dẫn lỗi này giúp em với ah. Em thấy Record dễ hơn ah. 

Nó báo lỗi: Subscript out of range. 

Thầy hướng dẫn giúp để em sử dụng record cho dễ ah. 

Thanks Thầy

 

Vỗ tay vỗ tay
Nguyễn Văn Hòa 15:07 - Jul 05, 2021

chào bạn bạn muốn copy dữ liệu bạn nên xem trong chương 10 sẽ có phần di chuyển dữ liệu nhé.

Vỗ tay vỗ tay
Nguyễn Văn Hòa 18:07 - Jul 05, 2021

Dạ chào Thầy ah! 

Thầy ơi cho em hỏi cái đoạn Record trên tại sao nó lại không chạy dc khi gắn vào nút cập nhật vậy Thầy. Khi Record thì vẫn thu dc đoạn code đó. 

Vỗ tay vỗ tay
Nguyễn Văn Hòa 08:07 - Jul 06, 2021

Chào bạn bạn để tên sheets không có dấu tiếng việt nhé, ở đây bạn đang để tên sheets có dấu tiếng việt nên không cập nhật được bạn nhé.

Vỗ tay vỗ tay
Câu hỏi liên quan
@ 2020 - Bản quyền của Công ty cổ phần công nghệ giáo dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở kế hoạch và đầu tư TP. Hà Nội