文档库 最新最全的文档下载
当前位置:文档库 › C操作EXCEL全解代码共11页文档

C操作EXCEL全解代码共11页文档

C操作EXCEL全解代码共11页文档
C操作EXCEL全解代码共11页文档

C#操作EXCEL全解(代码)

提示:运行之前必须先引用Interop.Excel.dll模块

using System;

using System.Collections.Generic;

using System.Text;

using System.Data;

using System.Data.OleDb;

using System.Windows.Forms;

using System.Reflection;

using Excel;

namespace AnalysisSystem.DB

public class ExcelOperation

private string _fileName;//保存路径名

public ExcelOperation(string fileName)

_fileName = fileName;

private OleDbConnection GetConnection()

string connectString = string.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source={0};Extended Properties=Excel 8.0",_fileName);

OleDbConnection myConn = new OleDbConnection(connectString);//建立链接

return myConn;

public System.Data.DataTable ExecuteTableResult(string strSql)

System.Data.DataTable dt = new System.Data.DataTable();

try

OleDbConnection conn = this.GetConnection();

OleDbDataAdapter da = new OleDbDataAdapter(strSql, conn);//执行相关SQL语句

da.Fill(dt);

catch (System.Exception ex)

//do nothing

return dt;

public DataSet ExecuteSetResult(string strSql,string table_name)

DataSet ds = new DataSet();

string temp_name = "[" + table_name + "$]";

try

OleDbConnection conn = this.GetConnection();

OleDbDataAdapter da = new OleDbDataAdapter(strSql, conn);

da.Fill(ds,temp_name);

//do nothing

return ds;

public string ExecuteOneResult(string strSql)

string result = "";

System.Data.DataTable dt = new System.Data.DataTable();

try

OleDbConnection conn = this.GetConnection();

OleDbDataAdapter da = new OleDbDataAdapter(strSql, conn);

da.Fill(dt);

catch (System.Exception ex)

//do nothing

if (dt != null && dt.Rows.Count > 0)

result = dt.Rows[0][0].ToString();

return result;

public void ExecuteNonResult(string strSql)

try

OleDbConnection conn = this.GetConnection();

OleDbCommand cmd = new OleDbCommand(strSql, conn); cmd.ExecuteNonQuery();

//do nothing

private _Workbook W_B(Excel.Application app)

Workbooks workbooks = app.Workbooks;

_Workbook workbook = workbooks.Add(XlWBATemplate.xlWBATWorksheet);

return workbook;

private _Worksheet W_S(_Workbook work_book)

Sheets sheets = work_book.Worksheets;

_Worksheet worksheet = (_Worksheet)sheets.get_Item(1);//获取选择第一个表,本身默认名称为Sheet1

return worksheet;

//从DataGridView中导出数据到Excel表,单表导出

public void Excel_out(DataGridView dataGridView1)

//建立Excel对象

Excel.Application app = new Excel.Application();

try

_Workbook workbook = this.W_B(app);

_Worksheet worksheet = this.W_S(workbook);

string sLen = "";

//取得最后一列列名

char H = (char)(64 + dataGridView1.ColumnCount / 26);

char L = (char)(64 + dataGridView1.ColumnCount % 26);

if (dataGridView1.ColumnCount < 26)

sLen = L.ToString();

else

sLen = H.ToString() + L.ToString();

//标题

string sTmp = sLen + "1";

Range ranCaption = worksheet.get_Range(sTmp, "A1");

string[] asCaption = new string[dataGridView1.ColumnCount];

for (int i = 0; i < dataGridView1.ColumnCount; i++) asCaption[i] = dataGridView1.Columns[i].HeaderText;

ranCaption.Value2 = asCaption;

//数据

object[] obj = new object[dataGridView1.Columns.Count];

for (int r = 0; r < dataGridView1.RowCount - 1; r++)

for (int l = 0; l < dataGridView1.Columns.Count; l++)

if (dataGridView1[l, r].ValueType == typeof(DateTime))

obj[l] = dataGridView1[l, r].Value.ToString();

else

obj[l] = dataGridView1[l, r].Value;

string cell1 = sLen + ((int)(r + 2)).ToString();

string cell2 = "A" + ((int)(r + 2)).ToString(); Range ran = worksheet.get_Range(cell1, cell2);

ran.Value2 = obj;

//保存

workbook.SaveCopyAs(this._fileName);

workbook.Saved = true;

finally

//关闭

https://www.wendangku.net/doc/1511885632.html,erControl = false;

app.Quit();

///

/// 多表导出

///

/// DataGridView列表集合

/// 表名称集合

public void Excel_out_MulTable(List dataGridView, string[] TableList)

//建立Excel对象

Excel.Application app = new Excel.Application();

try

Workbooks workbooks = app.Workbooks;//定义一个工作簿集合

_Workbook workbook = workbooks.Add(XlWBATemplate.xlWBATWorksheet);//向工作簿添加一个新工作簿

Sheets sheets = workbook.Worksheets;//定义一个工作表集合

_Worksheet worksheet ;

int wnumber = 0;

while (wnumber++ < (TableList.GetLength(0) - 1)) sheets.Add(Missing.Value, Missing.Value, Missing.Value, Missing.Value);//向一个工作表集合添加一个新工作表

/*提醒:Missing类为命名空间System.Reflection中的类,所以记得引入*/

wnumber = 0;

foreach (DataGridView dataGridView1 in dataGridView)

worksheet = null;

worksheet = (_Worksheet)sheets.get_Item(wnumber + 1);//取出需要进行操作的工作表

https://www.wendangku.net/doc/1511885632.html, = TableList[wnumber];//设置改工作表名称

if (wnumber != 0)

sheets.Select(wnumber);//选中操作表

string sLen = "";

//取得最后一列列名

char H = (char)(64 + dataGridView1.ColumnCount / 26);

char L = (char)(64 + dataGridView1.ColumnCount % 26);

if (dataGridView1.ColumnCount < 26)

sLen = L.ToString();

else

