Datum

Titel

26.04.2024 17:18:47

Große Datenmenge in komplexes Diagramm verpacken

26.04.2024 16:22:47

Aktualisierung Verknüpfung bei geschlossener Quelldatei

26.04.2024 16:05:28

PivotChart-Stapeldiagramm erstellen

26.04.2024 15:34:42

Überlagernde Textbox-Ansicht

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

608to612

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Schutz von ausgeblendeten Zeilen

Forumthread: Schutz von ausgeblendeten Zeilen
6 Beiträge zu diesem Forumthread
Anzeige
300 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Excel Dialoge
Top 100 Forumthreads

06.05.2005 12:43:25

ausgeblendeten

Hallo Excel - Freunde,
ich habe einige Zeilen ausgeblendet und möchte,
das diese nur mit Passwort wieder eingeblendet werden
können.
Hat jemand eine Idee ?
Bin für jeden Tipp dankbar :-)
Gruß
Ralf

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 12:49:59

ausgeblendeten
AW: Schutz von ausgeblendeten Zeilen

06.05.2005 13:38:55

ausgeblendeten
AW: Schutz von ausgeblendeten Zeilen

06.05.2005 13:46:09

ausgeblendeten
AW: Schutz von ausgeblendeten Zeilen

06.05.2005 14:00:10

ausgeblendeten
AW: Schutz von ausgeblendeten Zeilen

06.05.2005 14:14:48

ausgeblendeten
AW: Schutz von ausgeblendeten Zeilen

06.05.2005 15:44:28

ausgeblendeten

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 12:49:59

ausgeblendeten

Servus,
z.B. so, Alt F11, Einfügen Modul, Code in das Modul einfügen.
MfG
Peter


Sub bla()
pw = InputBox("Passwort:", "Passwort Eingabe")
If pw = 1234 Then
Rows(1).Hidden = False
Else
Rows(1).Hidden = True
End If
End Sub

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 13:38:55

ausgeblendeten

Hallo Peter,
zuerstmal vielen Dank für Deine schnelle Antwort !!!Ich habe es gerade mal probiert. Er sagt aber
immer Laufzeitfehler 13 Typen unverträglich ?
Und dann wollte er noch pw definiert haben , ich
habe dann folgendes genommen: Dim pw As Double
( weiß aber nicht ob das ok war ?)
Kannst Du mir auch noch kurz die Bedeutung von 1234
erklären ?
Gruß
Ralf

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 13:46:09

ausgeblendeten

Hallo Ralf,
1234 hat die gleiche Bedeutung wie geheim.


Sub bla()
Dim pw As String
pw = InputBox("Passwort:", "Passwort Eingabe")
If pw = "Geheim" Then
Rows(1).Hidden = False
Else
Rows(1).Hidden = True
End If
End Sub

bzw


Sub bla()
Dim pw As String
pw = InputBox("Passwort:", "Passwort Eingabe")
Rows(1).Hidden = IIf(pw = "Geheim", False, True)
End Sub

Gruß
Reinhard

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 14:00:10

ausgeblendeten

Hallo Reinhard,
Vielen Dank für Deinen Tipp :-)
Es läuft auch jetzt ohne Fehlermeldung, nur
wenn ich jetzt die Zeilen ausgeblendet habe und
das Makro gelaufen ist, kann ich ohne weiteres
alle Zeilen wieder einblenden ?
Gruß
Ralf

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 14:14:48

ausgeblendeten

Hallo Ralf,
Schütze die Tabelle mit Passwort.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.

AW: Schutz von ausgeblendeten Zeilen

06.05.2005 15:44:28

ausgeblendeten

Hallo Hajo,
DANKE :-)
Gruß
Ralf