OnAction bei vielen Shapes ... ich meine sehr viele Shapes?
Hi.
Gibt es einen einfachen weg, um das OnAction-Event von Shapes gezielt abzufangen? Habe hier auf einem Tabellenblatt geschätzte 1000 Shapes, bei denen ich für jedes einzelne je nachdem was für Farbe es hat, eine bestimmte action ausführen will. Momentan habe ich es so gelöst, das ich ein Modul habe: Sub A_1(): A A_1: End Sub Sub A_2(): A A_2: End Sub Sub A_3(): A A_3: End Sub Sub A_4(): A A_4: End Sub .... Sub A_1000(): A A_1000: End Sub Jedem Shape habe ich dann ein eigenes OnAction zugewiesen: z.B. .OnAction = "A_1" Sub A (Kasten as Shape) 'HIer dann die Action End Sub Hab ich was übersehen, so das es auch einfacher geht? Michi |
OnAction bei vielen Shapes ... ich meine sehr viele Shapes?
Sorry, wrong newsgroup .....
Michi |
All times are GMT +1. The time now is 04:51 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com