Nhờ mọi người viết giùm VBA ẩn dòng khi dòng đó có dữ liệu lỗi và trống

[BUXUANTIN]

Dear mn. Mình có file làm việc trong quá trình tìm kiếm dữ liệu có những dòng trống hoặc lỗi... giờ mình muốn viết một dòng code để dòng đó tự ẩn và tự động mở ra khi có dữ liệu.. cảm ơn mọi người ạ

 

[VetMini]

Cái này là nhiệm vụ của Filter và Advanced Filter mà. Cốt kiếc chi vậy?

 

[BUXUANTIN]

Cái này là nhiệm vụ của Filter và Advanced Filter mà. Cốt kiếc chi vậy?

Vậy làm sao bạn.

 

[viettho]

Dear mn. Mình có file làm việc trong quá trình tìm kiếm dữ liệu có những dòng trống hoặc lỗi... giờ mình muốn viết một dòng code để dòng đó tự ẩn và tự động mở ra khi có dữ liệu.. cảm ơn mọi người ạ
View attachment 235637

Chào bạn
Bạn dùng thử file này xem tuy hơi gà tí nhưng có thể đáp ứng nhu cầu của bạn

 

[PacificPR]

Dear mn. Mình có file làm việc trong quá trình tìm kiếm dữ liệu có những dòng trống hoặc lỗi... giờ mình muốn viết một dòng code để dòng đó tự ẩn và tự động mở ra khi có dữ liệu.. cảm ơn mọi người ạ
View attachment 235637

"Đia mờ nờ"
Đia Bạn. Bạn tham khảo đoạn Code này xem

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$1" Then
       ActiveSheet.Range("$A$2:$I$67").AutoFilter Field:=3, Criteria1:="<>"
    End If
End Sub

 

[BUXUANTIN]

Chào bạn
Bạn dùng thử file này xem tuy hơi gà tí nhưng có thể đáp ứng nhu cầu của bạn

bạn viết file kia ok r. sao mình copy qua bên sheet này lại không chạy được bạn nhỉ
View attachment 235676

Bài đã được tự động gộp: 15/4/20

"Đia mờ nờ"
Đia Bạn. Bạn tham khảo đoạn Code này xem

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$F$1" Then
       ActiveSheet.Range("$A$2:$I$67").AutoFilter Field:=3, Criteria1:="<>"
    End If
End Sub

sao mình copy qua sheet khác nó không chạy nhỉ

 

[PacificPR]

bạn viết file kia ok r. sao mình copy qua bên sheet này lại không chạy được bạn nhỉ
View attachment 235676

Bài đã được tự động gộp: 15/4/20

sao mình copy qua sheet khác nó không chạy nhỉ

Bạn đưa cái File của Bạn đang làm lên rồi làm trực tiếp trên đó. Đỡ phải Copy qua Copy lại

 

[BUXUANTIN]

Bạn đưa cái File của Bạn đang làm lên rồi làm trực tiếp trên đó. Đỡ phải Copy qua Copy lại

Ok mình xin sdt Zalo bạn đc k...

 

[PacificPR]

Ok mình xin sdt Zalo bạn đc k...

Mình dùng Nokia 1280 mờ

 

[BUXUANTIN]

Mình dùng Nokia 1280 mờ

hihi... đây bạn giúp mình

 

[PacificPR]

hihi... đây bạn giúp mình

Bạn xem thử

 

[SA_DQ]

Dear mn. Mình có file làm việc trong quá trình tìm kiếm dữ liệu có những dòng trống hoặc lỗi...

Nhưng trong file của bạn có dòng nào lỗi đâu kia chứ (?)

 

[BUXUANTIN]

Nhưng trong file của bạn có dòng nào lỗi đâu kia chứ (?)

Ukm lỗi hoặc rỗng là nó tự ẩn đó bạn ... Lỗi thì không có r vì mình dùng ifferror mà

Bài đã được tự động gộp: 15/4/20

Bạn xem thử

Cảm ơn bạn

 

[BUXUANTIN]

Bạn xem thử

Dear như bạn đã viết cho mình lệnh code ẩn r... nhưng khi chạy số biên bản xong nó phải chờ 1 thời gian nó chạy code nữa, bạn biết nó bị sao không , làm thế nào nó chạy đồng loạt được không ạ

 

[PacificPR]

Dear như bạn đã viết cho mình lệnh code ẩn r... nhưng khi chạy số biên bản xong nó phải chờ 1 thời gian nó chạy code nữa, bạn biết nó bị sao không , làm thế nào nó chạy đồng loạt được không ạ
View attachment 235807

Đúng rồi Bạn ạ. Cái đó nó khó tính nên nó vừa làm nó vừa suy nghĩ ấy mà. Kệ nó đi Bạn

 

[BUXUANTIN]

Đúng rồi Bạn ạ. Cái đó nó khó tính nên nó vừa làm nó vừa suy nghĩ ấy mà. Kệ nó đi Bạn

bạn viết lệnh cho cái này luôn giúp mình được không , khi có kết quả nó hiện và ẩn khi không có kết quả đó bạn

 

[PacificPR]

bạn viết lệnh cho cái này luôn giúp mình được không , khi có kết quả nó hiện và ẩn khi không có kết quả đó bạn
View attachment 235819

Bạn xem thử

 

[BUXUANTIN]

Bạn xem thử

Mình mới copy vài sheet vào mà nó code nó chậm chậm ấy bạn... bạn xem giúp mình với

 

[BUXUANTIN]

Bạn xem thử

bạn xem thử giúp mình được không

 

[PacificPR]

bạn xem thử giúp mình được không

Mình xem xong rồi đó. Thấy mỗi cái Sheets("T.chuan") quen quen, còn mấy cái kia lạ hoắc. Bạn Đặt Pass nên chẳng ngó được gì. Mà cũng lười chả phá cái Pass ấy nữa