sLen = H.ToString() + L.ToString();

//标题

string sTmp = sLen + "1";

Range ranCaption = worksheet.get_Range(sTmp, "A1");

string[] asCaption = new string[dataGridView1.ColumnCount];

for (int i = 0; i < dataGridView1.ColumnCount; i++)

asCaption[i] = dataGridView1.Columns[i].HeaderText;

ranCaption.Value2 = asCaption;

//数据

object[] obj = new object[dataGridView1.Columns.Count];

for (int r = 0; r < dataGridView1.RowCount - 1; r++)

for (int l = 0; l < dataGridView1.Columns.Count; l++)

if (dataGridView1[l, r].ValueType == typeof(DateTime))

obj[l] = dataGridView1[l,

r].Value.ToString();

else

obj[l] = dataGridView1[l, r].Value;

string cell1 = sLen + ((int)(r + 2)).ToString();

string cell2 = "A" + ((int)(r + 2)).ToString();

Range ran = worksheet.get_Range(cell1, cell2);//设置单元格

ran.Value2 = obj;

wnumber++;

//保存

workbook.SaveCopyAs(this._fileName);

workbook.Saved = true;

finally

//关闭

https://www.wendangku.net/doc/1511885632.html,erControl = false;

app.Quit();

资料引用:http://knowsky/540655.html

希望以上资料对你有所帮助,附励志名言3条:

1、有志者自有千计万计,无志者只感千难万难。

2、实现自己既定的目标,必须能耐得住寂寞单干。

3、世界会向那些有目标和远见的人让路。

vfp直接读取EXCEL文件示例

vfp直接读取EXCEL文件示例 vfp直接读取EXCEL文件的示例(转)。 M_File=GETFILE('xls','订单文件') IF M_File="" =MESSAGEBOX("请选择待导入的收订单文件!",0+48,"提示") RETURN ELSE IF JUSTEXT(M_FILE)#"XLS" &&获得文件扩展名 =MESSAGEBOX("您选择的不是EXCEL文档!",0+48,"提示") RETURN ENDIF ENDIF USE 图书订单表 ZAP myexcel=createobject('excel.application') &&创建一个对象 myexcel.visible=.f.&&不可见 bookexcel=myexcel.workbooks.open(M_File) &&打开指定文件 o_SheetName=https://www.wendangku.net/doc/1511885632.html,&&获取当前激活工作表的名称UsedRange =bookexcel.worksheets(o_SheetName).UsedRange&&返回工作表中可使用的区域,UsedRange表的属性 o_rows=UsedRange.rows.count&&汇总行 o_cols=UsedRange.columns.count&&汇总列 IF o_rows<=1 =MESSAGEBOX("待导入数据行数太少,请检查!",0+16,"提示") ELSE FOR i=2 TO o_rows m1=myexcel.cells(i,1).value &&书号 m2=myexcel.cells(i,2).value &&书名 m3=myexcel.cells(i,3).value &&出版社 m4=myexcel.cells(i,4).value &&作者 m5=myexcel.cells(i,5).value &&定价 m6=myexcel.cells(i,6).value &&数量 APPEND BLANK REPLACE 书号WITH m1,书名WITH m2,出版社WITH m3,作者WITH m4,定价WITH m5,数量WITH m6 ENDFOR ENDIF myexcel.workbooks.close&&关闭工作区 myexcel.quit&&关闭excel brow

Excel电子表格中的数据处理(教案)

电子表格中的数据处理(教案) 教学科目:计算机应用基础授课人:何庆宇 教学地点:4号机房(四楼)教学对象:机电1201班 教学课题:电子表格中的数据处理教学时数: 2课时(两节连上)教学目标 一、知识目标 1、掌握并熟练的运用一般的函数公式; 2、掌握基本的数据排序功能,了解复杂的排序操作; 3、掌握数据的自动筛选,能对数据进行简单的筛选; 4、掌握数据的高级筛选。 二、能力目标 1、培养学生自主学习、协作学习的能力; 2、培养学生的动手操作、综合实践的能力; 3、培养学生的信息处理能力。 三、德育目标 培养学生尊重科学、应用科学的意识。 教学重点: 1、数据处理中的公式应用 2、基本的数据排序 3、数据的自动筛选和高级筛选 教学难点: 1、数据的复杂排序 2、数据的多条件自动筛选 3、数据的高级筛选 教学方法:演示教学法、实践教学法、任务驱动法 教学过程: [复习引入]

前面我们已经学习了对电子表格的行列、单元格格式、表格边框线、批注、打印标题等的设置,这些都是针对工作簿的基本操作,而接下来我们要学习的是如何对电子表格中的数据进行处理。今天我们先来学习掌握公式应用、数据排序、数据的自动筛选和高级筛选这四个基本操作。 [讲授新课] (一)应用公式 1.常用函数公式 ①求和 ②平均值 ③计数 ④最大值 ⑤最小值 2.公式的创建 老师:结合教材中的例子7.1,通过教学平台中的广播软件向学生演示在电子表格教学课件7-1的sheet1中创建公式的过程,边讲边操作。 求和公式——演示步骤: (1)单击需要填充内容的单元格; (2)单击编辑栏中的倒三角按钮,选择“求和”后,选取所要求和的数据区域,按下enter键。 注意:当我们选取单元格区域C2:G3(如图:)时,Excel会默认所选取行区域的最后一个空白单元格作为放置接下来操作所得数据的位置,单击快捷编辑栏中的倒三角按钮,在下拉菜单中选取“求和”,此时出现的效果和上述是一样。 求平均值——演示步骤: (1)单击需要填充内容的单元格,如右图所示 (2)单击编辑栏中的倒三角按钮,选择“平均值”后,选取所要 求平均值的数据区域,按下enter键。 老师:请学生在电子表格7-1的sheet1中演示求和与求平均值的步

在VFP中直接来控制Excel

