Hallo Zusammen ,
gibt es einen VBA Code der ein Tab nach dem Verlassen automatisch das Tab schließt und man das Tab nur mit einem Hyperlink oder VBA Code wieder öffnen kann ?
Vielen Dank für eure Hilfe
Gruß
Andreas
Hi Andreas,
ich blende ein Tabellenblatt per Doppelklick in eine Zelle ein und aus.
Code:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(0, 0) = "A2" Then
Application.ScreenUpdating = False
If Sheets("Admin").Visible = xlVeryHidden Then
If InputBox("Bitte Kennwort eingeben") = "xxx" Then Sheets("Admin").Visible = True
Else: Sheets("Admin").Visible = xlVeryHidden
End If
Application.ScreenUpdating = True
Cancel = True
End If
End Sub
Beim ersten Doppelklick bekomme ich eine Kennwortabfrage; bei korrekter Eingabe wird dann das Blatt eingeblendet. Ein erneuter DK blendet das Blatt wieder aus. Den Teil mit dem Passwort kannst du ja weglassen, wenn du es nicht benötigst (ist eh nur Spielerei, denn 100%igen Schutz gibt's in XL nicht!!)
Hi
hier mal ein paar Beispiele für Inhaltsverzeichnis erstellen und aktuell halten. Ein und -Ausblenden einzeln und alle.
[
attachment=19742]
Gruß Elex
Super vielen vielen Dank euch beiden Ihr habt mir damit sehr geholfen :)
Hi Willwissen
kannst du mir vielleicht noch erklären wie ich deinen Code richtig in die Excel Mappe einfüge, bekomme es irgendwie nicht hin :)
Danke für deine Hilfe
Hallo Andreas,
mit Alt-F11 kommst du in den VBA-Editor. Im linken Feld (Projektexplorer) findest du deine Datei. Dort Doppelklick auf das relevante Tabellenblatt und den kopierten Code in das rechte große Fenster einfügen. In diesem Teil des Codes
Zitat:If Target.Address(0, 0) = "A2" Then
ist die Zelle festgelegt. Wenn du eine andere benötigst, musst du den fett markierten Teil ändern. Das ist alles. Beim DK in die Zelle kannst du entsprechend ein- und ausblenden.
Okay jetzt hat es funktioniert Danke :)