摘要: 单元格设置1.设置单元格线框Excel.ActiveSheet.Range[B10:C13].Borders[N].LineStyle := xlNoneExcel.ActiveSheet.Range[B10:C13].Borders[N].Weight := xlThin边框的类型 Borders[N]xlEdgeLeft 左=1xlEdgeRight 右=2xlEdgeTop 顶=3xlEdgeBottom 底=4xlDiagonalUp 左上右下=5 xlDiagonalDown 左下右上=6xlEdgeLeft 外部左边框=7xlEdgeTop 外部上边框=8xlEdgeBottom 阅读全文
posted @ 2013-12-29 21:07 [望梅止渴] 阅读(119) 评论(0) 推荐(0)
摘要: 1 -- 获取月度列表 2 if exists(select 1 from sysobjects where name = 'proc_GetDateMonthList' and type = 'p') 3 drop proc proc_GetDateMonthList 4 GO 5 create proc proc_GetDateMonthList 6 @BeginDate varchar(6) 7 ,@EndDate varchar(6) 8 ,@Delimiter varchar(1) = ',' 9 as10 /*11 Create By 阅读全文
posted @ 2013-12-23 23:15 [望梅止渴] 阅读(45) 评论(0) 推荐(0)