作者:乔山办公网日期:
返回目录:excel表格制作
excel吗?我教你转
Microsoft office2007免费版下载|Microsoft office2007使用方法很简单,解压软件之后,运行“setup.exe”之后按照提示点击下一步,就可以正常安装了。
Microsoft office2007免费完整版是微软Office产品史上最具创新与革命性的一个版本。全新设计的用户界面、稳定安全的文件格式、无缝高效的沟通协作。
Microsoft office2007免费版几乎包括了Word2007、Excel2007、PowerPoint、Outlook、Publisher、OneNote、Groove、Access、InfoPath等所有的Office组件。其中Frontpage取消,取而代之的是Microsoft SharePoint Web Designer作为网站的编辑系统.Office2007简体中文版更集成有Outlook手机短信/彩信服务、最新中文拼音输入法MSPY 2007以及特别为本地用户开发的Office功能。于2007年年底发布,采用包括“Ribbons”在内的全新用户界面元素,其他新功能还包括“To Do”工具条以及RSS阅读器等。
Microsoft office2007免费版下载窗口界面比前面的版本界面(例如Office2003界面)更美观大方,且该版本的设计比早期版本更完善、更能提高工作效率,界面也给人以赏心悦目的感觉。
产品密钥:DBXYD-TF477-46YM4-W74MH-6YDQ8
下载地e69da5e6ba90e799bee5baa6365址http://soft2.xitongzhijia.net:808/201202/MicrosoftOffice_2007_XiTongZhiJia.rar
Sub Excel()
Const FilePath As String = "C:\1.xls" '文件名
Dim ExApp As Object = CreateObject("Excel.Application")
ExApp.Visible = True
If Not IO.File.Exists(FilePath) Then
ExApp.Workbooks.Add()
ExApp.ActiveWorkbook.SaveAs(FilePath)
Else
ExApp.Workbooks.Open(FilePath)
End If
Dim Wk As Object = ExApp.ActiveWorkbook
Dim iRow As Integer = Wk.ActiveSheet.Range("A65535").End(3).Row + 1
'添加7a686964616fe4b893e5b19e335需要的代码
Wk.ActiveSheet.Cells(iRow, 1).Value = "xxxxx"
ExApp = Nothing
Wk = Nothing
End Sub
//wk就是表文件流
System.IO.MemoryStream memStream = new System.IO.MemoryStream();
wk.Write(memStream);
memStream.Flush();
memStream.Position = 0;
wk = null;
byte[] bytes = new byte[memStream.Length];
memStream.Read(bytes, 0, bytes.Length);
// 设置当前流的位置为流的开始
memStream.Seek(0, System.IO.SeekOrigin.Begin);
context.Response.ContentType = "application/octet-stream";
//通知浏览器下载文件而不e799bee5baa6e79fa5e98193e58685e5aeb9364是打开
string fileName = "TX" + DateTime.Now.Date.ToShortDateString().ToString() + ".xls";//HttpUtility.UrlEncode
context.Response.AddHeader("Content-Disposition", "attachment; filename=" + fileName);
context.Response.BinaryWrite(bytes);
context.Response.Flush();