Example: SET DEFAULT TO c:\ clear oleapp=createobject("excel.application") oleapp.visible=.t. && 显示Excel oleapp.workbooks.add **设单元格的值(报表标题): oleapp.cells(1,1).value="aaa" oleapp.cells(1,2).value="bbb" oleapp.cells(1,3).value="ccc" oleapp.cells(1,4).value="ddd" oleapp.cells(1,5).value="eee" **打开表并取得记录数 USE c:\bank\data\zyb.dbf SHARED jl=reccount()-1 &&记录数 **将表中的记录数据放到Excel工作簿的单元格中 for i=0 to jl go i+1 &&第i+1条记录 oleapp.cells(2+i,1).value=zyb.bh oleapp.cells(2+i,2).value=zyb.xm oleapp.cells(2+i,3).value=zyb.kl oleapp.cells(2+i,4).value=1+1 endfor oleapp.activeworkbook.saveas("C:\Documents and Settings\Administrator\桌面\KL.xls") * oleapp.activeworkbook.saveas(?) ********************************************************* 利用VFP进行处理数据,而利用Excel的预览打印功能进行报表打印。这就需要我们在VFP中直接来控制Excel。下面就在开发VFP应用项目时对Excel的控制作一下介绍: 1.创建Excel对象 eole=CREATEOBJECT(′Excel.application′) 2.添加新工作簿 eole.Workbooks.add 3.设置第3个工作表为激活工作表 eole.Worksheets(″sheet3″).Activate 4.打开指定工作簿 eole.Workbooks.Open(″c:\temp\ll.x ls″) 5.显示Excel窗口 eole.visible=.t. 6.更改Excel标题栏 eole.Caption=″VFP应用程序调用Microsoft Excel″ 7.给单元格赋值 eole.cells(1,4).value=XM(XM为数据库字段名) 8.设置指定列的宽度(单位:字符个数)

Excel电子表格

四、Excel电子表格 1、在Excel 2010中,数据源发生变化时,相应的图表______。 A、自动跟随变化 B、需要人为修改 C、不跟随变化 D、不受任何影响 标准答案:A 2、在Excel2010的图表中,水平X轴通常用来作为________。 A、排序轴 B、分类轴 C、数值轴 D、时间轴 标准答案:B 3、在Excel 2003图表中,通常使用垂直Y轴作为______。 A、公式轴 B、数值轴 C、分类轴 D、文本轴 标准答案:B 4、Exce12010中的电子工作表具有______。 A、一维结构 B、二维结构 C、三维结构 D、树结构 标准答案:B 5、用来给电子工作表中的列标进行编号的是_______。 A、数字 B、英文字母 C、文本 D、任息字符 标准答案:B 6、在Excel 2010中,单元格名称的表示方法是_______。 A、列标在前行号在后 B、行号在前列标在后 C、只包含列标 D、只包含行号 标准答案:A 7、Exce12010的每个工作表中,最小操作单元是______。 A、单元格 B、一行 C、一列 D、一张表 标准答案:A 8、用来给单子工作表中的行号进行编号的是______。 A、数字 B、字母 C、数字与字母混合 D、字母或数字 标准答案:A 9、在一个Excel 2010的工作表中,第5列的列标为______。 A、C B、D C、E D、F 标准答案:C 10、若一个单元格的地址为F5,则其右边紧邻的一个单元格的地址为_______。

A、F6 B、G5 C、E5 D、F4 标准答案:B 11、若一个单元格的地址为F5,则其下边紧邻的一个单元格的地址为_________。 A、F6 B、G5 C、E5 D、F4 标准答案:A 12、在Excel2010的自动筛选中,每个标题上的下三角按钮都对应一个________。 A、下拉菜单 B、对话框 C、窗口 D、工具栏 标准答案:A 13、在Excel 2010中,右键单击一个工作表的标签不能够进行_______。 A、插入一个工作表 B、删除一个工作表 C、重命名一个工作表 D、打印一个工作表 标准答案:D 14、在Excel 2010中,若需要删除一个工作表,右键单击它的表标签后,从弹出的菜单列表中选择______。 A、“重命名”选项 B、“插入”选项 C、“删除“选项 D、“工作表标签颜色”选项 标准答案:C 15、当向Exce1 2010工作薄文件中插入一张电子工作表时。表标签中的英文单词为______。 A、Sheet B、Book C、Table D、List 标准答案:A 16、在具有常规格式的单元格中辅入文本后.其显示方式是______。 A、左对齐 B、右对齐 C、居中 D、随机 标准答案:A 17、在Excet2010的单元格格式对话框中,不存在的选项卡是______。 A、货币选项卡 B、数字选项卡 C、对齐选项卡 D、字休选项卡 标准答案:A 18、对电子工作表中所选择的区域不能够进行操作的是______。 A、调整行高尺寸 B、调整列宽尺寸 C、修改条件格式 D、保存文档 标准答案:D 19、在Excel 2010的工作表中,______。 A、行和列都不可以被隐藏 B、只能隐藏行 C、只能隐藏列 D、行和列都可以被隐藏 标准答案:D

电子表格制作简易教程(可编辑修改word版)

