Zeilen ein- und ausblenden
25.03.2015 14:10:42
Jessica
Ich hab folgendes Makro um Zeilen ein- und auszublenden.
Das funktioniert auch super wenn es nur zwei Auswahlmöglichkeiten gibt.
Jetzt möchte ich aber das die Zeilen bei "EUR" ausgeblendet werden und bei allen anderen Währungen eingeblendet werden.
Kann mir jemand auf die Sprünge helfen?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$G$36" Then
Select Case Target
Case "EUR"
Rows("46:48").Hidden = True
Case " "
Rows("46:48").Hidden = False
End Select
End If
End Sub
Jessica
Anzeige