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 bzw. Spalte ausblenden wenn Zelleninhalt = "Text" (VBA)
#1
Hallo zusammen,

ich habe schon mal folgenden VBA Code erhalten mit dem eine Zeile ausgeblendet wird wenn in der ersten Zelle "Inaktiv" steht.


.pdf   Dokument1.pdf (Größe: 96,58 KB / Downloads: 11)


Könnt ihr Experten mir das umschreiben, sodass statt einer Zeile eine Spalte XY ausgeblendet wird wenn ich in die oberste Zelle der Spalte XY "Inaktiv" reinschreibe?

Jetzt schon mal vielen Dank!


Gruß
Tobias
Antworten Top
#2
Hola,

ein Bild in einem PDF Dokument bei einem Excel Problem. Respekt.

Gruß,
steve1da
Antworten Top
#3
Der Vollständigkeit halber noch die Quelle aus der ich den Code für "Zeile ausblenden" habe.

http://www.office-loesung.de/ftopic14906_0_0_asc.php


Gruß
Tobias
Antworten Top
#4
Tja,

Screenshot ging nicht (Text zu lang).
Und Datei Anhängen mit dem ganzen Inhalt/Daten wollte ich nicht.


Gruß
Tobias
Antworten Top
#5
Moin.
Zur Aufgabe selbst kann ich Dir leider nicht helfen, da ich kein VBA beherrsche.

Zur Bereitstellung von Infos:

Es gibt ein sehr schönes AddIn, welches es erlaubt, in Excel markierte Zellen in HTML umzuwandeln, welches dann direkt hier in einen Beitrag eingefügt werden kann.

Sogar mit der Option statt des ausgebenen Wertes die dahinterliegende Formel zu zeigen.

https://www.clever-excel-forum.de/thread-12928.html

Ansonsten ist es für das Posten einer Problemstellung meistens nützlich ein "minimales Testcase" zu bauen und dieses zu posten.

Da müssen dann natürlich auch keine echten Daten drinstehen. Dummys reichen.

Viel Erfolg beim Lösen der Aufgabe.

Noch eine Idee:
Würde es vielleicht Deine Aufgabe auch lösen - es geht ja wohl darum Überblick zu erhalten und spezifische Zeilen auszublenden - wenn Du mit Hilfe eines Filters nur die Zeilen einblenden lässt, die das Merkmal "..." nicht enthalten?

Also statt des Lösungsansatzes "Ausschließen" den Ansatz "Einschließen"?

Siehe Anhänge.


.xlsx   ce-filter.xlsx (Größe: 9,46 KB / Downloads: 1)    
VG Andreas

--
Genutzte Version: MS Office 365 für Mac

Antworten Top
#6
Hallo Tobias,

Makros kannst du einfach kopieren und hier in Codetags wieder einfügen. Die Helfer können sich den Code dann hier herauskopieren und bearbeiten. Aus einem Bild oder einer PDF heraus ist das nicht möglich.

Den Schalter für die Codetags findest du in der zweiten Iconleiste (5. Icon von rechts).
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#7
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lRow As Long
Dim i As Long
lRow = IIf(Range("A65536") <> "", 65536, Range("A65536").End(xlUp).Row)
For i = lRow To 1 Step -1
If Range("A" & i) = "Inaktiv" Then Range("A" & i).EntireRow.Hidden = True
Next i
End Sub

Hoffe das ist so richtig.

Wollte ein Beispiel-Excelblatt mit dem Code einfügen aber hab festgestellt, dass ich nicht mal ein "Worksheet" einfügen kann. :22:


Gruß
Tobias
Antworten Top
#8
Hi

als Ansatz zu selbst weiter Gestalltung. Wenn du in eine Zelle "Inaktiv" schreibst, wird die Spalte ausgeblendet.

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "Inaktiv" Then Target.EntireColumn.Hidden = True
End Sub

Gruß Elex
Antworten Top


Gehe zu:


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