|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
17.10.2024 15:24:43 |
Natalie (planlos) |
|
|
|
17.10.2024 15:51:00 |
xlKing |
|
|
|
18.10.2024 07:42:25 |
Natalie (planlos) |
|
|
|
17.10.2024 21:00:28 |
Gast15933 |
|
|
 Toggle Button nach click ausblenden oder löschen |
18.10.2024 07:39:27 |
Natalie (planlos) |
|
|
|
18.10.2024 12:30:12 |
Gast38791 |
|
|
|
18.10.2024 12:48:10 |
Natalie |
|
|
Von:
Natalie (planlos) |
Datum:
18.10.2024 07:39:27 |
Views:
18 |
Rating:
|
Antwort:
|
Thema:
Toggle Button nach click ausblenden oder löschen |
|
Guten Morgen,
vielen Dank für Deine Antwort.
Muss ich diesen Code in das Modul des Toggle-Buttons einfügen, oder diesen in das Arbeitsblatt platzieren?
Ich habe von VBA wirklich nicht viel Ahnung und bastel mir hier alles irgendwie zurecht. :-)
Ausprobiert habe ich beide Varianten. Mein Modul sieht jetzt so aus und der Button um den es geht heißt "Rechteck: abgerundete Ecken 1".
Muss ich hier noch irgendwas ergänzen?
Option Explicit
Sub Toggle()
ActiveSheet.Shapes("Rechteck: abgerundete Ecken 2").Visible = Not ActiveSheet.Shapes("Rechteck: abgerundete Ecken 2").Visible
End Sub
Sub HideButton_Klicken()
Dim shp As Shape
On Error GoTo Exit_
Set shp = ActiveSheet.Shapes(Application.Caller)
Debug.Print "Shape """; shp.Name; """ clicked!"
shp.Visible = msoFalse
Exit_:
End Sub
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
17.10.2024 15:24:43 |
Natalie (planlos) |
|
|
|
17.10.2024 15:51:00 |
xlKing |
|
|
|
18.10.2024 07:42:25 |
Natalie (planlos) |
|
|
|
17.10.2024 21:00:28 |
Gast15933 |
|
|
Toggle Button nach click ausblenden oder löschen |
18.10.2024 07:39:27 |
Natalie (planlos) |
|
|
|
18.10.2024 12:30:12 |
Gast38791 |
|
|
|
18.10.2024 12:48:10 |
Natalie |
|
|