在VB里怎样控制Excel的字体和颜色
1个回答
展开全部
Private Sub Command1_Click()
On Error Resume Next myExcelOpen App.Path & "\班组标准化建设\2.标准化作业管理\6.派工单\派工单.xls", _ "派工单", "Microsoft Excel - 派工单.xls" xlBook.Worksheets("派工单").Range(1,2).Font.ColorIndex = 3
xlBook.Worksheets("派工单").Range(1,2).FontName = "宋体"
End Sub
On Error Resume Next myExcelOpen App.Path & "\班组标准化建设\2.标准化作业管理\6.派工单\派工单.xls", _ "派工单", "Microsoft Excel - 派工单.xls" xlBook.Worksheets("派工单").Range(1,2).Font.ColorIndex = 3
xlBook.Worksheets("派工单").Range(1,2).FontName = "宋体"
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
