Går det på nåt vis att lagra namnet på en sub i en sträng och sedan köra suben som står i strängen, lite svårt att förklara men nåt sånt här:

Dim DoSub as string

DoSub = Test1

Private sub Form_Load()
Call DoSub 'Nu ska den köra suben går detta göra på nåt vis?
End Sub

Private sub Test1()
blablabla
End Sub

Du kan använda CallByName:
<code>
Public Sub Test()
MsgBox "Test"
End Sub

Private Sub Form_Load()
CallByName Me, "Test", VbMethod
End Sub
</code>

Funkade först inte för mig när jag provade men när jag sen ändrade min sub till public så funkade det utmärkt
Tackar!