电子表格制作简易教程 考虑到咱们部门大多数人没有使用Excel 的相关经验,我在此写一点基础性的做表方法 和心得,做表老手就不用看了。 Excel 其软件 现在的Excel 软件分为微软旗下的“office Excel ”和中国国产的“WPS 表格”。两者大 同小异,且在我看来,WPS 系列软件是office 系列软件的山寨版。不过,我们也不得不承认,WPS 这个山寨货比office 好用。由于本人使用的是WPS 的版本,所以接下来的内容都是以WPS 表格制作为例的。 秘书处所做表的类型 秘书处的电子表只是运用了Excel 软件中非常基础的部分,因此个人认为是非常容易学 习的。我们所做的电子表和常见的数据类电子表不同,我们的多是信息类的表,例如“秘书处联系表”这种。这样以来,电子表的整个“函数”部分我们都不需要接触了,即 基本概念 1.单元格:打开Excel 软件,入眼的一个个格状物,便是一个一个的单元格。从一定的 程度上来讲,每个单元格都是可以看作是一个迷你的文档。 2.先选定后操作:微软几乎所有的软件都是“先选定,后操作”,例如,你要先选择你 要修改的文字,然后才能进行字体大小等等的调整。这一点看起来很傻很基础,但却非常非常重要,很多常做表的人都没有注意到这一点,使得操作更加复杂。 工具栏里的常用按键 ①字体,不解释。 ②字号,即字的大小。 ③字体加粗,多用在标题上。 ④居中,为了表格的美观,我们会让单元格内的内容放在整个单元格的正中间。不过这 个按键往往只能做到“水平居中”而不能“垂直居中”。垂直居中后面再讲。 ⑤自动换行,如图1-1,右边的“性别”二字使用了“自动换行”。在一个 单元格里,按“回车”键是没有换行效果的。很多新手会使用空格达到换行的 目的,这样会使表难以修改。 ⑥合并单元格,这是秘书处的电子表中最最常用的按键。用 法是拖黑多个单元格(即选定),然后点击此按钮(即操作)。如 图1-2,左边的“副部长”使用了“合并单元格”。灵活运用合并 单元格功能是使电子表排版美观的关键。 ⑦边框,后面再着重讲。 ⑧填充颜色,自行尝试。不太常用 ⑨字体颜色,不解释。 ① ② ③ ④ ⑤ ⑥ ⑦ ⑧ ⑨ 1-1 1-2

从SQL Server中导入导出Excel的基本方法

从sql server中导入/导出excel 的基本方法 /*=========== 导入/导出excel 的基本方法===========*/ 从excel文档中,导入数据到sql数据库中,很简单,直接用下面的语句: /*=============================================*/ --假如接受数据导入的表已存在 insert into 表select * from openrowset(microsoft.jet.oledb.4.0 ,excel 5.0;hdr=yes;database=c:test.xls,sheet1$) --假如导入数据并生成表 select * into 表from openrowset(microsoft.jet.oledb.4.0 ,excel 5.0;hdr=yes;database=c:test.xls,sheet1$) /*===========================================*/ --假如从sql数据库中,导出数据到excel,假如excel文档已存在,而且已按照要接收的数据创建好表头,就能够简单的用: insert into openrowset(microsoft.jet.oledb.4.0 ,excel 5.0;hdr=yes;database=c:test.xls,sheet1$) select * from 表 --假如excel文档不存在,也能够用bcp来导成类excel的文档,注意大小写: --导出表的情况 exec master..xp_cmdshell bcp 数据库名.dbo.表名out "c:test.xls" /c -/s"服务器名" /u"用户名" -p"密码" --导出查询的情况 exec master..xp_cmdshell bcp "select au_fname, au_lname from pubs..authors order by au_lname" queryout "c:test.xls" /c -/s"服务器名" /u"用户名" -p"密码" /*--说明: c:test.xls 为导入/导出的excel文档名. sheet1$ 为excel文档的工作表名,一般要加上$才能正常使用. --*/ --上面已说过,用bcp导出的是类excel文档,其实质为文本文档, --要导出真正的excel文档.就用下面的方法

常用电子表格公式

常用电子表格公式 1、查找重复内容公式:=IF(COUNTIF(A:A,A2)>1,"重复","")。 2、用出生年月来计算年龄公式: =TRUNC((DAYS360(H6,"2009/8/30",FALSE))/360,0)。 3、从输入的18位身份证号的出生年月计算公式: =CONCATENATE(MID(E2,7,4),"/",MID(E2,11,2),"/",MID(E2,13,2))。 4、从输入的身份证号码内让系统自动提取性别,可以输入以下公式: =IF(LEN(C2)=15,IF(MOD(MID(C2,15,1),2)=1,"男","女 "),IF(MOD(MID(C2,17,1),2)=1,"男","女"))公式内的“C2”代表的是输入身份证号码的单元格。 1、求和: =SUM(K2:K56) ——对K2到K56这一区域进行求和; 2、平均数: =AVERAGE(K2:K56) ——对K2 K56这一区域求平均数; 3、排名: =RANK(K2,K$2:K$56) ——对55名学生的成绩进行排名; 4、等级: =IF(K2>=85,"优",IF(K2>=74,"良",IF(K2>=60,"及格","不及格"))) 5、学期总评: =K2*0.3+M2*0.3+N2*0.4 ——假设K列、M列和N列分别存放着学生的“平时总评”、“期中”、“期末”三项成绩; 6、最高分: =MAX(K2:K56) ——求K2到K56区域(55名学生)的最高分; 7、最低分: =MIN(K2:K56) ——求K2到K56区域(55名学生)的最低分; 8、分数段人数统计: (1) =COUNTIF(K2:K56,"100") ——求K2到K56区域100分的人数;假设把结果存放于K57单元格; (2) =COUNTIF(K2:K56,">=95")-K57 ——求K2到K56区域95~99.5分的人数;假设把结果存放于K58单元格; (3)=COUNTIF(K2:K56,">=90")-SUM(K57:K58) ——求K2到K56区域90~94.5分的人数;假设把结果存放于K59单元格;

从VFP中导出数据的几种方法

从VFP中导出数据的几种方法 出处:网络 当VFP处理好数据后,这时你可以用多种方法将这些数据导出,以便被其它应用程序(如Excel等)所用。下面向你简单介绍几种导出数据的方法: 1.用“导出数据”对话框。你可以从VFP主菜单中选择“文件/导出…”打开“导出”对话框,在该对话框中的“来源”框中输入表名(c:vfpstudents.dbf),在“类型”中指定要导出数据的类型(Microsoft Excel),在“到”框中输入导出的路径和文件名(C:excelaa.xls),然后按“确定”即可。这时你如果查看command窗口,可发现以下代码: COPY TO C:excelaa.XLS TYPE XL5 2.用COPY TO命令。COPY TO命令的工作对象是VFP中的表,它要依据“TYPE”项才知道要产生哪一类导出文件。对于上面的导出过程,可用以下方法实现:USE students COPY TO C:excelaa.XLS TYPE XL5 3.用SET ALTERNATE TO写入ASCⅡ文件。用该命令可以把屏幕上的内容导出,导向一个文件,下面例子可以将系统状态输入到status.txt文件中: SET ALTERNATE TO status.txt SET ALTERNATE ON SET CONSOLE OFF ?“系统状态”+DTOC(DATE())+“@”+TIME() LIST STATUS SET ALTERNATE OFF SET CONSOLE ON 4.用SET PRINTER TO命令。用该命令可把打印输出到文本文件中: SET PRINTER TO hello.txt SET PRINT ON ???CHR(27)+“广大计算机爱好者” ??“你们好!” ?“祝你们新年快乐” SET PRINT OFF 5.用REPORT FORM TO FILE命令。运行报表的REPORT命令有许多选项,把报表输出保存到文件中的方法为: REPORT FORM(报表名)TO FILE(文件名)

VFP数据导出到EXCEL技术

VFP数据导出到EXCEL技术 VFP数据导出到EXCEL技术 我们都知道在EXCEL 中有很多很多的计算公式、灵活多变的计算方式、方便快捷的图表处理、和功能强大的VBA 语言,可以说EXCEL 可能是最好用的表格处理软件。我敢说:微软的产品中大概就EXCEL 最好! 但是,怎样用Foxpro 快速产生统计表,并将数据送到Excel 表格中,从而代替Foxpro 的报表工具呢? 我们大家都知道,在Visual Foxpro 3.0及以后版本中提供了一个调用Ole Automation 的函数CREATEOBJECT,用该函数可以让Visual Foxpro 很方便的和其它可以提供Ole Automation 服务的程序进行通讯。而Excel 更是一个标准的Ole Automation 服务器程序,我们可以在前端将数据传送到后端的Excel 服务程序,用后端服务程序进行表格处理,从而弥补Visual Foxpro的不足。由于历史原因,我们作报表都习惯用Total、Count、Sum 或者直接在报表中工具中计算,速度最快的大概也就是Total 了,但不知道还有多少人还在坚持使用Total 命令进行计算,有没有更好的计算方法呢?当然有啦!我在实际使用中积累有一定的经验但愿能给各位起到小小的启发。 假设有一表:Table1 是一个人员档案,里面的表结构如下:

-----字段名--类型及长度---------编号C,2 部门C,10 姓名C,10 性别C,2 出生日期 D 职务C,10 文化程度C,10 内容大概如下 TABLE1.DBF ------------------------- --------编号部门姓名性别出生日期职务 文化程度---------------------------------1 工程部张三男1971-01-11 工程师大学本科 2 销售部李四男1967-02-23 经理大学本科 3 工程部王武1954-03-14 技术员大学专科4 总经理室赵洁雅女1975-04-05 秘书硕士研究生5 销售部..1977-05-09 销售经理高中 6 工程部大文 1969-03-30 总工程师大学专科7 销售部..1961-10-10 销售经理大学专科8 总经理室庄稼1961-10-10 总经理大学专科当然实际的数据应该比这里多很多,要不还用统计干吗,我不过是举例说明而已。我不知道你们在使用SQL

简单的excel表格制作

EXCEL表格制作及应用 1、新建一个EXCEL文件:在桌面或任何磁盘里右键——新建——EXCEL。 2、打开文件如下: 3、在打开的EXCEL里点第一格,写表头,写完表头后再在第二行依次写你需要的项目: 在写这些项目时,不要管它格子大小,只要依次在每一个格子里写就可以了。 4、用鼠标选定第二行你所需要的格子,然后往下拖,拖到你想要的行数。

这时,所需要的表格颜色改变,一般为蓝色。 5、鼠标移到工具栏: 点开中的三角,这时会出现许多选项,点击“田”字格,这时就会看到表格发生变化:

这时,把鼠标指向表格最上端A、B之间,鼠标会出现双向箭头,按左键,把格子拖到你需要的大小, 再选中第二行一下的所有表格,鼠标点击工具栏 中这时表格中所有字就会居中了。 6、鼠标选定第一行到表格的最后一格,然后点击工具栏中合并居中。 右键第一行,点击设置单元格格式,

点对齐,把水平对齐和垂直对齐都选为剧中,再确定。这时,表格基本上制作完成。 7、在表格的序号下面第一格写1,第二个写2,鼠标选中1、2,这时把鼠标移到2的右下 角,出现一个加号,按左键往下拖,这时序号就出来了。 8、接下来就是编辑表格了,写入你要写的数据等。当你写入身份证号码时,会出现如下:

把鼠标移到C处,出现向下的一个箭头,点击,这时C列的所有表格将被选中,右键——设置单元格格式——数字——数值。这时把小数位数设为0, 确定即可。 这时,身份证号就出来了。写完出勤天数和月工资,但有的不是满勤,所以工资就不是那么多了,点合计下的那一格(不要双击),输入“=”,鼠标点击月工资下的那一格(如本表格3000,直接写3000也行),再输入“/”(也就是除以,在键盘右下角,也就是“、”号,但这时必须用切换键把它切换成“/”。按一次SHIFT键即可。)再输入本月天数(如31),再输入“*”(也就是SHIFT键加数字8),再点出勤天数那一格(如本表中的30,直接写30也可以)回车(确定)即可。也就是月工资除以那一月的天数得出每天工资,再乘以出勤天数得出那月张三的工资。如图:

怎样制作EXCEL表格

