>loTable.Cell[liRowNo, 1].RANGE.InsertAfter(ALLTRIM(lcname)) >loTable.Cell[liRowNo, 1].RANGE.Shading.Texture = 50 > >loTable.Cell[liRowNo, 2].RANGE.InsertAfter(thisform.lcCurrentYear+[: ]+ALLTRIM(lcVotes) ) >x1=loTable.Cell[liRowNo, 2].RANGE.Font.Size > >loTable.Cell[liRowNo, 2].RANGE.Font.Bold = .t. >loTable.Cell[liRowNo, 2].RANGE.InsertAfter( CHR(13) ) >loTable.Cell[liRowNo, 2].RANGE.Font.Size=8 >loTable.Cell[liRowNo, 2].RANGE.InsertAfter(lcPrevYear+[: (]+lcVotesP +[)]) >loTable.Cell[liRowNo, 2].RANGE.Font.Size=x1 >loTable.Cell[liRowNo, 2].RANGE.Font.Bold =.f. > > >loTable.Cell[liRowNo, 2].RANGE.ParagraphFormat.ALIGNMENT = wdAlignParagraphRight >IF NOT EMPTY(lcPerc) >loTable.Cell[liRowNo, 3].RANGE.InsertAfter(ALLTRIM(lcPerc) +[%] + CHR(13) +lcprevyear+[(]+ALLTRIM(lcPercP) +[%)]) >loTable.Cell[liRowNo, 3].RANGE.ParagraphFormat.ALIGNMENT = wdAlignParagraphRight >ENDIF >loTable.Cell[liRowNo, 4].RANGE.InsertAfter(lcPlural + CHR(13) +thisform.lcprevyear+[(]+lcPluralP +[)]) >loTable.Cell[7, 4].RANGE.ParagraphFormat.ALIGNMENT = wdAlignParagraphRight >>
loTable.Cell[liRowNo, lnColumn].Select oExcel.Selection.Font.Bold = .t.