Add a File to the Current Project
'// Requires a reference to the_ VB Extensibility Type Library Public Sub AddFile_ (VBInst As VBIDE.Application) Dim AP As Object Set AP = VBInst.ActiveProject AP.AddFile (App.Path & "\y.xxx") Set AP = Nothing End Sub
This article was originally published on November 20, 2002