Über eine globale Abfrage eines Click-Ereignis gleichartiger Steuerelemente soll jedes Steuerelement einen Wert in eine entsprechende Zelle übergeben:
In eine UF eingebundene Spinbuttons machen das bisher so:
Private Sub SpinButton1_Change()
Range("A1").Value = SpinButton1.Value
End Sub
Private Sub SpinButton2_Change()
Range("A2").Value = SpinButton2.Value
End Sub
Private Sub SpinButton3_Change()
Range("A3").Value = SpinButton3.Value
End Sub
Private Sub SpinButton4_Change()
Range("A4").Value = SpinButton4.Value
End Sub
Private Sub SpinButton5_Change()
Range("A5").Value = SpinButton5.Value
End Sub
Wenn nun aber die Anzahl der Spinbuttons ansteigt, gibt es doch bestimmt eine elegante Methode. Ich bin für jede Hilfe dankbar!