🚀 go-pugleaf

I currently need to pass the found character style object to another sub to be processed by a _ton_ of code. 

Here's an example... 

Set findstyle = mydocument.CharStyles.item(characterstyle) 
    ' clear out existing data 
    MyIndesign.FindPreferences = idNothing 
    ' setup find style 
    MyIndesign.FindPreferences.characterstyle = findstyle 
    ' clear out existing data 
    MyIndesign.ChangePreferences = idNothing 
    ' get a collection of text objects that have that style applied 
    MyIndesign.ChangePreferences.characterstyle = findstyle 
    Set FoundText = mydocument.Search("", , , "") 
    ' do something to FoundText.Item(X), like: 
    If IsObject(FoundText) = False Then Exit Sub 
    For Each item In mydocument.CharStyles 
        If item.Name = characterstyle Then 
            ' need to assign object to this variable for later. 
            Set mytextframe = item 
        End If 
    Next 

placeitems(mytextframe) 

----- 

With the above noted, how do I assign "mytextframe" to the found textframe object? 

Thanks, 

-GG