Thema Datum  Von Nutzer Rating
Antwort
Rot Wenn in Tabelle 1 nicht erfüllt, dann ausblenden der Zeilen auf Tabelle 2
11.05.2023 11:28:55 Björn
NotSolved
11.05.2023 16:38:06 Gast7189
NotSolved
11.05.2023 20:11:14 Gast67240
NotSolved
15.05.2023 08:07:44 Gast48096
NotSolved
15.05.2023 08:52:39 Gast256
NotSolved
15.05.2023 09:17:44 Gast67510
NotSolved

Ansicht des Beitrags:
Von:
Björn
Datum:
11.05.2023 11:28:55
Views:
1005
Rating: Antwort:
  Ja
Thema:
Wenn in Tabelle 1 nicht erfüllt, dann ausblenden der Zeilen auf Tabelle 2

Hallo zusammen,

 

ich habe ein kleines Problem bei meinem Code. Hier kurz die Infos & was passieren soll.

Excel Version 2013

Tabellenblatt 1: "Bennenung"

Tabellenblatt 2 : Übersicht"

->Wenn in Tabelle 1, Zelle B11 "Ja" steht, werden in Tabelle 2, die Zeilen 83-85 angezeigt

->Wenn in Tabelle 2, Zelle B11 "Nein" steht, werdem in Tabelle 2, die Zelen 83-85 ausgeblendet.

 

In der Tabelle 1, Zelle B11 ist ein Dropdown hinterlegt mit "Bitte auswählen", "Ja", "Nein"

Mein Code lautet momentan so:

________________________

Sub Zeilenausblenden()

 


    If Range("B11") = "Nein" Then
      
        Sheets("Übersicht").Select
        Range("83:85").Select
        Selection.EntireRow.Hidden = True


    End If
    
 

End Sub

 


Sub Zeileneinblenden()

    If Range("B11") = "Ja" Then
        Sheets("Übersicht").Select
        Range("83:85").Select
        Selection.EntireRow.Hidden = False
    End If

    
End Sub

_____________

Wenn ich den Code Schritt für Schritt durchgehe, bekomm ich nach "Range(83:85").Select folgenden Fehler: "Laufzeitfehler "1004": Anwendnungs- oder objektdefinierter Fehler"

 

 

Ebenfalls hab ich ein Fehler, wenn ich "If Not Intersect(Target, Range("B11")) Is Nothing Then Exit Sub" vor den Code schreibe.

Bekomme dabei den Fehler: "Laufzeitfehler '424': Objekt erforderlich


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Wenn in Tabelle 1 nicht erfüllt, dann ausblenden der Zeilen auf Tabelle 2
11.05.2023 11:28:55 Björn
NotSolved
11.05.2023 16:38:06 Gast7189
NotSolved
11.05.2023 20:11:14 Gast67240
NotSolved
15.05.2023 08:07:44 Gast48096
NotSolved
15.05.2023 08:52:39 Gast256
NotSolved
15.05.2023 09:17:44 Gast67510
NotSolved