Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1820to1824
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle Formularsteuerlelemente ausblenden

Alle Formularsteuerlelemente ausblenden
29.03.2021 14: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

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

Betreff
Datum
Anwender
Anzeige
AW: Alle Formularsteuerlelemente ausblenden
29.03.2021 14: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

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

gerne...
30.03.2021 09:16:52
MRUTOR
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige