Sub Click(Source As Button) Const macro$ = "@ConfigFile" Dim dummy As Variant dummy = Evaluate(macro$) Msgbox dummy(0)End Sub