主题：报表里【】 里颜色变化

老师好，我想实现【】从括号到里面的文字的颜色变化，如图

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=63410&skin=0

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=94271&skin=0

 

如果是excel报表，生成后，修改对应字符的颜色。参考

 

http://www.foxtable.com/webhelp/scr/2121.htm

 

感谢老师，学习下先，不是excel格式，我是按照word 生成报表，生成的表。

 

参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=82745&skin=0

 

具体代码，不会做上传实例。

 

Dim app As New MSWord.Application
try
    Dim doc = app.Documents.Open("d:\test.doc")
    Dim gjzs As String = "\[*\]"
    Dim flag As Boolean = False
    For Each gjz As String In gjzs.split("|")
       
        app.ActiveWindow.Selection.WholeStory
        With app.ActiveWindow.Selection.Find
            .MatchWildcards = True
            .text = gjz
        End With
       
        Do While app.ActiveWindow.Selection.Find.Execute
            app.ActiveWindow.Selection.Range.Font.Bold = True   '加粗           

            app.ActiveWindow.Selection.Range.Font.ColorIndex = 3'颜色
        Loop
    Next
   
    doc.saved = True
    app.Visible = True
catch ex As exception
    msgbox(ex.message)
    app.Quit
finally
End try

感谢老师，刚才试了下，似乎没变化，烦请老师实例

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:最后一行.table

这是word 模板

没上去？

doc不能上传？