C#.net VSTO Excel開發中一些常用方法

在excel開發中一些常用的方法。

擷取選擇的單元格

Excel.Range r = (Excel.Range)Application.ActiveCell;

擷取指定單元格

wks是目前活動的Worksheet

Excel.Range cell1 = (Excel.Range)wks.Cells[next_row, 1];

删除一行

Excel.Range sel_row_range = (Excel.Range)wks.Rows["2:2", Type.Missing];

 //删除第二行

sel_row_range.Delete(Excel.XlDeleteShiftDirection.xlShiftUp);

設定range顔色

            Excel.Range range = this.Cells[1, 1];

            range.Interior.Color = 0x00ff00;

0x0000ff 紅色

0x00ff00 綠色

0xff0000 藍色

設定單元格計算函數

//顯示計算結果的單元格

            Excel.Range math_range = get_Range("A5","A5");

//設定單元格表達式

            math_range.FormulaR1C1 = "=CalculateArea(R[-2]C[-1]:R[-2]C)";

R[-2]C[-1]:R[-2]C

意思是，從目前單元格開始算行數為目前行-2，列數為目前列-1，到達單元格為目前行-2，和目前列相等

設定單元格類型

//設定單元格類型為文本

cell2.NumberFormatLocal = "@";

設定公式

例 E3=B3*D3

Excel.Range r = (Excel.Range)wks.cells[3,5];

r.FormulaR1C1 = "=RC[-3]*RC[-1]";

設定區域字型

        private void SetRangeFont(Excel.Range range, string font_name, int font_size)

        {

            Excel.Font target_font = range.Font;

            target_font.Name = font_name;

            target_font.Size = font_size;

            target_font.Strikethrough = false;

            target_font.Superscript = false;

            target_font.Subscript = false;

            target_font.OutlineFont = false;

            target_font.Shadow = false;

            target_font.Underline = Excel.XlUnderlineStyle.xlUnderlineStyleNone;

            target_font.ThemeColor = Excel.XlThemeColor.xlThemeColorLight1;

            target_font.TintAndShade = 0;

            target_font.ThemeFont = Excel.XlThemeFont.xlThemeFontNone;

        }

設定選擇單元格

            Excel.Range range = this.Cells[1, 1];

            range.Select();

設定選擇行

            Excel.Range range = (Excel.Range)this.Rows[1, missing];

            range.Select();

通過代号擷取range

Excel.Range range = get_Range("A1", "B3");

設定Range的詳細屬性，包括顔色，是否邊框為黑色實線等

        private void SetRangeColor(Excel.Range range,Excel.XlThemeColor color)

        {

            range.Interior.Pattern = Excel.XlPattern.xlPatternSolid;

            range.Interior.PatternColorIndex = Excel.XlPattern.xlPatternAutomatic;

            range.Interior.ThemeColor = color;

            range.Interior.TintAndShade = 0.89999;

            range.Interior.PatternTintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlDiagonalDown].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlDiagonalUp].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlEdgeLeft].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlEdgeTop].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlEdgeRight].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlInsideVertical].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlInsideHorizontal].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlDiagonalDown].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlDiagonalUp].LineStyle = Excel.XlLineStyle.xlLineStyleNone;

            range.Borders[Excel.XlBordersIndex.xlEdgeLeft].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlEdgeLeft].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeLeft].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeLeft].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlEdgeTop].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlEdgeTop].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeTop].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeTop].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeBottom].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlEdgeRight].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlEdgeRight].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeRight].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlEdgeRight].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlInsideVertical].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlInsideVertical].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlInsideVertical].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlInsideVertical].Weight = Excel.XlBorderWeight.xlThin;

            range.Borders[Excel.XlBordersIndex.xlInsideHorizontal].LineStyle = Excel.XlLineStyle.xlContinuous;

            range.Borders[Excel.XlBordersIndex.xlInsideHorizontal].ColorIndex = 0;

            range.Borders[Excel.XlBordersIndex.xlInsideHorizontal].TintAndShade = 0;

            range.Borders[Excel.XlBordersIndex.xlInsideHorizontal].Weight = Excel.XlBorderWeight.xlThin;

        }

隐藏

                    Excel.Range child_range = (Excel.Range)wks.Rows["3:3", Type.Missing];

                    child_range.EntireRow.Hidden = true;

另存并加載到目前

wk.SaveAs(file_path, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Excel.XlSaveAsAccessMode.xlNoChange, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);

另存不加載到目前

wk.SaveCopyAs(file_path);

合并單元格

        private void MergeCells(string col_name, int start_row, int end_row)

        {

            Excel.Worksheet wks = m_excell_app.ActiveSheet as Excel.Worksheet;

            string str1 = col_name + start_row.ToString();

            string str2 = col_name + end_row.ToString();

            Excel.Range r1 = (Excel.Range)wks.get_Range(str1, str2);

            r1.Merge(Type.Missing);

        }

設定居中，靠左

range.HorizontalAlignment = Excel.XlHAlign.xlHAlignLeft;

range.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;

設定上鎖區域

            Excel.Worksheet wks = m_excell_app.ActiveSheet as Excel.Worksheet;

            foreach (Excel.AllowEditRange aer in wks.Protection.AllowEditRanges)

            {

                aer.Delete();

            }

            wks.Protection.AllowEditRanges.Add("s", (Excel.Range)wks.Columns["C:H", Type.Missing], Type.Missing);

            wks.Protection.AllowEditRanges.Add("s1", (Excel.Range)wks.Columns["X:AR", Type.Missing], Type.Missing);

            int i = 2;

            foreach (Excel.Range e in wks.UsedRange.Rows)

            {

                Excel.Range cell = (Excel.Range)wks.Cells[e.Row, 17];

                if (cell.Value2 == null)

                {

                    wks.Protection.AllowEditRanges.Add("s" + i.ToString(), cell, Type.Missing);

                    i++;

                }

                else

                {

                    try

                    {

                        Convert.ToDouble(cell.FormulaR1C1.ToString());

                        wks.Protection.AllowEditRanges.Add("s" + i.ToString(), cell, Type.Missing);

                        i++;

                    }

                    catch (Exception ex)

                    {

                    }

                }

            }

            wks.Protect(Type.Missing, true, true, false, false, false, false, false, false, false, false, false, false, false, false, false);