九色国产,午夜在线视频,新黄色网址,九九色综合,天天做夜夜做久久做狠狠,天天躁夜夜躁狠狠躁2021a,久久不卡一区二区三区

打開APP
userphoto
未登錄

開通VIP,暢享免費電子書等14項超值服

開通VIP
關于C#操作EXCEL,生成圖表的全面應用之一(利用Microsoft.Office.In...
關于C#操作EXCEL,生成圖表的全面應用之一(利用Microsoft.Office.Interop.Excel) 收藏
近來我在開發(fā)一個運用C#生成EXCEL文檔的程序,其中要根據(jù)數(shù)據(jù)生成相應的圖表,該圖表對顏色和格式都有嚴格的要求,在百度和谷歌中搜索了所有的相關信息,只有部分介紹,具體格式的介紹沒有,經(jīng)過我不斷的實踐和探索,終于完成了這項艱巨的任務。
         有兩種實現(xiàn)方式,一種是利用OWC11組件完成,一種運用Excel完成!
          運用OWC11的完成,適合生成一個圖形文件,之后不能不在文件中編輯;運用Excel則更適合利用EXCEL文件中的數(shù)據(jù)直接在文件中加入圖表,方便以后編輯!兩種我都嘗試了,由于我更適合于使用第二種,所以我開發(fā)的較完善。在這里公布源碼供大家參考使用!
        開發(fā)者:Gailzhao 
        EMail:gailzhao@sohu.com
說明,在窗口,添加一個按鈕,名稱為Btn,我只寫代碼部分(我的數(shù)據(jù)中是日期對應的兩種數(shù)據(jù),如下表)
在EXCEL文檔中生成如下數(shù)據(jù)(部分),在數(shù)據(jù)右側根據(jù)數(shù)據(jù)生成圖表
基金凈值指數(shù)圖表

日期 開放式基金 偏股型基金
2008-1-2 4236.9944 5158.0456
2008-1-3 4246.8861 5172.5288
2008-1-4 4277.9334 5214.2867
2008-1-7 4325.5252 5276.8432
2008-1-8 4306.3272 5252.3962

 
添加以下引用:
using System.IO;
using System.Runtime.InteropServices;
using Excel = Microsoft.Office.Interop.Excel;
 
