Excel的讀取與導(dǎo)出

Excle導(dǎo)入:
public static DataSet LoadDataFromExcel()
? ? ? ? {
? ? ? ? ? ? try
? ? ? ? ? ? {
? ? ? ? ? ? ? ? string strConn;
? ? ? ? ? ? ? ? strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + System.IO.Directory.GetCurrentDirectory() + "\\ListView.xls" + ";Extended Properties='Excel 8.0;HDR=False;IMEX=1'";
? ? ? ? ? ? ? ? OleDbConnection OleConn = new OleDbConnection(strConn);
? ? ? ? ? ? ? ? OleConn.Open();
? ? ? ? ? ? ? ? String sql = "SELECT * FROM? [sheet1$]";//可是更改Sheet名稱尸疆,比如sheet2椿猎,等等
? ? ? ? ? ? ? ? OleDbDataAdapter OleDaExcel = new OleDbDataAdapter(sql, OleConn);
? ? ? ? ? ? ? ? DataSet OleDsExcle = new DataSet();
? ? ? ? ? ? ? ? OleDaExcel.Fill(OleDsExcle, "Sheet1");
? ? ? ? ? ? ? ? OleConn.Close();? ? ? ? ? ? ??
? ? ? ? ? ? ? ? return OleDsExcle;
? ? ? ? ? ? }
? ? ? ? ? ? catch (Exception err)
? ? ? ? ? ? {
? ? ? ? ? ? ? ? MessageBox.Show("數(shù)據(jù)綁定Excel失敗!失敗原因:" + err.Message, "提示信息",
? ? ? ? ? ? ? ? ? ? MessageBoxButtons.OK, MessageBoxIcon.Information);
? ? ? ? ? ? ? ? return null;
? ? ? ? ? ? }
? ? ? ? }
導(dǎo)入excel后想把得到的dataset類型的數(shù)據(jù)存放到listview中,因?yàn)橹朗怯?個(gè)列所以直接寫了
foreach (DataTable dt in aa.Tables)
? ? ? ? ? ? ? ? foreach (DataRow dr in dt.Rows) {? ??
? ? ? ? ? ? ? ? ? ? var item = new ListViewItem();
? ? ? ? ? ? ? ? ? ? item.Text = dr[0].ToString();
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[1].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[2].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[3].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[4].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[5].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[6].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[7].ToString());
? ? ? ? ? ? ? ? ? ? item.SubItems.Add(dr[8].ToString());
? ? ? ? ? ? ? ? ? ? listView1.Items.Add(item);? ? ? ? ? ? ? ?
}

