17.11.2019, 12:14
Wenn man die Namen der Optionsfelder die Namen "O_Biene" und "O_Hase" gibt, und beide Optionsfelder mit dem Macro "Tabelle1.M_Bild" verknüpft, reicht dieser Code im Makromodul der Tabelle1:
Code:
Sub M_Bild()
For Each sh In ActiveSheet.Pictures
sh.Visible = sh.Name = Mid(Application.Caller, 3)
Next
End Sub