How to change Note for paste excel table with API

Paste excel into SolidWorks, and excel form of communication.

I nedd change Note in paste excel table.

Thanks.

follow code is change note in General Table, I need change note  for  paste Excel tabe in Solidworks.

***************************

'Get General Table Feature Example (VB)
'This example shows how to get a general table feature and its properties.

Option Explicit

Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swModelDocExt As SldWorks.ModelDocExtension
Dim swSelMgr As SldWorks.SelectionMgr
Dim swGeneralTableFeature As SldWorks.GeneralTableFeature
Dim swTableAnnotation As SldWorks.TableAnnotation
Dim nbrTableAnnotations As Long
Dim vTableAnnotations As Variant
Dim i As Long
Dim anchorAttached As Boolean
Dim anchorType As Long
Dim nbrColumns As Long
Dim nbrRows As Long

Sub main()

Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set swModelDocExt = swModel.Extension
Set swSelMgr = swModel.SelectionManager
Dim Str, ii, jj, boolStatus

' Select general table feature in FeatureManager design tree
boolStatus = swModel.Extension.SelectByID2("General Table2", "GENERALTABLEFEAT", 0, 0, 0, False, 0, Nothing, 0)
Set swGeneralTableFeature = swSelMgr.GetSelectedObject6(1, 0)

nbrTableAnnotations = swGeneralTableFeature.GetTableAnnotationCount
Debug.Print "Number of annotations = " & nbrTableAnnotations
vTableAnnotations = swGeneralTableFeature.GetTableAnnotations
For i = 0 To (nbrTableAnnotations - 1)
    Set swTableAnnotation = vTableAnnotations(i)
  
    anchorAttached = swTableAnnotation.Anchored
    Debug.Print "Table anchored        = " & anchorAttached
    anchorType = swTableAnnotation.anchorType
    Debug.Print "Anchor type           = " & anchorType
    nbrColumns = swTableAnnotation.ColumnCount
    Debug.Print "Number of columns     = " & swTableAnnotation.ColumnCount
    nbrRows = swTableAnnotation.RowCount
    Debug.Print "Number of rows        = " & nbrRows
    For ii = 0 To nbrRows
      For jj = 0 To nbrColumns
        swTableAnnotation.Text(ii, jj) = "A" & ii + jj '& ": m" & ChrW(179)
      Next jj
    Next ii
Next i
   
End Sub

SolidworksApi macros