如何制作电子表格 1 、打开EXCL电子表格程序 2、页面设置 单击文件→页面设置→选纸张,设置纸张大小→选页边距,设置上、下、左、右,横向或纵向→单击确定。 3、设置好页面就会有虚线框出现——你在虚线框内编辑——不要超出虚线框外——不然超出部分打印不出来的——第一行一般都是标题行——从第二行或者第三行开始——输入你的资料,不论有多少列,都必须在虚线框内 4、输入完毕后→选中表格内容(标题行一般不选,因为它不需要边框)→点菜单栏“格式”→单元格→边框→外边框——这是为你输入的内容设置边框——还可以在单元格对话框里设置“对齐”方式——一般水平和垂直都设为居中或常规。 注:想要对表格设置的格式几乎都是“格式”菜单里的“单元格”对话框里,你自己打开看看,练习练习就晓得它们的用途了。 * 制作表格更轻松让系统自动生成表头的方法。 当我们制作的表格有好多页的时候(如成绩统计表等),为便于观看,最好是每一页都添加一个相同的表头。如果表格文件页数很少,通过手工的方法就可以很容易地实现。但当一个表格文件多达数十页的时候,再一个一个地逐页添加,不仅费事,还容易出错。那么,有没有办法让系统自动生成呢? 1. 在Word 2003中 打开Word 2003表格文档,选中第一页表的表头,然后点击“表格→标题行重复”。假如表头有两行内容,选中开头两行,这样,在后面的每一页,都会将这两行的内容作为表头。 2.在Excel 2003中 (1)打开Excel表格文档,点击“文件→页面设置”。 (2)在调出的“页面设置”对话框中,选择“工作表”选项卡,在“顶端标题行”栏中输入表头行号,其中,“$1”表示第1行,“$1:$2”表示第1、2行。本例中设置为“$1:$2”,打印出来的每页表格便都有同第1、2两行同样内容的表头。

VFP数据导出到EXCEL技术.

VFP数据导出到EXCEL技术 我们都知道在 EXCEL 中有很多很多的计算公式、灵活多变的计算方式、方便快捷的图表处理、和功能强大的VBA 语言,可以说 EXCEL 可能是最好用的表格处理软件。我敢说:微软的产品中大概就 EXCEL 最好! 但是,怎样用 Foxpro 快速产生统计表,并将数据送到 Excel表格中,从而代替 Foxpro 的报表工具呢? 我们大家都知道,在 Visual Foxpro 3.0及以后版本中提供了一个调用Ole Automation 的函数 CREATEOBJECT,用该函数可以让 Visual Foxpro 很方便的和其它可以提供 Ole Automation 服务的程序进行通讯。而 Excel 更是一个标准的 Ole Automation 服务器程序,我们可以在前端将数据传送到后端的 Excel 服务程序,用后端服务程序进行表格处理,从而弥补 Visual Foxpro的不足。 由于历史原因,我们作报表都习惯用 Total、Count、Sum 或者直接在报表中工具中计算,速度最快的大概也就是 Total 了,但不知道还有多少人还在坚持使用 Total 命令进行计算,有没有更好的计算方法呢?当然有啦!我在实际使用中积累有一定的经验但愿能给各位起到小小的启发。 假设有一表:Table1 是一个人员档案,里面的表结构如下: -----字段名--类型及长度--------- 编号C,2 部门C,10 姓名C,10 性别C,2 出生日期 D 职务C,10 文化程度C,10 内容大概如下 TABLE1.DBF --------------------------------- 编号部门姓名性别出生日期职务文化程度 --------------------------------- 1 工程部张三男1971-01-11 工程师大学本科 2 销售部李四男1967-02-2 3 经理大学本科 3 工程部王武1954-03-1 4 技术员大学专科 4 总经理室赵洁雅女1975-04-0 5 秘书硕士研究生 5 销售部..1977-05-09 销售经理高中 6 工程部大文1969-03-30 总工程师大学专科 7 销售部..1961-10-10 销售经理大学专科 8 总经理室庄稼1961-10-10 总经理大学专科 当然实际的数据应该比这里多很多,要不还用统计干吗,我不过是举例说明而已。我不知道你们在使用 SQL 语句时有没有用使用函数的习惯,反正我是相

EXCEL电子表格的使用方法与技巧

E X C E L电子表格的使用方法 与技巧 本页仅作为文档页封面,使用时可以删除 This document is for reference only-rar21year.March

EXCEL电子表格的使用方法与技巧 1、如何添加快捷按钮区的项目? 单击“视图”→“工具栏”→“X X X” 2、如何打开已有的EXCEL文件? 单击“文件”→“打开”→“文件名”→“确定” 3、如何调整EXCEL表格的栏宽和行高? 4、如何给单元格中输入文字、数字,并设置字形、字体、字号在单元格中的位置? ①按正常的输入方法输入文字。 ②将要设置的单元格处于编辑状态。 ③单击“格式”→“单元格”,出现对话框。 ④单元格对话窗口中。 “对齐”栏,是设定单元格中文字或数字的位置,是居中、靠上、靠下等方式。 “字体”栏,是设定单元格中文字的字体,颜色等。 5、如何设置单元格中数字的小数位数? 说明:有两种方法,一种是先设置后输入,另一种是先输入后设置。 第一种方法操作过程: ①将要输入的数字的所有单元格处理编辑状态。

②单击“格式”→“单元格”→“数字”→“自定义”,出现对话框 ③在对话框的类型栏,选定要设置的小数位数项单击,再单击“确定” 好处:在输入小数数字时,不足的小数位数计算机会自动补齐。 第二种方法操作过程: ①直接输入原始数据。 ②用第一种方法进行设置。 6、如何用自动填充方法进行序列号的设置? ①在序列的第一单元格输入第一个序列号。 ②将所有要输入序列号的单元格处于编辑状态。 ③单击“编辑”→“填充”→“序列”,出现对话框。 ④在对话框的“序列产生在”栏选“行”或“列”,在“类型”栏选“等差序列”或“等比序列”等,在“步长值”栏输入步长值。 ⑤单击“确定”取消编辑。 7、遇到几个,几十个单元格相邻,且内容一样,如何简便输入? ①在该编辑区的第一单元格输入内容。 ②将要输入相同内容的单元格处于编辑状态。

Excel电子表格中的数据处理教案

Excel电子表格中的数据处理教案

