Automatyczne ukrywanie / Odkryj wszystkie wiersze na podstawie wartości w kolumnie

Mam „arkusz2”, w którym dane wypełniają się w zależności od tego, co zostało wprowadzone do „arkusza1”. Wypełnione dane to „N / A” lub konkretna instrukcja.

W arkuszu2 chciałbym, aby wszystkie wiersze z „N / A” w kolumnie G zostały automatycznie ukryte i stały się niewidoczne, jeśli dane w arkuszu 1 zostaną zmienione, co spowoduje zmianę z „N / A”.

Wiem, że VBA jest prawdopodobnie moją odpowiedzią, ale nie mam z nimi żadnej wiedzy / doświadczenia.

Ponieważ chcesz, aby program Excel automatycznie ukrywał i pokazywał wiersz / kolumnę, jeśli wyznaczona kolumna zawiera błąd / wartość #NA. W takim przypadku VBA (Macro) jest najlepszym i poręcznym rozwiązaniem.

Wprowadź ten kod jako standardowy moduł w Arkuszu 2.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Dim rng As Range
    Dim cl As Range

    Application.ScreenUpdating = False
    Set rng = [H2:H25]
    For Each cl In rng
        If IsError(cl) Then
            cl.EntireColumn.Hidden = cl = CVErr(xlErrNA)
        Else
            cl.EntireColumn.Hidden = cl = ""
        End If
    Next
    Application.ScreenUpdating = True
End Sub

Uwaga:

• W razie potrzeby dostosuj odwołania do komórek w kodzie.
• Moja sugestia jest zamiast ukryć / odkryć Wiersz lepiej obsługiwać formułę Tylko kolumna.
• Aby ukryć zastępowanie wiersza, za cl.EntireColumn.Hiddenpomocą cl.EntireRow.Hidden.

Spróbuj tego .. włożyć wzory ...

H1 --> =IF(G1="N/A",0,1)
H2 --> =IF(G2="N/A",H1,H1+1)
J1 --> =IFERROR(INDEX(G:G,MATCH(I1,H:H,0)),"")

rag H2 + J1 w dół. niektóre numery biegowe ..

I1 --> 1
I2 --> 2
I3 --> 3
I4 --> 4 and so on..

Hope Column J jest tym, czego szukasz .. (: