[Løst] Custom Function i VBA - send resultatet til ny variabel

[deaktivert443556]

Jeg har lagd en funksjon som leser tekst fra Personal Communication (PCOMM) og setter resultatet i en variabel. Funksjonen fungerer, men det er en slags kompromissløsning jeg har kommet frem til.

 

Kort fortalt fungerer koden på denne måten

Function FINN(Rad, Kol, Lengde)
FinnTekst = blabla.GetText(Rad, Kol, Lengde)
End Function

 

Og hvis jeg skal bruke denne funksjonen i et script

Sub asdfø()
FINN 1, 2, 6 
MsgBox FinnTekst   'Fungerer fint
MinVar = FINN(1, 2, 6) 'Starter funksjonen og henter teksten, men sender den ikke til 'MinVar'
End Sub

 

Så lenge jeg holder meg til den forhåndsdefinerte variablen FinnTekst, da fungerer det, men den ideelle løsningen er at jeg kan lagre resultatet fra FINN i en ny varibel med kun én linje, slik som MinVar = FINN(1, 2, 6)

 

Er det noen måte jeg kan gjøre dette på? En workaround er naturligvis en ekstra linje som sier MinVar = FinnTekst, men hvis jeg på enkelt vis kan unngå dette, da vil jeg helst det.

 

Edit: Hjernen fungerte ikke i går ettermiddag. Jeg må jo selvfølgelig sette FINN = .... i funksjonen.

Endret 12. mai 2011 av Bradbury