电子表格中的数据处理(教案) 教学科目:计算机应用基础授课人:何庆宇 教学地点:4号机房(四楼)教学对象:机电1201班 教学课题:电子表格中的数据处理教学时数: 2课时(两节连上) 教学目标 一、知识目标 1、掌握并熟练的运用一般的函数公式; 2、掌握基本的数据排序功能,了解复杂的排序操作; 3、掌握数据的自动筛选,能对数据进行简单的筛选; 4、掌握数据的高级筛选。 二、能力目标 1、培养学生自主学习、协作学习的能力; 2、培养学生的动手操作、综合实践的能力; 3、培养学生的信息处理能力。 三、德育目标 培养学生尊重科学、应用科学的意识。 教学重点: 1、数据处理中的公式应用 2、基本的数据排序 3、数据的自动筛选和高级筛选

教学难点: 1、数据的复杂排序 2、数据的多条件自动筛选 3、数据的高级筛选 教学方法:演示教学法、实践教学法、任务驱动法教学过程: [复习引入] 前面我们已经学习了对电子表格的行列、单元格格式、表格边框线、批注、打印标题等的设置,这些都是针对工作簿的基本操作,而接下来我们要学习的是如何对电子表格中的数据进行处理。今天我们先来学习掌握公式应用、数据排序、数据的自动筛选和高级筛选这四个基本操作。 [讲授新课] (一)应用公式 1.常用函数公式 ①求和 ②平均值 ③计数 ④最大值 ⑤最小值 2.公式的创建

老师:结合教材中的例子7.1,通过教学平台中 的广播软件向学生演示在电子表格教学课件 7-1的sheet1中创建公式的过程,边讲边操作。求和公式——演示步骤: (1)单击需要填充内容的单元格;(2)单击编辑栏中的倒三角按钮,选择“求和”后,选取所要求和的数据区域,按下enter键。注意:当我们选取单元格区域C2:G3(如图: )时,Excel会默认所选取行区域的最后一个空白单元格作为放置接下来操作所 得数据的位置,单击快捷编辑栏中的倒三角按钮,在下拉菜单中选取“求和”,此时出现的效果和上述是一样。 求平均值——演示步骤: (1)单击需要填充内容的单元格,如右 图所示 (2)单击编辑栏中的倒三角按钮,选 择“平均值”后,选取所要求平均值的数据区域,按下enter键。 老师:请学生在电子表格7-1的sheet1中演示求和与求平均值的步骤。 老师提问学生:还有没有更快捷的方法呢?

VFP全面控制EXCEL(完全版)

1.创建Excel对象 oExcel=Createobject("Excel.application") 2.添加新工作簿 oExcel.Workbooks.Add 3.设置第3个工作表为激活工作表 oExcel.Worksheets("sheet3").Activate 4.打开指定工作簿 oExcel.Workbooks.Open("c:\temp\ll.xls") 5.显示Excel窗口 oExcel.Visible=.T. 6.更改Excel标题栏 oExcel.Caption="VFP应用程序调用Microsoft Excel" 7.给单元格赋值 oExcel.cells(1,4).Value=XM(XM为数据库字段名) 8.设置指定列的宽度(单位:字符个数) oExcel.ActiveSheet.Columns(1).ColumnWidth=5 9.设置指定行的高度(单位:磅) oExcel.ActiveSheet.Rows(1).RowHeight=1&&(设定行高为1磅,1磅=0.035厘米) oExcel.ActiveSheet.Rows("50:100").RowHeight=1 &&设置第50行至100行的高度 10.在第18行之前插入分页符 oExcel.Worksheets("Sheet1").Rows(18).PageBreak=1 11.在第4列之前删除分页符 oExcel.ActiveSheet.Columns(4).PageBreak=0 12.指定边框线宽度(Borders参数如下) ole.ActiveSheet.Range("b3:d3").BorderS(2).Weight=3 13.设置四个边框线条的类型 oExcel.ActiveSheet.Range("b3:d3").BorderS(2).LineStyle=1 (其中Borders参数:1-左、2-右、3-顶、4-底、5-斜、6-斜/;LineStyle值:1与7-细实、2-细虚、4-点虚、9-双细实线) 14.设置页眉 oExcel.ActiveSheet.PageSetup.CenterHeader="报表1" 15.设置页眉(字体大小) oExcel.ActiveSheet.PageSetup.CenterHeader="&50报表1" &&'&'后面的50可以自定义,表示字体的大小 16.设置页脚 oExcel.ActiveSheet.PageSetup.CenterFooter="第&P页" 17.设置页脚(字体大小) oExcel.ActiveSheet.PageSetup.CenterFooter="&28第&P页" &&'&'后面的28可以自定义,表示字体的大小 18.设置页眉到顶端边距为2厘米 oExcel.ActiveSheet.PageSetup.HeaderMargin=2/0.035 19.设置页脚到底边距为3厘米 oExcel.ActiveSheet.PageSetup.FooterMargin=3/0.035

Foxpro 导入文件报错:无效的 Microsoft Excel 文件格式

Foxpro 导入文件报错:"无效的Microsoft Excel 文件格式" 症状:将一个 Microsoft Excel 版本 5.0 文件导入 FoxPro 时出现"无效的 Microsoft Excel 文件格式"错误信息。 症状拓展:如果使用的是 FoxPro 2.0 ,导入 Microsoft Excel 3.0 ,4.0 或 5.0 文件设置格式,则会收到错误信息"无效的 Excel 版本 2.0 文件"。 直接原因:FoxPro 2.0 仅可以导入 Microsoft Excel 2.0 文件。 FoxPro 2.5 for MS-DOS、Windows 和 Macintosh 可以导入 Microsoft Excel 2.0、 3.0 和 4.0 格式中的文件。 溯源:FoxPro 2.5 后,才发布 for MS-DOS 和 Windows 的开发。 FoxPro for Macintosh 是大约同时为 Microsoft Excel 5.0 for Windows 开发的。因此,支持导入 Microsoft Excel 5.0 格式的文件没有内置FoxPro 2.5。 Microsoft 已经确认这是Microsoft 产品中存在的问题并正在研究此问题,当它变得可用时,将发布新的信息的 Microsoft 知识库。 解决方案:要直接导入 Microsoft Excel 5.0 工作表,必须在 Microsoft Excel 中执行变通办法。这些变通办法有:保存 Microsoft Excel 5.0 文件作为一个 Microsoft Excel 4.0、3.0 或 2.0 格式的文件,再执行导入操作。或者将 Microsoft Excel 5.0 文件保存为一个DBF 格式文件。(要点:以 DBF3 文件格式保存;此外,Microsoft Excel 3.0、 4.0 和5.0 可以以 DBF4 文件格式保存文件。)FoxPro 可以打开这些两种文件格式之一。 参考文献: FoxPro for MS-DOS 和 Windows 语言参考,版本 2.5,页 L3-569 和 L3-570 FoxPro for Macintosh 语言参考,版本 2.5,页 468-469 Microsoft Excel 用户指南 1,版本 4.0、 60、 306 和 307 页

