Tự động ẩn dòng cột

[Ngan Tuan]

Mong các Anh chị trên diễn đàn giúp dùm. Mình có file thống kê , nhưng trong dòng khối lượng có người có giá trị 0 đồng , mong các AC giúp dùm là có cách nào khi chúng ta nhập giá trị bằng 0 vào thì khi enter dòng đó sẽ tự ẩn đi ( vì thống kê nhiều người nếu dung lệnh Hide sẽ rất lâu và dễ sai sót.

 

[phulien1902]

Mong các Anh chị trên diễn đàn giúp dùm. Mình có file thống kê , nhưng trong dòng khối lượng có người có giá trị 0 đồng , mong các AC giúp dùm là có cách nào khi chúng ta nhập giá trị bằng 0 vào thì khi enter dòng đó sẽ tự ẩn đi ( vì thống kê nhiều người nếu dung lệnh Hide sẽ rất lâu và dễ sai sót.

Ẩn dòng:

Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 3 Then
        If Target.Value = 0 Then
             Target.EntireRow.Hidden = True
        End If
    End If
End Sub

 

[Ngan Tuan]

Ẩn dòng:

Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 3 Then
        If Target.Value = 0 Then
             Target.EntireRow.Hidden = True
        End If
    End If
End Sub

Dạ cảm ơn bạn, nhưng mình chưa biết sử dụng VBA bao giờ nên mong các Anh chị hỗ trợ mình trực tiếp trên file sau đó mình sẽ tự học hỏi thêm

 

[thukhon2014]

Dạ cảm ơn bạn, nhưng mình chưa biết sử dụng VBA bao giờ nên mong các Anh chị hỗ trợ mình trực tiếp trên file sau đó mình sẽ tự học hỏi thêm

Mở file, Alt + F11, Chọn đúng Sheet mà bạn muốn ẩn dòng (gốc trên bên trái), Lấy code copy vào WorkSheet đó. Khi lưu file Save As lại đuôi là .xlsb hoặc .xlsm