Ett litet problem som jag hoppas kunna förklara

Jag håller på och gör en sub för att skriva till olika metoder på ett objekt.

Nedan har jag brutit ut mitt problem. jag vill skicka med "metod" och "värde". Problemet är hur ojektet (oObj) ska först att <vMetod> (Text) är en variabel.

 
Sub Test(ByVal vMetod As String, ByVal Data As Variant)
oObj.<vMetod> = Data
End Sub

Hej,

En subrutin förväntas inte skicka något tillbaka så jag vill bara kolla att det är så du tänker. Om du vill returnera något så använder man en funktion istället för subrutin. Förklara gärna lite mer vad du är ute efter.

Pelle