Universe Refresh Structure using BI 4.1 SDK?

Hello Experts,

I was looking for a code snippet which will be used to retrieve the universe (.unv) from BI 4.1 and perfrom refresh structure on it.

I got the below code:

===============================

Private Sub
   Document_AfterRefresh()
   Dim DesignerApp As Designer.Application
   Dim Univ As Designer.Universe
   Set DesignerApp = New Designer.Application
   DesignerApp.Visible = False
   DesignerApp.Logon "Administrator", "Password", "CMSName","SecEnterprise"
   Set Univ = DesignerApp.Universes.Open("eFashion.unv")
   Univ.RefreshStructure
   Univ.Save
   DesignerApp.Quit
   Set DesignerApp = Nothing
End Sub

=================================

from thread: http://scn.sap.com/thread/3682547

Does the above code snippet require an IDE to execute, or a macro in excel.

Please suggest.

Regards,

Mitesh Joshi