Giúp code tìm kiếm và select dữ liệu (1 người xem)

[congnguyen88]

Mình có 1 bảng tính Excel gồm các cột : Mã hàng,Tên hàng, Số lượng, Đơn giá , thành tiền nằm trong vùng B3:F20. Mình muốn nhập mã hàng tại ô C1 sau đó click vào nút tìm thì sẽ tự động tìm và select dòng có mã hàng đó.Mình gửi kèm File excel các bạn làm giúp nhé

 

[ChanhTQ@]

Bạn xem theo file đính kèm

 

[thangteotdtt]

Bạn xem theo file đính kèm

Chào ChanhTQ@ mình thử Recod macro được dòng này

Selection.Interior.ColorIndex = 6

Thêm vào

Sub TimMa() Dim Rng As Range, sRng As Range
Set Rng = Range([B3], [B3].End(xlDown))
Set sRng = Rng.Find([c1].Value, , xlFormulas, xlWhole)
If Not sRng Is Nothing Then
sRng.Resize(, 5).Select
Selection.Interior.ColorIndex = 6
End If
End Sub

Thế là sau khi tìm được thì sẽ tô màu cho dòng đó
Vậy khi muốn tìm 1 mã mới thì xóa dòng tô màu cũ đi
Dòng này

Selection.Interior.ColorIndex = xlNone

Vậy mình viết code hoàn chỉnh như thế nào? Cảm ơn anh

 

[hungpecc1]

Chào ChanhTQ@ mình thử Recod macro được dòng này

Thêm vào

Thế là sau khi tìm được thì sẽ tô màu cho dòng đó
Vậy khi muốn tìm 1 mã mới thì xóa dòng tô màu cũ đi
Dòng này

Vậy mình viết code hoàn chỉnh như thế nào? Cảm ơn anh

Giải thuật : tạo 1 biến tạm ghi tên ,địa chỉ ô đã được tô màu, --> khi thêm mã mới thì xoá màu ở ô cũ đi . Ví dụ :

Public Rng as range
sub ()
      ...................
      Rng.Interior.ColorIndex = Xlnone
      set rng = sRng.Resize(, 5)
      rng .Interior.ColorIndex = 6
.............................................
End sub

 

[chuot0106]

Mình có 1 bảng tính Excel gồm các cột : Mã hàng,Tên hàng, Số lượng, Đơn giá , thành tiền nằm trong vùng B3:F20. Mình muốn nhập mã hàng tại ô C1 sau đó click vào nút tìm thì sẽ tự động tìm và select dòng có mã hàng đó.Mình gửi kèm File excel các bạn làm giúp nhé

Xem File đã đúng ý chưa nhé!

 

[congnguyen88]

Xem File đã đúng ý chưa nhé!

Cảm ơn bạn. đúng rồi. Nhưng mình muốn thêm 1 chức năng nữa là thay vì nhập mã hàng để tìm kiếm, mình có thể nhập tên hàng, số lượng , Đơn giá ( nói chung cái gì có liên quan với từ cần tìm kiếm có trong bảng ). Nếu tìm kiếm không thấy hiện lên thông báo " không tìm thấy . Xin vui lòng kiểm tra lại"

 

[congnguyen88]

Bạn xem theo file đính kèm

Cảm ơn bạn. đúng rồi. Nhưng mình muốn thêm 1 chức năng nữa là thay vì nhập mã hàng để tìm kiếm, mình có thể nhập tên hàng, số lượng , Đơn giá ( nói chung cái gì có liên quan với từ cần tìm kiếm có trong bảng, Vả chỉ select dòng từ cột B đến cột F ). Nếu tìm kiếm không thấy hiện lên thông báo " không tìm thấy . Xin vui lòng kiểm tra lại"

 

[congnguyen88]

Xem File đã đúng ý chưa nhé!

Em mới phát hiện ra Code của anh nó không tìm kiếm được chử IN HOA. Ví dụ mả hàng là ah8 mà nhập là AH8 thì không tìm kiếm được

 

[chuot0106]

Em mới phát hiện ra Code của anh nó không tìm kiếm được chử IN HOA. Ví dụ mả hàng là ah8 mà nhập là AH8 thì không tìm kiếm được

Bạn đâu có nói là khi nhập mã bằng chữ in hoa. Mà đã dùng validation rồi thì làm sao phải lo. Kể cũng lạ, gõ chữ thường chẳng nhanh hơn gõ chữ hoa sao lại đi gõ chữ hoa nhỉ? Thích thì thêm hàm đổi chữ thường thành chữ hoa là xong chứ sao? Tự nghĩ và làm tiếp nhé! Lần sau muốn không mất thời gian thì nên nêu yêu cầu rõ ràng đầy đủ ngay từ đầu nhé bạn!