Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 23:30:16
Anzahl Jahre Zählen aus Datumreihe
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Buttons ein- und ausblenden

Buttons ein- und ausblenden
23.05.2017 09:32:38
Lisa
Hallo zusammen,
ich möchte in meiner Anwendung gerne einige Buttons ein- und ausblenden.
Beispielsweise gibt es die Buttons Schreibschutz aktivieren & Schreibschutz deaktivieren. Wenn der Schreibschutz aktiviert ist, soll nur noch der Button für Schreibschutz deaktivieren angezeigt werden (oder es kann sich gerne auch die Beschriftung des Buttons ändern).
Ein ähnliches Beispiel habe ich hier gefunden:
https://www.herber.de/forum/archiv/884to888/884839_Formular_Steuerelemente_einu_ausblenden.html
Problem ist, dass ich keine Active-X Steuerelemente einbinden kann, sondern nur die Formularsteuerelemente. Ich habe bisher keine Möglichkeit gefunden, diese über VBA zu steuern.
Ein weiteres Problem ist, dass ich den Toggle-Button in diesen Formularsteuerelementen gar nicht gefunden habe.
Könnt ihr mir weiterhelfen?
Vielen Dank und liebe Grüße
Lisa

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Buttons ein- und ausblenden
23.05.2017 09:45:38
Rainer
Hallo Lisa,
probiere mal:

Sub test()
Shapes("Schaltfläche 1").Visible = Not Shapes("Schaltfläche 1").Visible
End Sub
Mit dem Toggle-Button hast du vermutlich Pech, den gibt es (meines bescheidenen Wissens) nur mit ActiveX. Aber mit einer Checkbox(Kontrollkästchen) hat man doch eine vergleichbare Funktionalität?
Gruß,
Rainer
AW: Buttons ein- und ausblenden
23.05.2017 09:53:11
Lisa
Hallo Rainer,
dein Code funktioniert leider nicht, der Debugger hält bei "Shapes" an.
With Worksheets("Übersicht")
'.DrawingObjects("Vorschriften ausblenden").Visible = False
'.Shapes("Vorschriften ausblenden").DrawingObject.Visible = False
End With
..klappt übrigens auch nicht.
Anzeige
AW: Buttons ein- und ausblenden
23.05.2017 10:17:51
Rainer
Hallo Lisa,
Hast du den Code in einem Modul probiert?
Dort musst du das Worksheet definieren. Wenn es im Code der Tabelle steht, dann nicht. 

Sub test()
With Worksheets("Tabelle1")
.Shapes("Schaltfläche 1").Visible = Not .Shapes("Schaltfläche 1").Visible
End With
End Sub
Außerdem musst du beachten, dass der BOOLEAN Wert für Shapes.Visible 

msoTrue
oder 


msoFalse
ist. Also so:

.Shapes("Vorschriften ausblenden").Visible = msoFalse
Gruß,
Rainer
Anzeige
AW: Buttons ein- und ausblenden
23.05.2017 09:56:12
Daniel
Hi
die Formular-Buttons sind auch nur einfache Grafikelemente (Shapes).
Im Prinzip kannst du jedes Grafikelement als Button verwenden, indem du ihm ein Makro zuweist.
zum Ändern des Textes gibt es zwei wege:
per Makro: (Buttonname entsprechend eintragen): 
ActiveSheet.Shapes("Button 1").TextFrame.Characters.Text = "xxx"
alternativ kannst du auch den Button mit einer Zelle verknüpfen, indem du den Button markierst und in die Bearbeitungszeile den Zellbezug auf eine Zelle einträgst.
Dann wird der Inhalt dieser Zelle als Buttontext angezeigt.
Jetzt kannst du diese Zelle ändern oder dort eine entsprechende Formel hinterlegen.
Gruß Daniel
Anzeige
AW: Buttons ein- und ausblenden
23.05.2017 10:07:56
Lisa
Hallo Daniel,
dein Vorschlag funktioniert leider auch nicht, es wird ein Laufzeitfehler angezeigt.
Der Zellbezug ist ein guter Hinweis, wenn es per VBA gar nicht funktioniert werde ich darauf zurück kommen. Erst mal werde ich aber weiterhin versuchen die Buttons über VBA zu steuern, das wäre mir lieber...
Grüße
Lisa
AW: Blattschutz
23.05.2017 10:19:24
Daniel
Hi
bei mir funktioniert es.
wenn du einen Laufzeitfehler bekommst, hast du was falsch gemacht.
was du falsch gemacht hast, kann ich dir nicht sagen, weil ich nicht weiß, was du gemacht hast und welche Fehlermeldung du bekommen hast.
Wenn du den Blattschutz aktiviert hast, solltest du bedenken, dass deine Objekte auch geschützt sind.
Du musst dann entweder im Code den Schutz aufheben (und hinterher wieder setzen) oder beim Aktivieren des Blattschutzes das Häkchen bei "Objekte bearbeiten" setzen.
Wenn beides nicht geht, eben über die Zellverknüpfung.
Für die Zelle kannst du ja das Häkchen bei "Gesperrt" rausnehmen und dann den Zellwert trotz Blattschutz ändern.
Die Zelle kann ja ausgeblendet sein oder sich auf einem anderen Blatt befinden.
Gruß Daniel
Anzeige

