Adds an entry based on the given node number.

Syntax:

Add( Index As Long, ProjectFile As ProjectFile, NodeNumber As Long ) As Long
Return: Long
Parameters: Index Index where the new entry should be inserted. If Index = -1 the node will be added at the end.
ProjectFile Project file of the node to be added.
NodeNumber Number of the node to be added.

Example:
Sub TestTextTableView()
Dim View As TextTableView
Dim ProjFile As ProjectFile
Dim TU As TransUnit
Dim Index As Long

Set View = Application.ActiveProject.ProjectDocument.TextTableView
Set ProjFile = Application.ActiveProjectFile
Set TU = Application.ActiveTransUnit

Index = View.GetIndex(ProjFile, TU.Number)

If (View.RemoveAt(Index)) Then
    Index = View.Add(-1, ProjFile, TU.Number)
    View.Refresh (-1)
End If

See also:

Class TextTableView


Last Updated: 04/27/05