RemoveRow

<< Click to Display Table of Contents >>

 

RemoveRow

RemoveRow(Row)

Removes a Row at a specified index. The Row parameter determines the table Row to remove and it must be a value between 1 (one) and Count. The next script contains an example of using this method.

Sub RemoveRow_Click()
  On Error Resume Next
  Dim Bind
  Set Bind =_
    Screen.Item("Rectangle1").Links.Item("ForegroundColor")
  If Bind Is Nothing Then
    MsgBox "Rectangle1 has no link."
  Else
    MsgBox "Rectangle1 is linked to '" & Bind.Source & "'"
    Dim row
    row = Screen.Item("Row").Value
    MsgBox "Removing line " & row
    Bind.RemoveRow row
  End If
End Sub

Was this page useful?