//导出事件,这个是有合并动态列的

double num1 = 0, num2 = 0, num3 = 0;

protected void btnExcel_Click(object sender, ImageClickEventArgs e)
    {
        num1 = 0; num2 = 0; num3 = 0;
        DirectoryInfo fdir = new DirectoryInfo(Server.MapPath(@"\TmpReport"));
        FileInfo[] files = fdir.GetFiles();
        for (int i = 0; i < files.Length - 1; i++)
        {
            if (files[i].Name.IndexOf("tmp") >= 0)
            {
                try
                {
                    files[i].Delete();
                }
                catch (Exception ex)
                {
                }
            }
        }         string time = DateTime.Now.ToString("yyyyMMddHHmmss");
        FileInfo fi = new FileInfo(Server.MapPath(@"\Excel\每日信貸報告.xls"));
        fi.CopyTo(Server.MapPath(@"\TmpReport\tmp" + time + ".xls"));         Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
        Microsoft.Office.Interop.Excel.Workbooks workbooks = xlApp.Workbooks;
        Microsoft.Office.Interop.Excel.Workbook xlBook = workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
        Microsoft.Office.Interop.Excel.Worksheet xlSheet = new Microsoft.Office.Interop.Excel.Worksheet();
        xlBook = xlApp.Workbooks.Open(Server.MapPath(@"\TmpReport\tmp" + time + ".xls"));
        xlSheet = (Microsoft.Office.Interop.Excel.Worksheet)xlBook.Worksheets.get_Item(1);
        int tmpid = 2;
        string rowSheet = "";
        string 可簽額 = "";
        string 戶主名 = "";
        int count1 = 2;
        int count2 = 2;
        int Colorindex = 0;
        for (int i = 0; i < dtList.Rows.Count; i++)
        {
            string rowSheet1 = Convert.ToString(dtList.Rows[i]["戶號"]);
            
            if (rowSheet1 == rowSheet)
            {
                //xlSheet.Cells[tmpid, 1] = "";
                //xlSheet.Cells[tmpid, 2] = "";
                //xlSheet.Cells[tmpid, 3] = "";
            }
            else
            {
                if (rowSheet != "")
                {
                    Microsoft.Office.Interop.Excel.Range integral = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("A" + count1, "A" + (count2 - 1));
                    integral.MergeCells = true;
                    integral.Value = 可簽額;
                    integral.Font.Size = 16;
                    integral.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;                     integral.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;                     Microsoft.Office.Interop.Excel.Range integral1 = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("B" + count1, "B" + (count2 - 1));
                    integral1.MergeCells = true;
                    integral1.Value = rowSheet;
                    integral1.Font.Size = 16;
                   // integral1.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;
                    integral1.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;
                    integral1.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;                     Microsoft.Office.Interop.Excel.Range integral2 = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("C" + count1, "C" + (count2 - 1));
                    integral2.MergeCells = true;
                    integral2.Value = 戶主名;
                    integral2.Font.Size = 16;
                    integral2.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;
                    integral2.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;                     Colorindex = 15;
                    if (Colorindex != 0)
                    {
                        Microsoft.Office.Interop.Excel.Range integrals = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("a" + tmpid, "I" + tmpid);
                        integrals.Interior.ColorIndex = 15;
                        Colorindex = 0;
                    }
                    count2++;
                    tmpid++;
                    count1 = count2;
                    
                   
                    //xlSheet.Cells[tmpid, 1] = dtList.Rows[i]["可簽額"];
                    //xlSheet.Cells[tmpid, 2] = dtList.Rows[i]["戶號"];
                    //xlSheet.Cells[tmpid, 3] = dtList.Rows[i]["戶主名"];
                }
                rowSheet = rowSheet1;
                可簽額 = Convert.ToString(dtList.Rows[i]["可簽額"]);
                戶主名 = Convert.ToString(dtList.Rows[i]["戶主名"]);
            }
            
            num1 += Convert.ToDouble(dtList.Rows[i]["貸款額"].ToString());
            num2 += Convert.ToDouble(dtList.Rows[i]["還款額"].ToString());
            num3 += Convert.ToDouble(dtList.Rows[i]["餘額"].ToString());             xlSheet.Cells[tmpid, 4] = dtList.Rows[i]["借款人"];
            xlSheet.Cells[tmpid, 5] = dtList.Rows[i]["單編號"];             double a = Convert.ToDouble(dtList.Rows[i]["貸款額"].ToString());             double b = Convert.ToDouble(dtList.Rows[i]["還款額"].ToString());
            double c = Convert.ToDouble(dtList.Rows[i]["餘額"].ToString());
            string aStr = "", bStr = "", cStr = "";
            if (a != 0)
            {
                aStr = a.ToString("#,##0.####");
            }
            if (b != 0)
            {
                bStr = b.ToString("#,##0.####");
            }
            if (c != 0)
            {
                cStr = c.ToString("#,##0.####");
            }
            xlSheet.Cells[tmpid, 6] = aStr;
            xlSheet.Cells[tmpid, 7] = bStr;
            xlSheet.Cells[tmpid, 8] = cStr;
            xlSheet.Cells[tmpid, 9] = dtList.Rows[i]["下單號"];
            tmpid = tmpid + 1;
            count2++;
        }         Microsoft.Office.Interop.Excel.Range integral3 = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("A" + count1, "A" + (count2 - 1));
        integral3.MergeCells = true;
        integral3.Value = 可簽額;
        integral3.Font.Size = 16;
        integral3.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;
        integral3.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;         Microsoft.Office.Interop.Excel.Range integral4 = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("B" + count1, "B" + (count2 - 1));
        integral4.MergeCells = true;
        integral4.Value = rowSheet;
        integral4.Font.Size = 16;
        integral4.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;
        integral4.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;         Microsoft.Office.Interop.Excel.Range integral5 = (Microsoft.Office.Interop.Excel.Range)xlSheet.get_Range("C" + count1, "C" + (count2 - 1));
        integral5.MergeCells = true;
        integral5.Value = 戶主名;
        integral5.Font.Size = 16;
        integral5.HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter;
        integral5.VerticalAlignment = Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;         //獲取行
        Microsoft.Office.Interop.Excel.Range rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 1];         rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 1];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 2];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 3];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 4];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 5];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 6];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 7];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 8];
        rg.Interior.ColorIndex = 15;
        rg = (Microsoft.Office.Interop.Excel.Range)xlSheet.Cells[tmpid, 9];
        rg.Interior.ColorIndex = 15;         xlSheet.Cells[tmpid, 1] = "";
        xlSheet.Cells[tmpid, 2] = "";
        xlSheet.Cells[tmpid, 3] = "";
        xlSheet.Cells[tmpid, 4] = "";
        xlSheet.Cells[tmpid, 5] = "合計:";
        xlSheet.Cells[tmpid, 6] = num1.ToString("#,##0.####");
        xlSheet.Cells[tmpid, 7] = num2.ToString("#,##0.####");
        xlSheet.Cells[tmpid, 8] = num3.ToString("#,##0.####");         xlSheet.SaveAs(Server.MapPath(@"\TmpReport\tmp" + time + "1.xls"));
        xlBook.Close();
        xlApp.Quit();
        Response.Expires = 0;         Response.Clear();
        Response.Buffer = true;
        Response.Charset = "utf-8";
        Response.ContentEncoding = System.Text.Encoding.UTF8;
        Response.ContentType = "application/vnd.ms-excel";
        Response.AddHeader("Content-Disposition", "attachment; filename=" + HttpUtility.UrlEncode("每日信貸報告.xls"));
        Response.WriteFile(Server.MapPath(@"\TmpReport\tmp" + time + "1.xls"));
        Response.Flush();
        Response.Clear();     }

