Frage stellen

Hallo Rainer, wie lautet der Befehl um nur ein Register aus bzw einzublenden?

3.3k Aufrufe
Gefragt in Tabellenkalkulation von
Hallo Rainer, wie lautet der Befehl um nur ein Register aus bzw. einzublenden?
Bei dem Befehl:
Sub Schaltfläche1_BeiKlick()
ActiveWindow.DisplayWorkbookTabs = Not (ActiveWindow.DisplayWorkbookTabs)
End Sub

werden alle Reiter unten ausgeblendet. ich möchte aber, einzelne durch mehrere
Schaltflächen ein ausblenden können.

Danke im voraus.

17 Antworten

0 Punkte
Beantwortet von
0 Punkte
Beantwortet von rainberg Profi (14.9k Punkte)
Hallo,

im Makro heißt Dein Arbeitsblatt Checkliste_AA, in der Arbeitsmappe hast Du es aber mit Checkliste AA benannt.

Da muss es natürlich eine Fehlermeldung geben.
Wenn ich nicht irre, hat Dich @ M.O. bereits auf identische Schreibweisen hingewiesen.

Bitte lies in Zukunft die Antworten richtig und handle danach :-)

Gruß
Rainer
0 Punkte
Beantwortet von m-o Profi (22.9k Punkte)
Hallo,

im Namen des Tabellenblatts ist kein Unterstrich vorhanden.
Daher funktioniert es so:
Sub ausblenden()
Worksheets("Checkliste AA").Visible = False
End Sub

Sub einblenden()
Worksheets("Checkliste AA").Visible = True
End Sub

Gruß

M.O.
0 Punkte
Beantwortet von
Vielen Dank, für eure Hilfe und euer Verständnis für meine nicht
vorhandenen Kenntnisse.. bin am strahlen :-)

Danke.

ich werde eure Hilfe bestimmt wieder benötigen..

Gruß

Cheet
0 Punkte
Beantwortet von
Jetzt hab ich noch ein kleines Problem,

welches da wäre,
ich habe ja dieses Makro einem Kontrollkästchen zugewiesen, nun
sollte der Reiter beim Haken setzten auftauchen oder beim Haken
entfernen verschwinden.

Ich muss aber jedes mal auf das Kontrollkästchen per rechtem
Mausklick und dann auf Befehl einblenden bzw. ausblenden.

Was muss ich tun, damit das automatisch durch das setzen des
Hakens passiert?

Danke vielmals.
0 Punkte
Beantwortet von m-o Profi (22.9k Punkte)
Hallo,

du hast ein Kontrollkästchen aus den Formularsteuerelemente genommen.
Um hier ein Makro so auszuführen, wie du willst, musst du über die rechte Maustaste - Steuerelement formatieren - Steuerung eine Zelle als Zielverknüpfung angeben (die du dann ausblenden kannst).
Das Makro, das du dann dem Kontrollkästchen zuweist würde dann so aussehen:

Sub Register()

If ActiveSheet.Range("M4") = True Then
Worksheets("Checkliste AA").Visible = False
Else
Worksheets("Checkliste AA").Visible = True
End If

End Sub


Die andere Möglichkeit ist, du fügst ein Kontrollkästchen aus den ActiveX-Steuerlementen ein. Nach einem Doppelklick auf das Kästchen öffnet sich der VBA-Editor, wo du dann dem Kästchen ein Makro zuweisen kannst. Das würde z.B. so aussehen.

Private Sub CheckBox1_Click()

If ActiveSheet.CheckBox1.Value = True Then
Worksheets("Checkliste AA").Visible = False
Else
Worksheets("Checkliste AA").Visible = True
End If

End Sub


Hier musst du noch den Entwurfsmodus ausschalten, damit das Kästchen dann funktioniert.
Eine Beispieldatei mit ein paar Erläuterungen habe ich dir hier hochgeladen.

Gruß

M.O.
0 Punkte
Beantwortet von
Ihr seid der Hammer echt.

Danke, Danke und weiter so. ;-)
Seite:
...