This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
Thank You for responding!
I guess implied in your response is that I'm creating a table - but in fact, I'm trying to manipulate the properties of an existing table that the user has added to a Rich Text field.
Ideally, it'd be a property I could just change - e.g. change from a "tabbed table" to a "display all rows at the same time" type table, but I've not found a way of changing that property.
Another option I'm working on is getting all the table content, and then creating a "new" normal table, but I suspect its going to be tricky - so far I can get the row headings:
If Not rtn1doc.FindFirstElement(RTELEM_TYPE_TABLE) Then
'Do Nothing
Messagebox "No tables in this document wibble,",, "No tables"
'Exit Sub
End If
If rtn1doc.FindFirstElement(RTELEM_TYPE_TABLE) Then
'Still do nothing
Messagebox "We finally detected a table!,",, "Table detected"
'Dim rCell As Notes
Dim rtt As NotesRichTextTable
Set rtt = rtn1doc.GetElement
'rtt.RowLabels
Dim labelString As String
labelString = ""