Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Shape Hide/Visible nach Farbe oder Form
#1
Hallo zusammen!

Ich habe zu meiner Frage leider keine passende Antwort gefunden und hoffe, Ihr könnt mir hierbei weiterhelfen:

Ich habe in meinem Datenblatt (Excel 2016) drei verschiedene Arten von Standardformen eingefügt: Kreise, Rechtecke und Dreiecke. Ich möchte jetzt über drei einzufügende Buttons auf Knopfdruck jeweils eine Formkategorie ausblenden und bei nochmaligem Drücken wieder einblenden.

Über folgende Makros habe ich es soweit geschafft, alle Formen aus- und wieder einzublenden. Wie mache ich das nur für bestimmte Formen und wie vereine ich das am besten in einem Makro? Mir fehlt wahrscheinlich nur eine Zeile aber hier laufe ich gegen eine Wand. Undecided

Sub HideEachShape()
Dim sObject As Shape
For Each sObject In ActiveSheet.Shapes
sObject.Visible = False
Next
End Sub

Sub ShowEachShape()
Dim sObject As Shape
For Each sObject In ActiveSheet.Shapes
sObject.Visible = True
Next
End Sub

Es dankt, grüßt und wünscht Euch frohe Weihnachten,
Glorifier Xmas11
Antworten Top
#2
Hallo, :19:

da gibt es verschiedene Möglichkeiten - hier mal Zwei: :21:

.xlsb   Shapes_Einblenden_Ausblenden_Nach_Typ.xlsb (Größe: 22,35 KB / Downloads: 8)
________
Servus
Case
[-] Folgende(r) 1 Nutzer sagt Danke an Case für diesen Beitrag:
  • Glorifier
Antworten Top
#3
Hallo, :19:

hier auch noch eins mit "Type" bzw. "AutoShapeType": :21:

.xlsb   Shapes_Einblenden_Ausblenden_Nach_Typ_1.xlsb (Größe: 24,93 KB / Downloads: 8)
________
Servus
Case
[-] Folgende(r) 1 Nutzer sagt Danke an Case für diesen Beitrag:
  • Glorifier
Antworten Top
#4
HI Case,

die zweite Vorlage war genau das, was ich gebraucht habe. Vielen Dank noch einmal! :28:

Interessehalber: Wie sähe der Code denn aus, wenn ich statt Formen nach Farben (aus)blenden wollen lassen würde? Nehmen wir also statt Dreieck, Oval und Rechteck mal Rot, Grün und Blau. Gibt es dafür zufällig auch Vorlage?

Danke und Gruß
Glorifier
Antworten Top
#5
Hallo, :19:

mal ein paar Beispiele: :21:

.xlsb   Shapes_Einblenden_Ausblenden_Nach_Farbe.xlsb (Größe: 21,38 KB / Downloads: 3)
________
Servus
Case
[-] Folgende(r) 1 Nutzer sagt Danke an Case für diesen Beitrag:
  • Glorifier
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste