Navigation

   Jeg har følgende kode, der er beregnet til at gøre fanebladet mere overskueligt. Pt. køres macroen hver gang der ændres noget i regnearket, hvilket gør, at jeg ikke kan bruge fortryd-kommandoen. 

Kan jeg ændre koden, således at den KUN køres, når den specifikke celle - A38 ændres?

Private Sub Worksheet_Change(ByVal Target As Range)

    If Range("A38").Value = "Begge" Then
        Rows("41:254").EntireRow.Hidden = False
    Else
        Rows("41:254").EntireRow.Hidden = False
    End If

    If Range("A38").Value = "Kilometer/kørselsøkonomi" Then
        Rows("40:174").EntireRow.Hidden = True
    Else
        Rows("40:174").EntireRow.Hidden = False
    End If

      If Range("A38").Value = "Kapacitet" Then
        Rows("173:254").EntireRow.Hidden = True
    Else
        Rows("173:254").EntireRow.Hidden = False
    End If

End Sub

Navigation

Alternativ til Worksheet_Change for hele arket