Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Alle Formularsteuerlelemente ausblenden

Forumthread: Alle Formularsteuerlelemente ausblenden

Alle Formularsteuerlelemente ausblenden
29.03.2021 16:30:44
Maxe
Halllo zusammen.
ich habe ein Excelsheet mit ganz vielen Formularsteuerelementen.
Nachdem in dem Excelsheet die entsprechenden EIngaben gemacht worden sind, wird es per Klick auf einen Button automatisch gedruckt und mit einen bestimmten Namen im Netzwerk gespeichert.
ich möchte nun vor dem Speichern alle Formularsteuerlelemente (vor allem die Schaltflächen) ausblenden, damit es auf dem gespeicherten Excelsheet nicht mehr sichtbar ist.
Nun möchte ich nicht jedes einzelne Steuerelement einzeln ansteuern.
Folgendes funktioniert nicht:
ActiveSheet.Shapes().Visible = False
Wo liegt der Fehler?
Grüße
Maxe

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Formularsteuerlelemente ausblenden
29.03.2021 16:42:44
MRUTOR
Hallo Maxe,
das musst du mit einer Schleife (For Next) machen. Alle ausblenden:

Option Explicit
Sub ausblenden()
Dim sh As Worksheet
Dim shp As Shape
Set sh = ThisWorkbook.Sheets("Sheet1")    'Tabelle anpassen
For Each shp In sh.Shapes
shp.Visible = False
Next
End Sub
Gruss Tor

Anzeige
AW: Alle Formularsteuerlelemente ausblenden
30.03.2021 10:48:38
Maxe
Hallo Tor,
danke.
Es funktioniert.
Grüße
Maxe

gerne...
30.03.2021 11:16:52
MRUTOR
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18