Supportnet / Forum / Tabellenkalkulation

Hallo liebe Leute, brauche nochmal eure VBA-Hilfe, weil ich es immer noch nicht geschafft habe, mich damit zu beschäftigen. Mein Problem/Wunsch: In Abhängigkeit von bestimmten Kriterien wird die Spalte Z mit dem Wert 99 gefüllt. Wenn in der entsprechenden Zelle dieser Spalte der Wert 99 enthalten ist, soll diese Zeile ausgeblendet werden. Es handelt sich dabei um die Zeilen 5-600! Ich möchte dies einem Button zuordnen. Ab und zu brauche ich in der Ansicht auch noch mal alle Zeilen, also zweiter Button. Es wäre schön, wenn mir jemand einen/zwei entprechende VBA-Codes mitteilen könnte. Den 2. könnte ich sicherlich auch über den Makro-Reocorder produzieren. Den 1. schaffe ich aber nicht und bitte deshalb um eure Hilfe! Besten Dank! gruss pelle

Nabend pelle,

mensch lange nichts mehr von Dir gelesen.

Nun zu Deiner Frage, positioniere 2 Buttons aus der Symbolleiste "Steuerelement-Toolbox" in dem Tabellenblatt, in dem die Zeilen ausgeblendet werden sollen und kopiere nachfolgenden VBA Code in das VBA Projekt dieses Tabellenblattes.

Option Explicit

Private Sub CommandButton1_Click()
Dim Wiederholungen As Integer
For Wiederholungen = 5 To 600
If Cells(Wiederholungen, 26) = 99 Then
Rows(Wiederholungen).EntireRow.Hidden = xlVeryHidden
End If
Next
End Sub

Private Sub CommandButton2_Click()
Cells.EntireRow.Hidden = False
End Sub

Das war´s. Bei klick auf den CommandButton1 werden die Zeilen, in denen in Spalte Z eine 99 steht ausgeblendet und mit den zweiten Button werden allen Zeilen wieder sichtbar.


MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

PS. Na da haste wohl etwas viel auf Deinem Rechner gelöscht. Macht nichts, meine Mailadresse schicke ich Dir nachher, denn ich habe Mitleid mit "alten Menschen". ;-)

Hallo Coros,

zunächst mal vielen Dank für deine Hilfestellung!

Ich werde es testen! :-)
Aber ich habe bei deinen Sachen kein Problem, ob es "klappen" wird!

Wenn es nicht "klappt" liegt es an meiner Fragestellung!!!!

Notfalls werde ich "nachhaken"!

Klink mich jetzt aber erst mal aus!
Sohnemann feiert heute seinen Geburtstag und kommt gleich zurück vom Eislaufen mit seinen "Kumpanen"!

Schön, dass du Verständnis für alte Leute hast,
hättest es aber ein wenig freudlicher formulieren können! :-)
Aber du hast ja Recht, die Wahrheit ist manchmal hart! :-)

gruss
pelle

Hallo,

es geht auch ohne VBA, mit "Filter" "Entspricht nicht" 99 , dann werden alle 99 werte ausgeblendet.

Gruß

Helmut

Hallo Helmut,

die Idee ist auch nicht verkehrt!!!

Ich werde es mal testen!

Das Problem, das sich dahinter verbirgt, sind die Wochenende und das "Problem" mal 4/5 Wochen / pro Monat auszublenden:

Hilft bei der Darstellung der Diagramme!

Vielen Dank für den Hinweis!!!

Ich muss jetzt leider erstmal Schluss machen, sonst bekomme ich Ärger mit Sohnemann!

ich melde mich aber wieder!

gruss
pelle

• Excel Blattschutz und Makros
• eingebettetes diagramm bearbeiten per VBA
• Excel VBA: Passwort und Blatt einblenden
• Zeilen ausblenden
• Zeilen einfügen