個人最近做的最多的重複工作就是excel导出的更多相关文章

  1. Oracle运维 专业的事情交给专业的人来做

    关于Oracle运维的重要性,随便写了几句,放在这儿和大家共勉. Oracle数据库在RDBMS中独占熬头,07年统计其市场份额占关系数据库市场的48.6%稳居首位,而且逐年增加,上升势头强劲.在使用 ...

  2. [原创]浅谈IT人如何做理财规划

    [原创]浅谈IT人如何做理财规划 鱼哥博客上多数写的是技术和管理相关,但很少有理财等话题,今天抽空来谈谈IT人如何做理财规划,如果要想学习理财,我想很有名的“标准普尔家庭资产象限图”上值得每个学习和理 ...

  3. (转)Groupon前传:从10个月的失败作品修改,1个月找到成功 并不挶泥在这个点子上面,它反而往后站一步,看看他们已经做好的这个网站,可以再怎么包装成另一个完完全全不同的网站?所有的人所做的每件失败的事情中, 一定有碰到或含有成功的答案」在里面,只是他们不知道而已。 人不怕失败」,只怕宣布失败」

    (转)Groupon前传:从10个月的失败作品修改,1个月找到成功 今天读到 一个非常励志人心的故事 ,就像现在「叶问」有「前传」,最近很火红的团集购网站Groupon 也出现了「Groupon前传」 ...

  4. 在做excel导出时如何将excel直接写在输出流中

    之前做excel导出时,我都是先将文件写在服务器上,然后再下载下来,后来发现原来可以直接将文件写在输出流里边. 下面是一个小demo: package com.huaqin.fcstrp.util; ...

  5. [ASP.NET] 使用Loading遮罩防止使用者重複點擊

    From: http://www.dotblogs.com.tw/joysdw12/archive/2012/12/13/85629.aspx 前言 在網頁執行中可能會因為資料量大或其他原因影響使用者 ...

  6. 【EXCEL】簡単に重複探し

    下記のような表があって.重複があるかどうか探すのが大変と思いますが. 簡単に重複探す方法を紹介します. Step1.重複を探す(例えこちらでは項目)を選択します. Step2.メニューで 条件付き書式 ...

  7. 平时没有怎么用Excel做 加减乘除 计算,猛地发现,其实Excel 是一个很好的简单计算器

    平时没有怎么用Excel做 加减乘除 计算,猛地发现,其实Excel 是一个很好的简单计算器

  8. SQL Sever 刪除重複數據只剩一條

    use book go create table ##T1( n int, a nvarchar(20) ) --查詢重複記錄,插入臨時表 insert into ##T1(n,a) select s ...

  9. 为啥我做的RFM模型被人说做错了,我错哪了?

    本文转自知乎 作者:接地气的陈老师 ————————————————————————————————————————————————————— 有同学问:“为啥我做的RFM模型被客户/业务部门批斗,说 ...

