Information générale
Catégorie:
COM/DCOM et OLE Automation
Titre:
How can I control table cell formatting via word automation
I am attempting to change the text formatting of text that is within a cell of my table, via word automation. The code I have tried so far does not work. Here is what I want to do:
I want to have the first line of text in my cell in bold and italics, then issue a carriage return, and then have the remaining text not bold, not italicized.
The code I tried does not work - see below. the 'wdcollapseend' line gives me the error message 'does not support a collection'
What is the proper syntax to get this to work?
oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.text=alltrim(currespmatr_customer.mrecommend)+ chr(13)
oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.bold= .t.
oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.italic= .t.
*oDoc.tables(lncustomertbl).cell(lncustcntr,5).range(wdCollapseend) && got error 'does not support a collection'
*oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.bold= .f.
*oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.italic= .f.
oDoc.tables(lncustomertbl).cell(lncustcntr,5).range.insertafter(alltrim(currespmatr_customer.mconcept))
TIA
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement