|
|
| excel选中范围的边框线型设置 因为多数边框线为实线故作为例 |
|
|
|
|
excel选中范围的边框线型设置因为多数边框线为实线故作为例
PRivate_Workbook_workBook=null;
privateWorksheet_workSheet=null;
privateWorksheet_workSheet2=null;
privateExcel.application_excelApplicatin=null;
privateExcel.Chart_excelChart=null;
_excelApplicatin=newExcel.Application();
_excelApplicatin.Visible=true;
_excelApplicatin.DisplayAlerts=true;
_workBook=_excelApplicatin.Workbooks.Add(XlSheetType.xlWorksheet);
_workSheet=(Worksheet)_workBook.ActiveSheet;
_workSheet.Name="多数边框线为实线";
Excel.RangeexcelRange=_workSheet.get_Range(_workSheet.Cells[2,2],_workSheet.Cells[6,6]);
ExcelBorderLineStlye(excelRange,"Up","Bottom","Left""Right");
//excelRange:excel选中范围的边框线型设置因为多数边框线为实线
//NO:表示边框没有;"UpBottomLeftRight":表示线型为粗线;""""表示线型细线
privatevoidExcelBorderLineStlye(RangeexcelRange,stringUp,stringBottom,stringLeft,stringRight)
{
ListborderWeightDivision=newList();
borderWeightDivision.Add(Up);
borderWeightDivision.Add(Bottom);
borderWeightDivision.Add(Left);
borderWeightDivision.Add(Right);
for(inti=0;i
{
if(borderWeightDivision[i].Length>0)
{
if(!borderWeightDivision[i].Equals("NO"))
{
switch(i)
{
//Top
case0:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeTop).Weight=XlBorderWeight.xlMedium;
break;
//Bottom
case1:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeBottom).Weight=XlBorderWeight.xlMedium;
break;
//"Left"
case2:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeLeft).Weight=XlBorderWeight.xlMedium;
break;
//"Right"
case3:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeRight).Weight=XlBorderWeight.xlMedium;
break;
}
}
else
{
switch(i)
{
//Top
case0:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeTop).LineStyle=XlLineStyle.xlLineStyleNone;
break;
//Bottom
case1:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeBottom).LineStyle=XlLineStyle.xlLineStyleNone;
break;
//"Left"
case2:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeLeft).LineStyle=XlLineStyle.xlLineStyleNone;
break;
//"Right"
case3:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeRight).LineStyle=XlLineStyle.xlLineStyleNone;
break;
}
}
}
else
{
switch(i)
{
//Top
case0:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeTop).Weight=XlBorderWeight.xlThin;
break;
//Bottom
case1:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeBottom).Weight=XlBorderWeight.xlThin;
break;
//"Left"
case2:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeLeft).Weight=XlBorderWeight.xlThin;
break;
//"Right"
case3:
excelRange.Borders.get_Item(XlBordersIndex.xlEdgeRight).Weight=XlBorderWeight.xlThin;
break;
}
}
}
}
Excel应用技巧：如何把表格转换为图片
Shift键在Word下有这样的妙处，如果我们在按下Shift键，同时点击“编辑”菜单，原来的复制和粘贴就会变成“复制图片”和“粘贴图片”。
利用这一功能，我们也可以将这方法移接到Excel中运用，把Excel一个数据表以图片的形式进行复制，从而将其转换为图片。
方法如下：
首先选中需要复制成图片的单元格区域，然后按住Shift键依次选择“编辑→复制图片”命令，接着弹出“复制图片”窗口，选择“图片”单选项后点击“确定”按钮，这时就将选定的表格区域复制成图片了。最后复制到目标只需直接选择“粘贴”命令即可(或者按Shift键再选择“编辑→粘贴图片”命令)。我们还可以将其在Word中进行粘贴。
另外，在复制图片时如果选择了“如打印效果”单选项，在粘贴的时候如果表格没有边框，复制后的图片也不会出现边框。
详细出处参考：http://www.csdn123.com/html/20130206/41/6b3faaccf79d32f92b7ff347d6486c38.htm#csdntitle2
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