随机推荐

  1. Vector示例一,二

    #include <iostream> int main(void) { double a[] = {1, 2, 3, 4, 5}; std::cout<<mean(a, 5) ...

  2. ubuntu 安装 rabbitmq-server

    Rabbitmq 是用 erlang 语言写的,所以我们需要安装 Erlang,安装 erlang 又需要安装 python 与 simplejson,所以我们从python开始: 1.安装 pyth ...

  3. poj 1159 (DP LCS)

    滚动数组 + LCS // File Name: 1159.cpp // Author: Missa_Chen // Created Time: 2013年07月08日 星期一 10时07分13秒 # ...

  4. poj 1050(DP)

    最大子矩阵和.类似于子序列最大和. // File Name: 1050.cpp // Author: Missa_Chen // Created Time: 2013年06月22日 星期六 17时0 ...

  5. BZOJ 1415 聪聪和可可

    f[i][j]表示i点追j点的期望步数... 这题必须spfa不能bfs. 且复杂度不会炸(仅1000条边) #include<iostream> #include<cstdio&g ...

  6. OK335xS ethtool 移植

    /******************************************************************* * OK335xS ethtool 移植 * 声明: * 由于 ...

  7. HDU 5340 Three Palindromes (Manacher)

    题意: 判断是否能将字符串S分成三段非空回文串. 思路: 先预处理出前缀回文串和后缀回文串的位置,将位置分别装入两个集合中,O(n). 针对每个前缀回文串的终点位置,挑出不相交的后缀回文串,对中间那段 ...

  8. spm中头动绘图的理解,自带数据集

    1.在得到头动评估的数据基础上,可以汇出头动变化的折线图. 运行本程序需要下载相应的实例数据 headmove_data.txt 头动是fMRI的一个重要问题,该程序画出了某个被试进行扫描时头动的具体 ...

  9. 【英文】Bingo口语笔记(18) - Cover系列

    cover charge 服务费 cover version 翻唱版本 cover the news 头条新闻

  10. crontab 每月最后一天

    0 8 28-31 * * [ `date -d tomorrow +%e` -eq 1 ] && do-something   我觉得能想到这种方法的,都是经验丰富的人.程序员们,想 ...