我想在 Excel 中给文件字加双下划线,可是编译时提示变量没有定义
MsExcel.Cells[1,1].Fond.UnderLine:=xlUnderLineStyleNone
变量是xlUnderLineStyleNone 是在Excel 中宏中查到的,
怎样在Delphi中表达这个语句呢?
多谢大家!
问题点数:20、回复次数:6Top
1 楼yifawu(yifawu)回复于 2001-12-20 09:58:23 得分 0
设单划线时是这样的
MsExcel.Cells[1,1].Fond.UnderLine:=True;
可是我需要的是双划线....Top
2 楼962veiri(风尘旅人)回复于 2001-12-20 10:22:36 得分 5
关注中……Top
3 楼yifawu(yifawu)回复于 2001-12-20 12:11:54 得分 0
waiting...Top
4 楼youfly(无名)回复于 2001-12-20 12:25:36 得分 10
MsExcel.Cells[1,1].Fond.UnderLine:=1Top
5 楼xhc_2000(大雪)回复于 2001-12-20 13:46:38 得分 5
关注,upTop
6 楼yifawu(yifawu)回复于 2001-12-20 15:23:14 得分 0
我试出来了
用 MsExcel.Cells[1,1].Font.UnderLine:=3 就可画双下划线。
Top