VF中控制EXCEL的常用操作

VF中控制EXCEL的常用操作 myexcel=createobject('excel.application') &&创建一个对象 myexcel.visible=.t.&&可见 &&bookexcel=myexcel.workbooks.add bookexcel=myexcel.workbooks.open("C:\Documents and Settings\Administrator\桌面\学习\dd.xls") &&打开指定文件 nrows=bookexcel.worksheets('sheet1')&&打开工作表 UsedRange =https://www.wendangku.net/doc/1511885632.html,edRange&&返回工作表中可使用的区域,UsedRange表的属性 usedrange.columns.count&&计算共几列 r=usedrange.rows.count&&汇总行 c=usedrange.columns.count&&汇总列 with myexcel.application .sheets('sheet3').select .sheets.add&&添加一个工作表 https://www.wendangku.net/doc/1511885632.html, = 'ddddd'&&重命名表 endwith myexcel.Worksheets('sheet1').Activate&&选择表为当前工作表 myexcel.cells(1,1).value='sss'&&1,1处的值为 myexcel.activesheet.columns(2).columnwidth=15&&第2列的列宽设myexcel.activesheet.rows(2).rowheight=50&&设第2行的行高 myexcel.activesheet.rows(2).insert&&第2行前插入一行 myexcel.activesheet.columns(2).insert&&第2列前插入一列 myexcel.activesheet.Cells(1,1).Font.size=25&&设置1,1的字体大小myexcel.activesheet.Cells(1,1)https://www.wendangku.net/doc/1511885632.html,='黑体'&&设置字体 myexcel.activesheet.Cells(1,1).clear&&清除内容 myexcel.activesheet.range('A1:C2').select&&选择区域 myexcel.selection.merge &&选择区域合并单元格 myexcel.Range('a1').Formula='=sum(b2,b3,b4,b5)'&&在A1中键入一个公式 myexcel.range('a1').ClearContents myexcel.activesheet.Columns('A:B').Select&&整列选中 myexcel.Selection.NumberFormatLocal="@" &&设置选中的区域为字符型数据 myexcel.activesheet.rows(1).select myexcel.Selection.EntireRow.Delete&&删除选中的行 myexcel.Selection.columns(1).Delete&&删除第几的列 myexcel.workbooks.close&&关闭工作区

excel电子表格模板

excel电子表格模板 篇一:简单的excel表格制作 EXCEL表格制作及应用 1、新建一个EXCEL文件:在桌面或任何磁盘里右键——新建——EXCEL。 2、打开文件如下: 3、在打开的EXCEL里点第一格,写表头,写完表头后再在第二行依次写你需要的项目: 在写这些项目时,不要管它格子大小,只要依次在每一个格子里写就可以了。 4、用鼠标选定第二行你所需要的格子,然后往下拖,拖到你想要的行数。 这时,所需要的表格颜色改变,一般为蓝色。 5、鼠标移到工具栏: 点开 化: 中的三角,这时会出现许多选项,点击“田”字格,这时就会看到表格发生变 这时,把鼠标指向表格最上端A、B之间,鼠标会出现双向箭头,按左键,把格子拖到你需要的大小, 1 再选中第二行一下的所有表格,鼠标点击工具栏 中这时表格中所有字就会居中了。 合并居中。 6、鼠标选定第一行到表格的最后一格,然后点击工具栏中 右键第一行,点击设置单元格格式,

点对齐,把水平对齐和垂直对齐都选为剧中,再确定。这时,表格基本上制作完成。 7、在表格的序号下面第一格写1,第二个写2,鼠标选中1、2,这时把鼠标移到2的右下 角,出现一个加号,按左键往下拖,这时序号就出来了。 8、接下来就是编辑表格了,写入你要写的数据等。当你写入身份证号码时,会出现如下: 把鼠标移到C处,出现向下的一个箭头,点击,这时C列的所有表格将被选中,右键——设置单元格格式——数字——数值。这时把小数位数设为0,确定即可。 这时,身份证号就出来了。写完出勤天数和月工资,但有的不是满勤,所以工资就不是那么多了,点合计下的那一格(不要双击),输入“=“,鼠标点击月工资下的那一格(如本表格3000,直接写3000也行),再输入“/”(也就是除以,在键盘右下角,也就是“、”号,但这时必须用切换键把它切 2 换成“/”。按一次SHIFT键即可。)再输入本月天数(如31),再输入“*”(也就是SHIFT键加数字8),再点出勤天数那一格(如本表中的30,直接写30也可以)回车(确定)即可。也就是月工资除以那一月的天数得出每天工资,再乘以出勤天数得出那月张三的工资。如图: 篇二:Excel表格实用大全(上) (1).把一个EXCEL的表格按另外一个表格顺序来排列方法 请问怎么把一个EXCEL的表格按另外一个表格顺序来排列, 比方说我们公司,以前有一张表格是旧的,可是新的是打乱了,要用新的表格里面的数据,请问怎么按旧的表格的顺序快速的方法来排列。我们公司用的方法是

相关文档
相关文档 最新文档