I'm attempting to write a macro within OpenSTAAD or Excel, currently using Excel, that will allow me to extract results from multiple STAAD models and compile the results in Excel. I've managed to create a macro that can extract results from one STAAD model, but not multiple models. I'm having issues with the GetObject command, particularly the PathName format. Listed below is the macro I'm using. I'd like to be able to cycle through multiple STAAD files by altering the file name on the line marked by <<< >>>. Is this possible, is there a better way to do this? Thanks.
Private Sub Extract ()
dim beam as long
dim dist as long
dim lcn as long
dim mf(6) as double
beam = 1000
dist = 0
lcn = 500
Dim ostd as Object
<<<set ostd = GetObject("C:\test.std","StaadPro.OpenSTAAD")>>>
ostd.output.GetIntermediateMemberForcesatDistance beam, dist, lcn, mf
For i = 0 To 5
Cells(4, i + 2) = mf(i)
Next i
End Sub