HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
ein- und ausblenden mit Passwort
14.02.2005 13:17:45
Kerstin
Hallo an Alle,
ich komme leider noch immer nicht weiter. Hoffentlich kann mir jemand helfen.
Folgenden Code habe ich bekommen, um diverse Spalten einer Tabelle ein- und auszublenden und das nur mit Passwort. Noch fehlt mir aber der Bezug auf die Spalten, die er ein- und ausblenden soll.
Wer kann mal wieder helfen. Danke schon mal.
Gruß
Kerstin

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
Kerstin 14.02.2005 11:35:05
siehe
AW: ein- und ausblenden mit Passwort
14.02.2005 13:23:00
Kerstin
Hallo noch einmal,
man sollte den Code auch angeben :)
Hier ist er:

Private Sub CommandButton1_Click()
If TextBox1.Text = "Dein Passwort" Then
Unload Me
Else
Label1.Visible = True
TextBox1.Set Focus
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1.Test)
End If
End Sub


Private Sub UserForm_Initialize()
Dim frm As UserForm
Set frm = Password
frm.TextBox1.PasswordChar = "*"
frm.TextBox1.SetFocus
frm.Label1.Visible = False
End Sub

AW: ein- und ausblenden mit Passwort
14.02.2005 13:59:26
Xelleron
Hallo Kerstin,
nach dem Unload Me folgendes fürs Ausblenden:
Rows("2:2").Select
Selection.EntireRow.Hidden = True
Das bewirkt Zeile 2 ausgeblendet wird, wenn Du sie wieder einblenden willst, einfach den Wert auf False setzen
Gruß Dennis
AW: ein- und ausblenden mit Passwort
Kerstin
Hallo Dennis,
vielen Dank noch einmal für die Hilfe. Was muß ich den einsetzen für die Spalte?
Grüße
Kerstin
AW: ein- und ausblenden mit Passwort
14.02.2005 14:22:07
Xelleron
Ach ja, Du wolltest ja Spalten aus/einblenden:
dann "EntireColumn"
Gruß
Dennis
AW: ein- und ausblenden mit Passwort
14.02.2005 14:04:30
Ralf
Hallo Kerstin,
habe dir mal ein Beispiel gebastelt:
https://www.herber.de/bbs/user/18041.xls
Kennwort ist "test" ohne Anführungszeichen. In meinem Beispiel werden die Saplten C und D ausgeblendet bzw. wieder eingeblendet. Musst es dir halt anpassen.
Gruß
Ralf
AW: ein- und ausblenden mit Passwort
Kerstin
Hallo Ralf,
super, dass ist die Lösung.
Vielen Dank.
Grüße auch BW
Kerstin

Links zu Excel-Dialogen

301 Forumthreads zu ähnlichen Themen

Meistgelesene Forumthreads (12 Monate)