private void Btn_Click(object sender, EventArgs e)
{
        //創(chuàng)建一個EXCEL文檔
        CreateExcel("標題","文檔.XLS", "工作表名");
}
private void CreateExcel(string title,  string fileName, string sheetNames)
{
            //待生成的文件名稱
            string FileName = fileName;
            string FilePath = strCurrentPath + FileName;
            FileInfo fi = new FileInfo(FilePath);
            if (fi.Exists)     //判斷文件是否已經(jīng)存在,如果存在就刪除!
            {
                fi.Delete();
            }
            if (sheetNames != null && sheetNames != "")
            {
                Excel.Application m_Excel = new Excel.Application();//創(chuàng)建一個Excel對象(同時啟動EXCEL.EXE進程)
                m_Excel.SheetsInNewWorkbook = 1;//工作表的個數(shù)
                Excel._Workbook m_Book = (Excel._Workbook)(m_Excel.Workbooks.Add(Missing.Value));//添加新工作簿
                Excel._Worksheet m_Sheet; 

                #region 處理
                DataSet ds= ScData.ListData("exec Vote_2008.dbo.P_VoteResult_Update " + int.Parse(fdate));
                if (ds.Tables.Count<= 0)
                {
                        MessageBox.Show("沒有最新數(shù)據(jù)!");
                        return;
                 }
                 DataTableToSheet(title,  ds.Tables[0], m_Sheet, m_Book, 0);
                #endregion
 
                #region 保存Excel,清除進程
                m_Book.SaveAs(FilePath, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,   Excel.XlSaveAsAccessMode.xlNoChange, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
                //m_Excel.ActiveWorkbook._SaveAs(FilePath, Excel.XlFileFormat.xlExcel9795, null, null, false, false, Excel.XlSaveAsAccessMode.xlNoChange, null, null, null, null, null);
                m_Book.Close(false, Missing.Value, Missing.Value);
                m_Excel.Quit();
                System.Runtime.InteropServices.Marshal.ReleaseComObject(m_Book);
                System.Runtime.InteropServices.Marshal.ReleaseComObject(m_Excel);
                m_Book = null;
                m_Sheet = null;
                m_Excel = null;
                GC.Collect();
                //this.Close();//關閉窗體
                #endregion
            }
   }
        #region 將DataTable中的數(shù)據(jù)寫到Excel的指定Sheet中
        /// <summary>
        /// 將DataTable中的數(shù)據(jù)寫到Excel的指定Sheet中
        /// </summary>
        /// <param name="dt"></param>
        /// <param name="m_Sheet"></param>
        public void DataTableToSheet(string title, DataTable dt, Excel._Worksheet m_Sheet,
                                    Excel._Workbook m_Book,   int startrow)
        {
            //以下是填寫EXCEL中數(shù)據(jù)
            Excel.Range range = m_Sheet.get_Range(m_Sheet.Cells[1, 1], m_Sheet.Cells[1, 2]);
            range.MergeCells = true;  //合并單元格
            range.Font.Bold = true;   //加粗單元格內(nèi)字符
            //寫入題目
            m_Sheet.Cells[startrow, startrow] = title;
            int rownum = dt.Rows.Count;//行數(shù)
            int columnnum = dt.Columns.Count;//列數(shù)
            int num = rownum + 2;   //得到數(shù)據(jù)中的最大行數(shù)

            //寫入列標題
            for (int j = 0; j < columnnum; j++)
            {
                    int bt_startrow = startrow + 1;
                    //將字段名寫入文檔
                    m_Sheet.Cells[bt_startrow, 1 + j] = dt.Columns[j].ColumnName;
                     //單元格內(nèi)背景色
                    m_Sheet.get_Range(m_Sheet.Cells[bt_startrow, 1 + j], m_Sheet.Cells[bt_startrow, 1 + j]).Interior.ColorIndex = 15;             }
          
            //逐行寫入數(shù)據(jù)
            for (int i = 0; i < rownum; i++)
            {
                for (int j = 0; j < columnnum; j++)
                {
                        m_Sheet.Cells[startrow + 2 + i, 1 + j] = dt.Rows[i][j].ToString();
                }
            }
            m_Sheet.Columns.AutoFit();
           
          //在當前工作表中根據(jù)數(shù)據(jù)生成圖表
           CreateChart(m_Book, m_Sheet, num); 
        }
       private void CreateChart(Excel._Workbook m_Book,Excel._Worksheet m_Sheet,int num)
        {
            Excel.Range oResizeRange;
            Excel.Series oSeries;
            m_Book.Charts.Add(Missing.Value, Missing.Value, 1, Missing.Value);
            m_Book.ActiveChart.ChartType = Excel.XlChartType.xlLine;//設置圖形
            //設置數(shù)據(jù)取值范圍
            m_Book.ActiveChart.SetSourceData(m_Sheet.get_Range("A2", "C" + num.ToString()), Excel.XlRowCol.xlColumns);
            //m_Book.ActiveChart.Location(Excel.XlChartLocation.xlLocationAutomatic, title);
            //以下是給圖表放在指定位置
            m_Book.ActiveChart.Location(Excel.XlChartLocation.xlLocationAsObject, m_Sheet.Name);
            oResizeRange = (Excel.Range)m_Sheet.Rows.get_Item(10, Missing.Value);
            m_Sheet.Shapes.Item("Chart 1").Top = (float)(double)oResizeRange.Top;  //調圖表的位置上邊距
            oResizeRange = (Excel.Range)m_Sheet.Columns.get_Item(6, Missing.Value);  //調圖表的位置左邊距
           // m_Sheet.Shapes.Item("Chart 1").Left = (float)(double)oResizeRange.Left;
            m_Sheet.Shapes.Item("Chart 1").Width = 400;   //調圖表的寬度
            m_Sheet.Shapes.Item("Chart 1").Height = 250;  //調圖表的高度
            m_Book.ActiveChart.PlotArea.Interior.ColorIndex = 19;  //設置繪圖區(qū)的背景色
            m_Book.ActiveChart.PlotArea.Border.LineStyle = Excel.XlLineStyle.xlLineStyleNone;//設置繪圖區(qū)邊框線條
            m_Book.ActiveChart.PlotArea.Width = 400;   //設置繪圖區(qū)寬度
            //m_Book.ActiveChart.ChartArea.Interior.ColorIndex = 10; //設置整個圖表的背影顏色
            //m_Book.ActiveChart.ChartArea.Border.ColorIndex = 8;// 設置整個圖表的邊框顏色
            m_Book.ActiveChart.ChartArea.Border.LineStyle = Excel.XlLineStyle.xlLineStyleNone;//設置邊框線條
            m_Book.ActiveChart.HasDataTable = false;

            //設置Legend圖例的位置和格式
            m_Book.ActiveChart.Legend.Top = 20.00; //具體設置圖例的上邊距
            m_Book.ActiveChart.Legend.Left = 60.00;//具體設置圖例的左邊距
            m_Book.ActiveChart.Legend.Interior.ColorIndex = Excel.XlColorIndex.xlColorIndexNone;
            m_Book.ActiveChart.Legend.Width = 150;
            m_Book.ActiveChart.Legend.Font.Size = 9.5;
            //m_Book.ActiveChart.Legend.Font.Bold = true;
            m_Book.ActiveChart.Legend.Font.Name = "宋體";
            //m_Book.ActiveChart.Legend.Position = Excel.XlLegendPosition.xlLegendPositionTop;//設置圖例的位置
            m_Book.ActiveChart.Legend.Border.LineStyle = Excel.XlLineStyle.xlLineStyleNone;//設置圖例邊框線條
 
            //設置X軸的顯示
            Excel.Axis xAxis = (Excel.Axis)m_Book.ActiveChart.Axes(Excel.XlAxisType.xlValue, Excel.XlAxisGroup.xlPrimary);
            xAxis.MajorGridlines.Border.LineStyle = Excel.XlLineStyle.xlDot;
            xAxis.MajorGridlines.Border.ColorIndex = 1;//gridLine橫向線條的顏色
            xAxis.HasTitle = false;
            xAxis.MinimumScale = 1500;
            xAxis.MaximumScale = 6000;
            xAxis.TickLabels.Font.Name = "宋體";
            xAxis.TickLabels.Font.Size = 9;
 
            //設置Y軸的顯示
            Excel.Axis yAxis = (Excel.Axis)m_Book.ActiveChart.Axes(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary);
            yAxis.TickLabelSpacing = 30;
            yAxis.TickLabels.NumberFormat = "M月D日";
            yAxis.TickLabels.Orientation = Excel.XlTickLabelOrientation.xlTickLabelOrientationHorizontal;//Y軸顯示的方向,是水平還是垂直等
            yAxis.TickLabels.Font.Size = 8;
            yAxis.TickLabels.Font.Name = "宋體";
            //m_Book.ActiveChart.Floor.Interior.ColorIndex = 8; 
            /***以下是設置標題*****
            m_Book.ActiveChart.HasTitle=true;
            m_Book.ActiveChart.ChartTitle.Text = "凈值指數(shù)";
            m_Book.ActiveChart.ChartTitle.Shadow = true;
            m_Book.ActiveChart.ChartTitle.Border.LineStyle = Excel.XlLineStyle.xlContinuous;
            */
            oSeries = (Excel.Series)m_Book.ActiveChart.SeriesCollection(1);
            oSeries.Border.ColorIndex = 45;
            oSeries.Border.Weight = Excel.XlBorderWeight.xlThick;
            oSeries = (Excel.Series)m_Book.ActiveChart.SeriesCollection(2);
            oSeries.Border.ColorIndex = 9;
            oSeries.Border.Weight = Excel.XlBorderWeight.xlThick;
        }
 
本文來自CSDN博客,轉載請標明出處:http://blog.csdn.net/gailzhao/archive/2008/09/19/2950227.aspx
本站僅提供存儲服務,所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權內(nèi)容,請點擊舉報
打開APP,閱讀全文并永久保存 查看更多類似文章
猜你喜歡
類似文章
簡簡單單將網(wǎng)上圖表快速導入Excel
Excel 如何做到關閉多個打開的excel表中的其中一個表時,其它的excel表不關閉?
PPT中粘貼Excel圖表鏈接的細節(jié)探討
Excel 2007幫您處理信息的十種主要方式
精品平板電腦應用推薦——MS Office-頭條網(wǎng)
一文學會,文件格式互轉,原來這么簡單
更多類似文章 >>
生活服務
熱點新聞
分享 收藏 導長圖 關注 下載文章
綁定賬號成功
后續(xù)可登錄賬號暢享VIP特權!
如果VIP功能使用有故障,
可點擊這里聯(lián)系客服!

聯(lián)系客服