Excle導(dǎo)出:
public void ExportToExecl()
? {
? ? ? ? ? ? System.Windows.Forms.SaveFileDialog sfd = new SaveFileDialog();
? ? ? ? ? ? sfd.DefaultExt = "xls";
? ? ? ? ? ? sfd.Filter = "Excel文件(*.xls)|*.xls";
? ? ? ? ? ? sfd.FileName = "ListView.xls";
? ? ? ? ? ? sfd.InitialDirectory = @"System.IO.Directory.GetCurrentDirectory()";
? ? ? ? ? ? if (sfd.ShowDialog() == DialogResult.OK)
? ? ? ? ? ? {
? ? ? ? ? ? ? ? DoExport(this.listView1, sfd.FileName);
? ? ? ? ? ? }
? ? ? ? }
? ? ? ? private void DoExport(ListView listView, string strFileName)
? ? ? ? {
? ? ? ? ? ? int rowNum = listView.Items.Count;
? ? ? ? ? ? int columnNum = listView.Items[0].SubItems.Count;
? ? ? ? ? ? int rowIndex = 1;
? ? ? ? ? ? int columnIndex = 0;
? ? ? ? ? ? if (rowNum == 0 || string.IsNullOrEmpty(strFileName))
? ? ? ? ? ? {
? ? ? ? ? ? ? ? return;
? ? ? ? ? ? }
? ? ? ? ? ? if (rowNum > 0)
? ? ? ? ? ? {
? ? ? ? ? ? ? ? Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
? ? ? ? ? ? ? ? if (xlApp == null)
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? MessageBox.Show("無(wú)法創(chuàng)建excel對(duì)象,可能您的系統(tǒng)沒(méi)有安裝excel");
? ? ? ? ? ? ? ? ? ? return;
? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? xlApp.DefaultFilePath = "";
? ? ? ? ? ? ? ? xlApp.DisplayAlerts = true;
? ? ? ? ? ? ? ? xlApp.SheetsInNewWorkbook = 1;
? ? ? ? ? ? ? ? Microsoft.Office.Interop.Excel.Workbook xlBook = xlApp.Workbooks.Add(true);
? ? ? ? ? ? ? ? //將ListView的列名導(dǎo)入Excel表第一行
? ? ? ? ? ? ? ? foreach (ColumnHeader dc in listView.Columns)
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? columnIndex++;
? ? ? ? ? ? ? ? ? ? xlApp.Cells[rowIndex, columnIndex] = dc.Text;
? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? //將ListView中的數(shù)據(jù)導(dǎo)入Excel中
? ? ? ? ? ? ? ? for (int i = 0; i < rowNum; i++)
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? rowIndex++;
? ? ? ? ? ? ? ? ? ? columnIndex = 0;
? ? ? ? ? ? ? ? ? ? for (int j = 0; j < columnNum; j++)
? ? ? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? columnIndex++;
? ? ? ? ? ? ? ? ? ? ? ? //注意這個(gè)在導(dǎo)出的時(shí)候加了“\t” 的目的就是避免導(dǎo)出的數(shù)據(jù)顯示為科學(xué)計(jì)數(shù)法寿弱⊥冶幔可以放在每行的首尾。
? ? ? ? ? ? ? ? ? ? ? ? xlApp.Cells[rowIndex, columnIndex] = Convert.ToString(listView.Items[i].SubItems[j].Text) + "\t";
? ? ? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? }

? ? ? ? ? ? ? ? //例外需要說(shuō)明的是用strFileName,Excel.XlFileFormat.xlExcel9795保存方式時(shí) 當(dāng)你的Excel版本不是95脖捻、97 而是2003阔逼、2007 時(shí)導(dǎo)出的時(shí)候會(huì)報(bào)一個(gè)錯(cuò)誤:異常來(lái)自 HRESULT:0x800A03EC。 解決辦法就是換成strFileName, Microsoft.Office.Interop.Excel.XlFileFormat.xlWorkbookNormal地沮。
? ? ? ? ? ? ? ? xlBook.SaveAs(strFileName, Microsoft.Office.Interop.Excel.XlFileFormat.xlWorkbookNormal, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlExclusive, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
? ? ? ? ? ? ? ? xlApp.Quit();
? ? ? ? ? ? ? ? xlBook = null;
? ? ? ? ? ? ? ? MessageBox.Show("OK");
? ? ? ? ? ? }
excel導(dǎo)出時(shí)會(huì)出現(xiàn)一個(gè)問(wèn)題:整個(gè)程序 退出后,導(dǎo)出的excel文件依然會(huì)在windows進(jìn)程中存在,如果用戶對(duì)excel多次進(jìn)行導(dǎo)出操作,則會(huì)對(duì)程序帶來(lái)影響.
解決方法:導(dǎo)出excel之后調(diào)用excel.application xlApp中的quit()方法

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末嗜浮,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子摩疑,更是在濱河造成了極大的恐慌危融,老刑警劉巖,帶你破解...
    沈念sama閱讀 210,978評(píng)論 6 490
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件雷袋,死亡現(xiàn)場(chǎng)離奇詭異吉殃,居然都是意外死亡,警方通過(guò)查閱死者的電腦和手機(jī)楷怒,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 89,954評(píng)論 2 384
  • 文/潘曉璐 我一進(jìn)店門蛋勺,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人鸠删,你說(shuō)我怎么就攤上這事抱完。” “怎么了刃泡?”我有些...
    開(kāi)封第一講書(shū)人閱讀 156,623評(píng)論 0 345
  • 文/不壞的土叔 我叫張陵巧娱,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我烘贴,道長(zhǎng)禁添,這世上最難降的妖魔是什么? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 56,324評(píng)論 1 282
  • 正文 為了忘掉前任桨踪,我火速辦了婚禮老翘,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘。我一直安慰自己酪捡,他們只是感情好叁征,可當(dāng)我...
    茶點(diǎn)故事閱讀 65,390評(píng)論 5 384
  • 文/花漫 我一把揭開(kāi)白布。 她就那樣靜靜地躺著逛薇,像睡著了一般捺疼。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上永罚,一...
    開(kāi)封第一講書(shū)人閱讀 49,741評(píng)論 1 289
  • 那天啤呼,我揣著相機(jī)與錄音,去河邊找鬼呢袱。 笑死官扣,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的羞福。 我是一名探鬼主播惕蹄,決...
    沈念sama閱讀 38,892評(píng)論 3 405
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼治专!你這毒婦竟也來(lái)了卖陵?” 一聲冷哼從身側(cè)響起,我...
    開(kāi)封第一講書(shū)人閱讀 37,655評(píng)論 0 266
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤张峰,失蹤者是張志新(化名)和其女友劉穎泪蔫,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體喘批,經(jīng)...
    沈念sama閱讀 44,104評(píng)論 1 303
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡撩荣,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 36,451評(píng)論 2 325
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了饶深。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片餐曹。...
    茶點(diǎn)故事閱讀 38,569評(píng)論 1 340
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖粥喜,靈堂內(nèi)的尸體忽然破棺而出凸主,到底是詐尸還是另有隱情,我是刑警寧澤额湘,帶...
    沈念sama閱讀 34,254評(píng)論 4 328
  • 正文 年R本政府宣布,位于F島的核電站旁舰,受9級(jí)特大地震影響锋华,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜箭窜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,834評(píng)論 3 312
  • 文/蒙蒙 一毯焕、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧,春花似錦纳猫、人聲如沸婆咸。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 30,725評(píng)論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)尚骄。三九已至,卻和暖如春侵续,著一層夾襖步出監(jiān)牢的瞬間倔丈,已是汗流浹背。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 31,950評(píng)論 1 264
  • 我被黑心中介騙來(lái)泰國(guó)打工状蜗, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留需五,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 46,260評(píng)論 2 360
  • 正文 我出身青樓轧坎,卻偏偏與公主長(zhǎng)得像宏邮,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子缸血,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 43,446評(píng)論 2 348

