Utilizacion de Macros en CST MWS

[arkaos]

Hola,

Estoy realizando una optimizacion de un transformador, mediante el uso de macros, genero mi diseño y calculo los parametros S. Pues me gustaria leer los parametros S para poder optimizarlos. He estado mirando en el manual del CST pero no he obtenido resultados. ¿Alguien me podria ayudar?

Lo que utilizo para intentar leer el parametro S11 es:

Option Explicit
Dim studio As Object
Dim proj As Object
---------
Sub Resultados
Dim a11 As Object
Dim p11 As Object
Set a11 = Result1D ("a1(1)1(1)")
Set p11 = Result1D ("p1(1)1(1)")

Dim n As Integer
Dim frq As Double
Dim phase As Double
Dim ampli As Double
Dim real As Double

frq=12
n=a11.GetClosestIndexFromX(frq)
phase = Pi/180.0 * p11.GetY
ampli = a11.GetY
real = ampli * Cos(phase)

End Sub

Sub Main
'Starts CST MICROWAVE STUDIO®
Set studio = CreateObject("CSTStudio.Application")
Set proj = studipenFile("C:\MiDoc\test.cst")

Resultados
End Sub

-------------

Al simular me da este error:

Unable to read result file: C:\MiDoc\Temp\DE25\Untitled_0\Result\a1(1)1(1).sig (Set a11 =REsult1D("a1(1)1(1)"))

Alguna idea de como solucionarlo?

Un saludo.