X xzsnj Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-07 #1 不是对字体，字体的ExcelApp.ActiveSheet.Rows[1].Font.UnderLine := True; 这个我知道，我要对整个单元格打个下划线！ 在线等！
Z zywcd Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-07 #2 那给你看看这个。这个是可以的。 ExcelID.ActiveSheet.Range[ 'B34' ].Borders[2].Weight := 3; 1-左 2-右 3-顶 4-底 5-斜( / ) 6-斜( / )
那给你看看这个。这个是可以的。 ExcelID.ActiveSheet.Range[ 'B34' ].Borders[2].Weight := 3; 1-左 2-右 3-顶 4-底 5-斜( / ) 6-斜( / )
4' ].Borders[2].Weight := 3;