188 Forumthreads zu ähnlichen Themen

Register ein- und ausblenden
HaKa

Hallo Forum
Wie lautete der VBA-Code um z.B. das Register "Tabelle3" aus-, resp. wieder einzublenden?
Gruss Heinz
14.09.2008 15:40:00
Thread-ID: 1009597
5 Beiträge
Anzeige
VBA, Notiz ein- und wieder ausblenden
Burghard

Hallo ins Netz,
ich möchte mit Knopfdruck ein Textfeld (mit Inhalt, es existiert schon) oder ein Autoformat (z.B. Gefaltete Ecke) auf dem Blatt an einer bestimmten Stelle für 1 Minute plazieren und danach soll es wieder verschwinden. Also kopieren und dann automatisch die Kopie wieder lösc...
01.12.2008 09:08:18
Thread-ID: 1029158
2 Beiträge
Commandbutton ein und ausblenden
SoulOpa

Hallo und einen schönen Abend,
ich habe eine Frage! und zwar habe ich ein Commandbutton in der Userform erstellt so das der Commandbutton beim Tabellenblatt beim scrollen immer sichtbar ist. Nun würde ich gerne wenn ich die Mappe zwischendurch verlass das der Button verschwindet und wenn ic...
23.01.2009 17:50:27
Thread-ID: 1043094
5 Beiträge
Anzeige
Zeilen Ein und Ausblenden
TinoB

Hallo Excelgemeinde,
ich stehe gerade auf dem Schlauch und hoffe Ihr könnt mir helfen. Ich habe im Forum schon danach gesucht, nur leider komme ich nicht weiter. Ich möchte wenn in der Zelle B2 eine 1, 2 oder 3 steht die Zeile 18 ausblenden. Ansonsten soll diese eingeblendet werden oder zum...
23.03.2009 16:43:10
Thread-ID: 1062965
4 Beiträge
Gitternetzlinien per Icon ein- und ausblenden
Vega

Hi,
ich habe mir Excel an meinem neuen Arbeitsplatz gerade wieder neu eingerichtet und auch alles soweit wieder hinbekommen. Nur ein Icon in der Menüleiste fehlt mir noch, mit dem ich die Gitternetzlinien ein- und ausblenden kann.
Ich hatte dies ein meiner alten Excel Umgebung in der Sy...
30.03.2009 15:30:18
Thread-ID: 1065324
5 Beiträge
Spalten mit Makro nach Vorgabe ein und ausblenden
Christoph

Hallo,
will mit Hilfe eines Makros eine bestimmte Anzahl an Spalten ein- bzw. ausgeblendet haben. Habe selbiges mal für Zeilen selbst programmiert:
Sub Zeilenausblenden() Rows("9:209").Hidden = True Rows("9:" & (9 + Range("A4").Value)).Hidden = False End Sub
Für Spalten klapp...
09.04.2009 14:44:26
Thread-ID: 1068032
3 Beiträge
Makro - Zeilen ein- und ausblenden
WalterK

Hallo,
den Code habe ich vor längerer Zeit in einem Forum gefunden und die Bezeichnung "Ein" und "Aus" auf "Privat+Intern Ein" und "Privat+Intern Aus" abgeändert. Noch ist es so, dass über den CommandButton die Zeilen mit den Nichtleeren Zellen in Spalte H aus- oder eingeblendet werden.
...
05.07.2009 11:07:55
Thread-ID: 1086451
6 Beiträge
Zeile ein und wieder ausblenden abhängig vom Wert
bustue

Hallo Leute ,
gibt es ein Makro das selbständig eine Zeile ausblendet wenn das Wort Bereich erschein, und wenn ein anderer Wert erscheint die Zeile wieder einblendet. Die Werte erechen sich durch Formeln.
MfG
Burghard
14.08.2009 17:12:17
Thread-ID: 1096047
7 Beiträge
Anzeige

Links zu Excel-Dialogen

CheckBox Frame

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
3
1
4
5
3
4
2
5
6
2
3
21
5
7
1
5
2
1
4
4
3
1
5
12