如何程序控制Word表格中某行或某列的背景颜色?(30分)

  • 主题发起人 主题发起人 awen168
  • 开始时间 开始时间
A

awen168

Unregistered / Unconfirmed
GUEST, unregistred user!
如何程序控制Word表格中某行或某列的背景颜色?
 
procedure TForm1.Button1Click(Sender: TObject);
var
WordApp : TWordApplication;
Doc : _Document;
Table : Word2000.Table;
begin
WordApp := TWordApplication.Create(Self);
WordApp.Connect;
FileName := 'F:/a.doc';
WordApp.Visible := True;
WordApp.Documents.Open(FileName,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
Doc := WordApp.ActiveDocument ;
Table := Doc.Tables.Item(1);
Table.Columns.Item(1).Shading.BackgroundPatternColor := wdColorBrightGreen;
Table.Cell(2,2).Shading.BackgroundPatternColor := wdColorBlue;
end;
 
你可以告诉我什么地方有这些资料吗?
 
主要是word的帮助文件中的VBA资料。
结合delphi的word2000.pas或者word97.pas文件中的声明。
 
后退
顶部