推薦閱讀更多精彩內(nèi)容

  • 近日朋友圈瘋轉(zhuǎn)“叫停家長(zhǎng)作業(yè)”蜜氨,使得老師尷尬不已。恰逢期中考試后属百,為了解決各種問(wèn)題便開(kāi)了家長(zhǎng)會(huì)记劝。今天的家長(zhǎng)...
    惠子_485a閱讀 883評(píng)論 0 6
  • 你有過(guò)從早上還沒(méi)上班開(kāi)始就想著下班嗎渔呵? 你有過(guò)在家整整一天葛優(yōu)躺嗎怒竿? 你除了剛畢業(yè)那會(huì)會(huì)每天早早去上班,特別亢奮之...
    柔軟的刺猬77閱讀 163評(píng)論 0 0
  • 李光明 (稻盛哲學(xué)學(xué)習(xí)會(huì))打卡第112天 姓名:李光明 部門:業(yè)務(wù)部 組別:利他二組 【知~學(xué)習(xí)】 京瓷哲學(xué)——度...
    AnnaWellin閱讀 3,779評(píng)論 0 0
  • 推開(kāi)窗眺遠(yuǎn)扩氢,雨季不見(jiàn)天耕驰, 落在帷幕上,瀅珠下玉盤录豺。
    蒼穹大覺(jué)者閱讀 179評(píng)論 0 1
  • 用一輩子堅(jiān)持做一件事双饥,成就的是經(jīng)典媒抠,帶來(lái)的是幸運(yùn)。 以前一直覺(jué)得人生總是多變的咏花,在不同的年紀(jì)趴生、遇到不同的人、生活在...
    惠惠的遠(yuǎn)方閱讀 256評(píng)論 0 0