Add a File to the Current Project

Developer.com content and product recommendations are editorially independent. We may make money when you click on links to our partners. Learn More.

When making an add-in, you may want this functionality. This tip shows how:

'// 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