Kết quả tìm kiếm

Kính gửi các Thầy. Dạ em có xem lại bài viết cũ này , có thử chạy file như đính kèm nhưng nó báo lỗi. Rất mong các thầy xem giúp em cách sửa lỗi này với ạ. Em xin cảm ơn!

em xin cảm ơn mọi người rất nhiều ạ!

Dạ em có làm như này thì sai đâu vậy ạ Dim table1 As Variant, table2 As Variant Dim i, i_row As Long Dim compare2RowsOfTable As Boolean Dim lastrow_volumn As Long, lastrow_cost As Long lastrow_volumn = Sheet5.Cells(Sheet5.Rows.Count, "A").End(xlUp).Row lastrow_cost =...

Dạ em cảm ơn anh. Cái table1, table2 thì khai báo như thế nào ạ ? Nếu được anh giúp em thử trên file em gửi với anh nhé... để em học và sửa theo cho phù hợp với bài toán thực tế của em ạ. Em xin cảm ơn!

Em chào mọi người. Dạ em có 1 file tính toán như đính kèm ạ. nó có 1 khúc mắc như này mà em đang loay hoay không biết làm thế nào cho ngắn gọn ạ 1. Nó sẽ kiểm tra dữ liệu tại 2 sheet "Volumn" và "Cost"... nó kiểm tra từng dòng ở 2 sheet. 2. Nếu dữ liệu tại 2 sheet giống nhau từ cột A đến cột O...

Dạ em cảm ơn ạ! 1678845435 Dạ dữ liệu mới ghi vào nó ghi lần lượt xuống bên dưới anh ạ. Nên sau khi ghi thì mình check trùng để xóa các dữ liệu mới được ghi vào mà bị trùng ạ,

Vang! có dữ liệu xong mới thực hiện ạ

Dạ vâng tức ở cột A, kiểm tra các dòng có giá trị tại cột A mà giống nhau thì xóa đi các dòng bên dưới, chỉ giữ lại các dòng trên cùng ( tức là đã ghi từ trước vào file rồi ạ )

Em chào mọi người! Dạ em có 1 file excel mà liên tục được ghi dữ liệu mới vào tại cột A ạ. Em muốn kiểm tra tại cột A để xóa đi các dòng có giá trị tại cột A trùng nhau, chỉ giữ lại các dòng trên cùng đầu tiên mà em có bôi vàng ạ. Em xin cảm ơn rất nhiều!

Dạ em có chạy như anh bảo ạ, nó có loop và lấy được cái itemfromid đó ạ. Nhưng có Box nào mà có 2 cái itemfromid như thế bên trong thì nó chỉ lấy ra được có 1 cái bé hơn ạ ( ví dụ 604 và 605 thì nó chỉ lấy được cái 605 ạ.) Nhưng nếu mình show text cái itemfromid605 thì nó vẫn ra được ạ...

Dạ em cũng thử loop toàn bộ các Shapes và loop để lấy cái item đấy ạ, nhưng những shapes nào mà có nhiều hơn 1 item chứa bên trong thì nó chỉ lấy ra được cái items có giá trị bé nhất thôi ạ. Ví dụ trong Shapes có 2 box là ItemFromID(604) và ItemFromID(605) thì nó chỉ lấy ra được 1 cái là...

Dạ, trong 1 Ô nếu có nhiều hơn 1 box ( ItemFromID ) thì nó chỉ lấy ra được cái ItemFromID (box) cuối cùng thôi ạ

D Dạ như hình đính kèm của em là 1 shape trên visio ạ. Trong shape này có 2 cái ItemFromID như em có bôi đỏ ạ. Dạ em đang chưa biết cách nào để loop được các ItemFromID này và lấy được Text của chúng ạ. Em cảm ơn anh!

Em cảm ơn anh! Em đang chưa biết cách làm thế nào để loop dc các ItemFromID trong từng Shapes ạ. Nó như này: Application.ActiveWindow.Page.Shapes.ItemFromID Trong 1 shape có 1 số ItemFromID.... và làm thế nào để loop và lấy được chúng ạ. Em xin cảm ơn!

Em chào mọi người ! Dạ em có 1 file visio , trong đó có các shape dạng characters. Dạ làm thế nào để mình có thể loop lấy được toàn bộ các shape đó trong page visio ạ. Em mới làm đoạn khai báo như dưới nhưng chưa biết làm thế nào để loop đọc được các characters đó ạ. Dim vsoOval As...

Dạ vâng. Em cũng chưa biết là lúc so sánh dạng Date Format là phải đưa về dạng yyyyMMdd để nó so sánh lần lượt Năm, Tháng, Ngày... nên cứ loay hoay đi tách riêng thành Năm Tháng Ngày từ chuỗi để rồi so sánh lần lượt dài dòng quá ạ. Chỉ cần chuyển về dạng yyyyMMdd rồi so sánh là đúng cái em cần...

Em hiểu rồi ạ. Em cảm ơn anh nhiều nhé ^^

Em có thử thì nó báo lỗi như này ạ

Dạ em chỉ cần đoạn code so sánh được dữ liệu ( dạng Date ) em lấy từ cell thôi ạ Ví dụ e cần so sánh Date1 "30/12/2021" và Date2 "01/01/2022", kết quả đưa ra là Date2 > Date1 thôi ạ.

Vâng nhưng có cách nào để so sánh nhanh nhất thay vì phải so sánh năm, rồi nếu năm bằng nhau thì phải so sánh tháng, sau đó mới lại so sánh đến ngày. Ví dụ em muốn so sánh 30/12/2021 và 01/01/2022 ạ. Em xin cảm ơn!