Event fired if a project file has been added to the project.

Syntax:

OnAddFile(Project As TranslationProject, ProjectFile As ProjectFile)
Parameters: Project Project to which a project file has been added.
ProjectFile Project file that has been added.

Example:
' in a class module "EventClass"

Dim WithEvents App As Application

Private Sub App_OnAddFile(ByVal Project As TranslationProject, _
	ByVal ProjectFile As ProjectFile)
 
[...]

End Sub

' in a module

Public EventManager As New EventClass

Sub TestMacro()
	Set EventManager.App = Application
End Sub

See also:

Class Application

Last Updated: 01/26/06