Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
27.01.2020 14:10:25 |
Sors |
|
|
|
27.01.2020 14:20:03 |
Werner |
|
|
|
27.01.2020 14:40:09 |
Gast62130 |
|
|
|
27.01.2020 14:45:09 |
Sors |
|
|
|
27.01.2020 15:13:10 |
Werner |
|
|
Alle Zeilen mit bestimmten Triggerwort ausblenden wenn zwei Bedingungen erfüllt sind |
27.01.2020 15:38:28 |
Sors |
|
|
|
27.01.2020 16:09:18 |
Sors |
|
|
Von:
Sors |
Datum:
27.01.2020 15:38:28 |
Views:
653 |
Rating:
|
Antwort:
|
Thema:
Alle Zeilen mit bestimmten Triggerwort ausblenden wenn zwei Bedingungen erfüllt sind |
Hallo Werner,
Dieser Code ermöglicht mir alle zeilen Auszubelnden, wenn Lappen im aktuellen Worksheet vorhanden ist.
Sub ZeilenAusblenden()
Application.ScreenUpdating = False
For i = 1 To 100
If Cells(i, 1).Value = "Lappen" Then
Rows(i).Hidden = True
End If
Next i
Application.ScreenUpdating = True
Range("A1").Select
'
End Sub
Mein Ziel ist es die Vergleichsvariabel durch die im Funktionsverzeichnis hinterlegten Begriffe auszutauschen, wenn ein "x" gesetzt wurde.
Das ich quase alle anderen Funktionen anzeigen lassen kann aber die mit x gekennzeichneten Funktionen ausblenden lasse.
Ich bin in VBA leider sehr frisch und kenne die Synatx noch nicht ganz. Danke für deinen Support!
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
|
27.01.2020 14:10:25 |
Sors |
|
|
|
27.01.2020 14:20:03 |
Werner |
|
|
|
27.01.2020 14:40:09 |
Gast62130 |
|
|
|
27.01.2020 14:45:09 |
Sors |
|
|
|
27.01.2020 15:13:10 |
Werner |
|
|
Alle Zeilen mit bestimmten Triggerwort ausblenden wenn zwei Bedingungen erfüllt sind |
27.01.2020 15:38:28 |
Sors |
|
|
|
27.01.2020 16:09:18 |
Sors |
|
|