Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Zeile ausblenden
#1
Hallo zusammen!

Ich habe mal ne wichtige Frage.
Ich habe eine Tabelle entwickelt und will, dass eine Zeile ausgeblendet wird ohne das ich dies selbst vornehme.

Wenn Zelle E35=E34 dann Zeile ausblenden, sonst nicht. 

DIe Tabelle hat mehrere Tabellenblätter. Das soll aber nur bei einem Tabellenblatt angewendet werden.

Das muss doch irgendwie mit diesen Makros funktionieren. 

Bitte idiotensicher die Vorgehensweise erklären.

Vielen Dank im Voraus.
Antworten Top
#2
Hallo,

welche Zeile willst du dann ausblenden, die 34 oder die 35?
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Antworten Top
#3
Die Zeile 35 soll ausgeblendet werden.
Antworten Top
#4
Hallo,

dann versuche es mit diesem Makro im Modul des Tabellenblattes:


Code:
Private Sub Worksheet_Change(ByVal Target As Range)
   If Range("E35") = Range("E34") Then
       Rows("35").EntireRow.Hidden = True
   Else
       Rows("35").EntireRow.Hidden = False
   End If
End Sub
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
[-] Folgende(r) 1 Nutzer sagt Danke an Klaus-Dieter für diesen Beitrag:
  • Blacklady
Antworten Top
#5
Hallo Klaus, Wink
Private Sub Worksheet_Change(ByVal Target As Range)
 Rows(35).Hidden = Range("E35").Value = Range("E34").Value
End Sub
Gruß Uwe
Antworten Top
#6
Hallo Uwe,

OK, Ok, hast gewonnen. Wink
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste