Clever-Excel-Forum

Normale Version: ausgeblende Zeilen per Marko einzeln einblenden.
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

gibt es eine Möglichkeit wenn in einem Arbeitsblatt 100 Zeilen ausgeblendet werden, dass durch das drücken eines Buttons, mit Hilfe eines Makros, immer eine Zeile eingeblendet werden kann.

Habe dies schon mal gesehen, jedoch ist die Tabelle Passwort gesichert.

Hoffe dass jemand sowas kennt

Danke im voraus.

:19: :19: :19: :19:
Hallo Wavemaster,

das geht, wenn Du beim Blattschutz auch "Zeilen formatieren" auswählst.
(18.03.2015, 20:22)schauan schrieb: [ -> ]Hallo Wavemaster,

das geht, wenn Du beim Blattschutz auch "Zeilen formatieren" auswählst.

Hi schuan,

ich habe noch kein Makro für diesen Vorgang, wollte schon eines aufzeichnen finde aber keinen weg dass man eine Zeile auswählen kann.

Somit benötige Ich ein Makro......

wie muß Ich das mit "Zellen formatieren " verstehen.
Hallöchen,

wenn Du den Blattschutz setzt, hast Du verschiedene Optionen. Eine davon ist "Zeilen formatieren". Damit wird es ermöglicht, trotz Blattschutz die Zeilen u.a. auch ein- und auszublenden.

Der code für eine beliebige Zeile - hier mal die 7 - wäre
Code:
Sub test()
'Zeile 7 einblenden
ActiveSheet.Rows(7).EntireRow.Hidden = False
End Sub

Jetzt wäre die Frage, wie Du eine ausgeblendete Zeile angeben willst.
Man könnte z.B . eine Eingabebox programmieren, wo man eine Zahl eingeben muss, und die entsprechende Zeile wird dann eingeblendet.
Hallo zusammen,

habe in einem anderen Forum die Lösung gefunden.
die wie folgt aussieht:

PHP-Code:
Sub Button_add5_BeiKlick()
    
    
Application.ScreenUpdating False
    
    Dim rng 
As Range
    Dim intZeilen 
As Integer
    
    
For Each rng In Range("A17:A199")
        If 
intZeilen 5 Then Exit For
        If 
rng.EntireRow.Hidden True Then
            rng
.EntireRow.Hidden False
            intZeilen 
intZeilen 1
        End 
If
    
Next
    
    Application
.ScreenUpdating True
End Sub 


Danke an die die sich einen Kopf gemacht haben.

:21: :21: :21:
Hallöchen,

das Makro blendet Dir im Bereich A17 bis A199 die 5 ersten ausgeblendeten Zeilen ein, sofern so viele ausgeblendet sind, und nicht nur eine Sad

Zitat:dass durch das drücken eines Buttons, mit Hilfe eines Makros, immer eine Zeile eingeblendet werden kann

Aber wenn es so passt, dann ist alles gut und der Zähler lässt sich entsprechend den Anforderungen ja variieren :100: