Visual Foxpro中如何实现对EXCEL表格的操作
Visual Foxpro中如何实现对EXCEL表格的操作
VFP和Excel都可以用来进行处理数据库表格，如果巧妙地将二者的优点结合起来，将会大大方便我们的工作。比如我们可以利用VFP进行处理数据，而利用Excel的预览打印功能进行报表打印。这就需要我们在VFP中直接来控制Excel。下面就在开发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).LineSty le=1
(其中Borders参数：1－左、2－右、3－顶、4－底、5－斜、6－斜/；LineStyle值：1与7－细实、2－细虚、4－点虚、9－双细实线)
14．设置页眉
oExcel.ActiveSheet.PageSetup.CenterHeader="报表1" 14．设置页眉(字体大小)
oExcel.ActiveSheet.PageSetup.CenterHeader="&50报表1" &&'&'后面的50可以自定义，表示字体的大小15．设置页脚
oExcel.ActiveSheet.PageSetup.CenterFooter="第&P页"
15.设置页脚(字体大小)
oExcel.ActiveSheet.PageSetup.CenterFooter="&28第&P页" &&'&'后面的28可以自定义，表示字体的大小
16．设置页眉到顶端边距为2厘米
oExcel.ActiveSheet.PageSetup.HeaderMargin=2/0.035 17．设置页脚到底边距为3厘米
oExcel.ActiveSheet.PageSetup.FooterMargin=3/0.035 18．设置顶边距为2厘米
oExcel.ActiveSheet.PageSetup.TopMargin=2/0.035 19．设置底边距为4厘米
oExcel.ActiveSheet.PageSetup.BottomMargin=4/0.035 20．设置左边距为2厘米
oExcel.ActiveSheet.PageSetup.LeftMargin=2/0.035 21．设置右边距为2厘米
oExcel.ActiveSheet.PageSetup.RightMargin=2/0.035 22．设置页面水平居中
oExcel.ActiveSheet.PageSetup.CenterHorizontally=.t. 23．设置页面垂直居中
oExcel.ActiveSheet.PageSetup.CenterVertically=.t. 24．设置页面纸张大小(1－窄行8511 39－宽行1411 9:A4)
oExcel.ActiveSheet.PageSetup.PaperSize=1
25．打印单元格网线
oExcel.ActiveSheet.PageSetup.PrintGridlines=.t. 26．拷贝整个工作表
https://www.wendangku.net/doc/bb14770964.html,edRange.Copy
27．拷贝指定区域
oExcel.ActiveSheet.Range("A1:E2").Copy
28．粘贴
oExcel.WorkSheet("Sheet2").Range("A1").PasteSpecial 29．在第2行之前插入一行
oExcel.ActiveSheet.Rows(2).Insert
30．在第2列之前插入一列
oExcel.ActiveSheet.Columns(2).Insert
31．设置字体
oExcel.ActiveSheet.Cells(2,1)https://www.wendangku.net/doc/bb14770964.html,="黑体" 32．设置字体大小
oExcel.ActiveSheet.Cells(1,1).Font.Size=25
33．设置字体为斜体
oExcel.ActiveSheet.Cells(1,1).Font.Italic=.t.
34．设置整列字体为粗体
oExcel.ActiveSheet.Columns(1).Font.Bold=.t.
35．清除单元格公式
oExcel.ActiveSheet.Cells(1,4).ClearContents
36．打印预览工作表
oExcel.ActiveSheet.PrintPreview
37．打印输出工作表
oExcel.ActiveSheet.PrintOut
38.
https://www.wendangku.net/doc/bb14770964.html,mandBars(1).Controls(1).accChild(18).Exe cute &&打印（菜单序号18为Excel2003的‘打印’项）
&&不同版本Excel的菜单序号可以通过以下程序取得
*(需要在VFP7.0以上运行)
oXls=GETOBJECT("","excel.sheet")
XlApp=oXLS.APPLICATION
XlSheet=XlApp.ActiveSheet
bars=https://www.wendangku.net/doc/bb14770964.html,mandBars.COUNT
STR=''
FOR i=1 TO bars
STR=STR+CHR(13)+ALLTRIM(STR(i))+'、'+https://www.wendangku.net/doc/bb14770964.html,mandBars(i).accName+'(NAME:'+xlapp.C ommandBars(i).NAME+'
INDEX:'+ALLTRIM(STR(https://www.wendangku.net/doc/bb14770964.html,mandBars(i).IND EX))+')'
bars2=https://www.wendangku.net/doc/bb14770964.html,mandbars(i).accChildCount
FOR j=1 TO bars2
TRY
obj=https://www.wendangku.net/doc/bb14770964.html,mandbars(i).CONTROLS(j)
STR=STR+CHR(13)+'
'+ALLTRIM(STR(j))+'、'+https://www.wendangku.net/doc/bb14770964.html,mandbars(i).CONTROLS(j).accname+'(ID: '+ALLTRIM(STR(https://www.wendangku.net/doc/bb14770964.html,mandBars(i).CONTROL S(j).ID))+')'
FOR k=1 TO obj.accChildCount
TRY
IF NOT EMPTY(obj.CONTROLS(k).accname )
STR=STR+CHR(13)+'
'+ALLTRIM(STR(k))+'、'+obj.CONTROLS(k).accName+' (ID：'+ ALLTRIM(STR(obj.CONTROLS(k).ID))+')'
ENDIF
CATCH
EXIT
ENDTRY
ENDFOR
CA TCH
EXIT
ENDTRY
ENDFOR
W AIT WINDOWS ALLTRIM(STR(i))+' / '+ALLTRIM(STR(bars))+'
'+STR(i/bars*100,10,2)+'%' NOW AIT
ENDFOR
SA VE TO XLS.txt ALL LIKE STR
MODIFY COMMAND XLS.txt
RETURN
39．工作表另存为
oExcel.ActiveWorkbook.SaveAs("c:\temp\22.xls")
检测当前目录是否有同名的EXCEL表，如果有先删除，再另存
IF !FILE(SYS(5) + CURDIR() + "result.xls")
oExcel.ActiveWorkbook.SaveAs(SYS(5) + CURDIR() + "result.xls")
ELSE
lcFileName = loExcel.GetSaveAsFilename("result", "Excel (*.xls), *.xls")
IF !EMPTY(lcFileName)
IF FILE(lcFileName)
DELETE FILE (lcFileName)
ENDIF
oExcel.ActiveWorkbook.SaveAs(lcFileName)
ENDIF
ENDIF
40．放弃存盘&& 避免出现保存对话框
oExcel.ActiveWorkbook.saved=.t.
41.存盘
oExcel.ActiveWorkbook.save
42．关闭工作簿
oExcel.Workbooks.close
43．退出Excel
oExcel.quit
RELEASE oExcel &&只有释放对象变量, EXCEL进程才会完全关闭
44．合并单元格
oExcel.ActiveSheet.Range("A4:B5").MergeCells=.t. 45．下列设置大家自己理解
With crfole.ActiveSheet.PageSetup
.LeftHeader = chr(13)+"左页眉"
.CenterHeader = "中页眉"
.RightHeader = "右页眉"
.LeftFooter = "左页脚"
.CenterFooter = "中页脚"
.RightFooter = "右页脚"
.orientation=1 &&1竖排，2横排
EndWith
With crfole.Range("A4:C4")
.MergeCells = .t.
.WrapText =.f.
.Orientation = 0
.AddIndent =.f.
.ShrinkToFit = .f.
EndWith
46．文本对齐
oExcel.range("A4:c4").HorizontalAlignment =1 &&水平(1-默认、2-靠左、3-居中、4-靠右、5-填充、6=两端对齐、7=跨列居中、8=分散对齐)
oExcel.range("A4:c4").VerticalAlignment =2 &&垂直(1=靠上、2=居中、3=靠下、4=两端对齐、5=分散对齐)
47．拷贝整个工作表（含格式）
oExcel.activesheet.cells.copy &&拷贝oExcel.sheets(1).select &&选择第一工作表
oExcel.ActiveSheet.Paste &&粘贴oExcel.ActiveSheet.Cells(3,4).value && ActiveSheet 为当前的Sheet工作薄名字，Cells(3,4).value 为第3行第4列的值
以上控制调用语句在中文VFP5.0企业版下运行通过，运行环境为Excel 97及中文Windows 98
48. 显示某个单元格的批注内容
oExcel=CREATEOBJECT("Excel.application") oExcel.Workbooks.OPEN("d:\TEST\testa.xls") oExcel.VISIBLE=.T.
?oExcel.Range("B5").Comment.Text &&显示B5单元格的批注内容
oExcel.Workbooks.CLOSE
oExcel.QUIT
RELEASE oExcel
49.oExcel.ActiveSheet.PageSetup.PrintTitleRows="$1: $1" &&每页都打印行标头（每页顶部出现的单元格的行）
50.保护工作表：
oExcel.ActiveSheet.PROTECT('密码',.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.,.T.)
51.保护工作薄
oExcel.ActiveWorkbook.PROTECT('密码',.T.,.T.)
第一个.T.：保护工作簿结构第二个.T.：保护工作簿窗口
52.设置允许用户编辑区域
oExcel.ActiveSheet.Protection.AllowEditRanges.Add("区域3",oExcel.ActiveSheet.Range("A2:D5"))
53.如果不想在宏运行时被无穷无尽的提示和警告消息所困扰，就将本属性设置为.F.
oExcel.DisplayAlerts = .F.
如果不想在宏运行时被无穷无尽的提示和警告消息所困扰，就将本属性设置为False；这样每次出现需用户应答的消息时，Microsoft Excel 将选择默认应答。
如果将本属性设置为False，那么宏运行结束后，Microsoft Excel 并不自动将其设置回True。故当宏运行结束后，都应将本属性设置回True 值。
54.将当前工作表中的已用区域（只读）存入数组。strPath='D:\TEST\123.xls'
LOCAL oExcel
oExcel=CREATEOBJECT("Excel.Application") oExcel.WorkBooks.OPEN(strPath)
arrTableInfo=https://www.wendangku.net/doc/bb14770964.html,edRange.V ALUE &&将当前工作表中的已用区域（只读）存入数组。oExcel.QUIT
RELEASE oExcel
INSERT INTO 表名FROM arrTableInfo
55.设置excel批注的字体(excel 2000实现了，如下：) ole.Range("a3").Comment.Shape.Select && 此命令要求批注的Visible=.t.
ole.selection.Font.size=9
https://www.wendangku.net/doc/bb14770964.html,="黑体"
ole.selection.Font.bold=.f.
注：该组命令要求先选中批注框，否则写成ole.Range("a3").Comment.Shape.Font.size=9 则出错，不知为何！
--------------------------------------------------------------
如何取得当前EXCEL表中工作表的数目及各工作表的名称？
CLEAR
LOCAL lnSheetCount
oExcel=CREATEOBJECT("EXCEL.APPLICATION") &&创建Excel对象
oExcel.WORKBOOKS.OPEN("c:\111\321.xls")
&&打开指定工作簿
WITH oExcel
lnSheetCount=.WorkBooks(1).Sheets.Count &&统计工作表数量
ENDWITH
?'当前EXCEL表中工作表的数目为：
'+ALLTRIM(STR(lnSheetCount))
FOR EACH oMyVar IN oExcel.sheets
?'当前EXCEL表中工作表的名称分别为'+https://www.wendangku.net/doc/bb14770964.html, &&显示Excel表中所有工作表NEXT oMyVar
oExcel.WORKBOOKS.CLOSE &&关闭工作簿oExcel.QUIT &&退出Excel
--------------------------------------------------------------
获取工作表名称
在以下示例中，创建了一个microsoft excel 实例，添加了一个新的工作簿。使用foreach 语句显示工作簿中每个工作表的名称。此示例要求在运行示例的机器上正确安装microsoft excel。
oExcel = CREATE("Excel.Application")
oExcel.Workbooks.ADD
FOR EACH oMyVar IN oExcel.sheets
? https://www.wendangku.net/doc/bb14770964.html,
NEXT oMyVar
-------------------------------------------------------------- Excel报表巧生成
巧让FoxPro数据生成Excel报表
Visual FoxPro是应用广泛的前台数据库开发平台之一，因此在我们日常工作中时常会遇到DBF数据文件。然而随着办公自动化的普及，越来越多的时候需要将DBF文件转化为Excel电子文档。常用转化方法是在FoxPro中用Copy命令进行格式转化或直接用Excel打开DBF文件。这两种方式虽然都能达到目的，却不能得到格式规范、可以直接打印输出的报表，且输出的Excel文件中，无法对数据类型进行有效转换，极易出现数据统计错误。有没有更好的方法呢？这里有一个更加通用的方法，在VFP中调用Excel，可以由DBF文件直接生成格式如下图所示一样复杂的Excel报表(如图1)。Excel报表
具体过程如下：
编辑推荐文章
●新鲜接触Excel 2000 XP
●Excel 2000公式应用的几条经验
●Excel 2000函数应用之信息函数
假设我们要将表Agcallop.dbf文件输出为Excel 格式文档，报表形如图1所示。为使通用性更强，页面采用A4纸横向输出，默认字体为宋体10号，页脚处添加页号。
部分程序代码如下：
m.outfilename=putfile('输出结果','agcallop','xls')
&&取导出文件名称
ef=CREA TEOBJECT('Excel.application')
&&调用Excel程序ef.Workbooks.add
&&添加工作簿
ef.Worksheets("sheet1").Activate
&&激活第一个工作表
ef.visible=.t.
&&显示Excel界面
ef.Cells.Select
&&选择整张表
ef.Selection.Font.Size = 10
&&设置整表默认字体大小为10
select 0
use agcallop
&&选择被导出的表
num=reccount()
&&求导出总记录数
go top
i=5
ef.range("F1:K1").Select
&&选择标题栏所在单元格
ef.Selection.Merge
&&合并单元格
with ef.range("F1 ")
&&设置标题及字体属性
.value='客户服务部业务代表工作量情况统计表'
https://www.wendangku.net/doc/bb14770964.html,="黑体"
.Font.size=18
endwith
ef.Rows(2).RowHeight=1/0.035
&&设置第二行高度为1cm
ef.range("H2:O2").Select
&&选定统计条件栏所在单元格
ef.Selection.Merge
&&合并单元格
ef.range("H2").Font.size=10
ef.range("H2").HorizontalAlignment=4
&&设置内容对齐方式为右对齐,3为居中，4为右对齐
ef.range("H2").value='统计时间：'+dtoc(date())+' 打印日期：'+dtoc(date())
ef.Rows("3:4").Select
with ef.Selection
.HorizontalAlignment = 3
&&设置3、4行为水平对齐
.VerticalAlignment = 2
&&垂直居中
.NumberFormatLocal = "@"
&&设置3、4行为字符型内容
endwith
ef.Range("A3:A4").Select
ef.Selection.Merge
&&纵向合并第一列3、4行
ef.Range("A3").value='工号'
&&设置第一列标题内容
ef.Columns("A").Select
&&整列选择
ef.Selection.HorizontalAlignment = 3
&&水平居中
ef.Columns("A:B").Select
ef.Selection.NumberFormatLocal = "@"
&&设置A、B列为字符型内容
ef.Range("B3:B4").Select
ef.Selection.Merge
&&纵向合并第二列3、4行
ef.Range("B3").value='姓名'
&&设置第二列标题内容
ef.Columns("B").Select
&&整列选择
ef.Selection.HorizontalAlignment = 3
&&水平居中
ef.Range("C3:E3").Select
&&横向合并第三行C-E列
ef.Selection.Merge
ef.Range("C3").value='话务总量'
&&第三行大标题为“话务总量”的列
ef.Range("C4").value='电话呼入量'
&&“话务总量”下第1个小标题“电话呼入量”ef.Range("D4").value='电话呼出量'
&&“话务总量”下第2个小标题“电话呼出量”ef.Range("E4").value='合计'
&&“话务总量”下第3个小标题“合计”
ef.Range("F3:H3").Select
ef.Selection.Merge
ef.Range("F3").value='话务总时间'
ef.Range("F4").value='呼入时间'
ef.Range("G4").value='呼出时间'
ef.Range("H4").value='合计'
ef.Range("I3:K3").Select
ef.Selection.Merge
ef.Range("I3").value='单个话务平均时间'
ef.Range("I4").value='呼入时间'
ef.Range("J4").value='呼出时间'
ef.Range("K4").value='合计'
ef.Range("L3:L4").Select
ef.Selection.Merge ef.Range("L3").value='累计工作时间'
ef.Range("M3:M4").Select
ef.Selection.Merge
ef.Range("M3").value='无效时间'
ef.Range("N3:N4").Select
ef.Selection.Merge
ef.Range("N3").value='录入量'
ef.Range("O3:O4").Select
ef.Selection.Merge
ef.Range("O3").value='有效时间比'
接下来通过scan语句，依次为每一行每一列单元格赋值。为了获得更好的打印效果，还需进行页面设置，如标题行、页面居中、横向排版等，还可以加边框线。
以上程序在VFP 6+Excel 2000+Windows 2000下调试通过。实际应用中可根据需要对各项参数设置进行相应调整。
-------------------------------------------------------------- VFP控制EXCL文件另存为DBF（EXCEL后台运行) fil=Thisform.List1.Value &&其值为一个包含路径的文件名
oExcel=CREATEOBJECT('Excel.application') oExcel.Workbooks.Open(fil) &&打开文件
oExcel.Selection.AutoFilter &&关闭(如果无则打开)自动筛选
oExcel.Range("A1:F1000").Select &&选中从第1行到1000行的前6列数据(另存后只有这些数据)
asfil=STRTRAN(UPPER(STRTRAN(fil,SUBSTR(fil,1 ,RA T('\',fil)),'c:\windows\desktop\cphz\')),'.XLS','.dbf') &&要保存的文件名
IF FILE(asfil)
DELETE FILE &asfil
ENDIF
oExcel.ActiveWorkbook.SaveAs(asfil,8) &&另存为DBF
oExcel.ActiveWorkbook.saved=.t. &&不保存当前EXCEL表
oExcel.Workbooks.close &&关闭表
oExcel.quit &&退出EXCEL
RELEASE oExcel &&释放变量
*************例子****************** lcFileName='D:\TEST.XLS'
oExcel=CREATEOBJECT('Excel.application') oExcel.Workbooks.Open('&lcFileName') &&打开文件R=oExcel.SHEETS(1).UsedRange.ROWS.COUNT
&&有数据的总行数
C=oExcel.SHEETS(1).UsedRange.COLUMNS.COUN
T &&有数据的总列数
oExcel.Cells(R,C).Select &&选中数据
oExcel.Columns.AutoFit &&让所有的列宽都自动调整
oExcel.DisplayAlerts=.F.
oExcel.ActiveWorkbook.SaveAs('D:\TEST.DBF',8)
&&另存为DBF
oExcel.ActiveWorkbook.saved=.t. &&不保存当前EXCEL表
oExcel.Workbooks.close &&关闭表
oExcel.quit &&退出EXCEL
RELEASE oExcel &&释放变量
MESSAGEBOX('Excel文件:D:\TEST.XLS 另存为D:\TEST.DBF 完成！',64,'信息提示')
***********************************
虽然用APPEND FROM tx.xls TYPE XL8可以更简单的追加数据，但有时会导致程序非法错误退出（除非先另存为Excel 5.0）
'以下我做的一个简单例子，你参考一下
'功能：VB调用Excel，将一个Excel文件另存为Dbf。'前提：要安装Excel
Dim oExcel As Object
lcSFileName = "D:\test.xls" '源Excel文件名lcDFileName = "D:\test1.dbf" '目标Dbf文件名
Set oExcel = CreateObject("Excel.Application") '创建Excel对象
oExcel.Workbooks.Open (lcSFileName) '打开Excel 表
R = oExcel.SHEETS(1).UsedRange.ROWS.Count '有数据的总行数
C = oExcel.SHEETS(1).UsedRange.Columns.Count '有数据的总列数
oExcel.Cells(R, C).Select '选中数据
oExcel.Columns.AutoFit '让所有的列宽都自动调整oExcel.DisplayAlerts = Flase '不显示提示框oExcel.ActiveWorkbook.SaveAs
FileName:=lcDFileName, FileFormat:=8
oExcel.ActiveWorkbook.saved = Ture '不保存当前EXCEL表
oExcel.Workbooks.Close '关闭表
oExcel.quit '退出EXCEL
Set oExcel = Nothing '释放对象
MsgBox ("Excel文件: " & lcSFileName & " 另存为" & lcDFileName & " 完成！")
--------------------------------------------------------------
实用的VFP与EXCEL交互编程
摘要：本文介绍了几种实用的VFP与EXCEL交互编程的方法与实例，将VFP强大的数据处理功能与EXCEL优异的制表功能有机地结合起来，大大增强了软件的应用效果。
关键词：VFP、EXCEL、DDE、OLE、交互编程。Some Cross_Programming Methods Between VFP and EXCEL
Zou yiming(Gansu Lanzhou Section of Instruments Lanzhou Petrochemical Staff College)
Abstract: The author introduces us in this paper some practical methods and instance of cross_programming between VFP and EXCEL . It extremely improves their performances by combining VFP's data processing functions with EXCEL's excellent tabulation functions. Key Words: VFP、EXCEL、OLE、DDE、Cross-Programming
VFP(Visual Foxpro)是一种关系型数据库管理系统，由于其强大的数据处理能力及良好的兼容性，使其成为数据库应用程序开发人员的强有力工具，而EXECL则是一种优秀的电子表格处理软件，在兼容性、操作界面、公式运算、图表等方面有着独到的优势。上述两种软件在各自的应用领域均得到广泛的应用，同时上述两种软件还具有良好的交互编程能力，为两者相辅相成、取长补短奠定了良好的基础。
本文将结合具体实例介绍几种VFP与EXCEL交互编程的方法，每种方法虽然实现手段各异，但功能相仿。其功能可简述如下：VFP数据表“学生成绩表．DBF”中含“学生姓名”、“语文”、“数学”．．．．．．等字段，示例程序将从EXCEL工作簿“VFP交互．XLS”之工作表“查询”中用书签“课程名”指定的单元取得欲查询的课程名称，然后在数据表“学生成绩表．DBF”中自动搜索，以找到该门课程不及格的同学名单，最后传送至原EXCEL工作薄形成新的工作表单，同时，新工作表还将以该课程名命名。
下列程序均在VFP5．0与EXCEL97中调试通过。因篇幅所限，程序中的错误处理部分略去。
一、EXECL驱动VFP
EXECL内置的VBA语言（Visual Basic For Application）为EXECL功能的扩展提供了便利的手段，用户可使用该语言直接驱动VFP完成数据检索等功能。
程序首先生成一个VFP对象，然后用VFP的DoCmd 方法执行VFP摸索命令串，其摸索结果再借助于VFP的DateToClip方法拷贝至剪切板，最后VBA将其粘贴至工作表的正确位置。
Sub FoxTest()
Dim oFox As Object
Dim SLesson As String
Dim SCommand As String
Set oFox = CreateObject("VisualFoxPro.Application") '启动VFP，生成VFP对象
Sheets("查询").Select
SLesson = Range("课程名") '在名为“课程名”的单元格中得到欲查询的课程名称
Sheets.Add '产生新的工作表单
https://www.wendangku.net/doc/bb14770964.html, = Slesson '指定工作表单的名称与课程名称相同
SCommand = "SELECT 学号,语文,数学FROM d:\vfp\学生成绩表WHERE "+ SLesson + "<60 INTO CURSOR TEMP" '形成VFP查询命令串
oFox.DoCmd Scommand '执行VFP命令串
oFox.DataToClip "temp", , 3 '将搜索结果以文本方式拷贝至剪切板
Range("a1:a1").Select '指向拷贝目标区域左上角单元ActiveSheet.Paste '粘贴搜索结果
End Sub
为便于使用，作者在EXECL中自制了一名为“搜索”的工具栏及一名为“开始搜索”的按钮，并将上述宏程序段与自制按钮相关联，按下此按钮即可运行程序并在EXCEL中得到要求的数据。
制作工具栏及按钮的方法如下：
1. 选“工具”/“自定义”菜单，出现自定义对话框；
2. 选择“工具栏”页框，然后按下“新建”按钮；
3. 在工具栏对话框中输入“搜索”作为新建工具栏的名称；
4. 选择“命令”页框，在“类别”列表中选“宏”，在“命令”列表中选“自定义按钮”并将其拖放至新建的“搜索”工具栏；
5. 按下“更新所选内容”按钮，首先在“命名”栏中填入按钮名称“开始搜索”，然后选择“指定宏”，在随后出现的“指定宏”列表中选择上述宏程序FoxTest()即可实现为该宏指定一个工具栏按钮。二、VFP使用OLE功能驱动EXECL
OLE（Object Linking and Embedding）对象链接与嵌入，是WINDOWS应用程序间相互传递和共享数据的一种有效方法。VFP借助于OLE不仅可共享其它应用程序的数据，而且还能以对象方式直接控制其它应用程序的运行，从而进一步扩展VFP的功能。VFP支持直接在程序中创建、使用和控制OLE对象，实现OLE自动化。作为OLE客户VFP与作为OLE 服务器的EXCEL具有良好的编程接口，下述程序段用OLE方式实现所要求的功能。
程序首先生成一个EXCEL的OLE对象OleApp以便对其进行操作，然后利用OLE功能从EXCEL表单中获取欲查询的课程名，并控制EXCEL生成新的工作表，VFP的查询结果仍然使用剪切板的方式传递至EXCEL工作表。
OleApp=CREATEOBJECT("Excel.Application") && 打开EXCEL，产生OLE对象
OleApp.Application.Caption="VFP交互编程" && 指定标题栏名称
OleApp.Application.Visible=.T. && 置EXCEL可见OleApp.Application.WorkBooks.Open("d:\vfp\VFP交互.xls") && 打开EXCEL工作簿
DO WHILE .T.
WITH OleApp.Application
nAnswer = MESSAGEBOX("开始搜索？", 32+4, "搜索指定数据") &&产生信息框
IF (.NOT.(nAnswer=6)) && 如按下“Yes"按钮，则开始搜索，反之退出
EXIT
ENDIF
.Sheets("查询").Select && 选择“查询”工作表单SLesson = OleApp.Application.Range("课程名").Value && 得到欲查询的课程名称
.Sheets.Add && 新建一工作表单
https://www.wendangku.net/doc/bb14770964.html, = Slesson && 指定工作表单的名称
SCommand = "SELECT 学号,语文,数学FROM d:\vfp\学生成绩表WHERE " +ALLTrim(SLesson) + "<60 INTO CURSOR TEMP" && 形成VFP查询命令串
&Scommand && 执行VFP命令串
_VFP.DataToClip("TEMP",,3) && 将搜索结果以文本方式拷贝至剪切板
.Range("a1:a1").Select && 指向拷贝目标区域左上角单元
.ActiveSheet.Paste && 粘贴搜索结果
ENDWITH
ENDDO
OleApp.Quit && 关闭EXCEL，保存更新后的工作簿文件
**************************************** objexcel.activeworkbook.close(.f.)
那个是关闭excel啊~~不是存盘~关闭了就不能存盘了
--------------------------------------------------------------
设置打印参数：
问：用Excel做报表，可打印时怎么选择打印机，即.ActiveWindow.SelectedSheets.PrintOut的参数有哪些？
答：
expression.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName) expression 必选。该表达式返回“应用于”列表中的某个对象。
From Variant 类型，可选。打印的开始页号。如果省略该参数，将从起始位置开始打印。
To Variant 类型，可选。打印的终止页号。如果省略该参数，将打印至最后一页。
Copies Variant 类型，可选。要打印的份数。如果省略该参数，将只打印一份。
Preview Variant 类型，可选。如果为True 则Microsoft Excel 打印指定对象之前进行打印预览。如果为False，或者省略此参数则立即打印该对象。ActivePrinter Variant 类型，可选。设置活动打印机的名称。
PrintToFile Variant 类型，可选。如果为True 则打印输出到文件。如果没有指定PrToFileName，则Microsoft Excel 将提示用户输入要输出文件的文件名。
Collate Variant 类型，可选。如果为True 则逐份打印每份副本。
PrToFileName 可选，Variant 类型。如果将PrintToFile 设置为True，则本参数指定要打印到的文件名。
说明
From 参数和To 参数所描述的“页”指的是要打印的页，并非指定工作表或工作簿中的全部页。
--------------------------------------------------------------
如何用编程的方法打开有密码的Excel文件？
问题：
Excel文件加了密码，如何在VFP中用编程的方式把密码输入，使Excel文件打开
如：
oExcel=CREATEOBJECT('Excel.application') oExcel.Workbooks.Open("d:\22.xls")
这样还有一个密码的对话框出来，需要输入密码才能打开文件。
如何用编程的方法直接打开有密码的Excel文件？答:
oEle.Workbooks.Open("d:\22.xls",.f.,.f., ,"123","456") "123"表示打开权限的密码,
"456"表示修改权限的密码.
----------------------------------------------
问题一:如何将一个已知路径的图片插入到excel中. 答:
oexcel1.ActiveSheet.Pictures.Insert("图片文件名") ----------------------------------------------
问题二：能不能指定在某一位置或区域放置图片并控制图片显示大小呢?
答:
OLEAPP.SHEETS(1).SELECT
oleapp.Range("位置").Select
oleapp.ActiveSheet.Pictures.Insert("图片文件名")).Select
oleapp.Selection.ShapeRange.LockAspectRatio =.T. oleapp.Selection.ShapeRange.Height = 57
----------------------------------------------
问题：类型为字符型的字段输出到excel 中，前面的零被自动去掉，例如“009877”变为“9877”，怎么解决？
答：
1.在字符串前面加半角单引号“' ”，
例如：
o.Cells(1,1).V alue="'0123"
或用变量
cString="'"+"0123" &&其中0123可以取自表中一个字段
o.Cells(1,1).value=cString
&&o.Range("A1:A1").value=cString
2.
oExcel.CELLS(1,1).Select &&或eole.Range("A1:E1").Select
oExcel.Selection.NumberFormatLocal = "@" &&把被选定的单元格设为文本格式
oExcel.Cells(1,1).Value="0123" &&给所选单元格覆值
----------------------------------------------
在Excel 中插入行和列:
objExcel.Rows(1).Insert() &&在第一行前面插入一行
objExcel.Columns(2).Insert() &&在第二列前面插入一列
----------------------------------------------
获取Excel 记录数
loXls = CREATEOBJECT("excel.application") bookExcel = loXls.APPLICATION.Workbooks.OPEN("f:\pz.xls") nrows=bookExcel.Worksheets('pz')
UsedRange =https://www.wendangku.net/doc/bb14770964.html,edRange
r=UsedRange.ROWS.COUNT &&有数据的总行数
c=UsedRange.COLUMNS.COUNT &&有数据的总列数
loXls.Workbooks.close
loXls.quit
----------------------------------------------
问：在EXCEL中如何在打开文件的同时自动执行一个宏命令。
答：
只要将宏的命名为AUTO_OPEN 即可。
如果要在文件关闭时运行，则命名为auto_close 。----------------------------------------------
问:在VFP中可以执行EXCEL的选择性粘贴吗?
.Range("A2").PasteSpecial ("xlPasteValues") && 会出错
.Range("A2").PasteSpecial (3) && 也会出错
.Range("A2").PasteSpecial && 只好这样了
如何才能只粘贴值呢?
答:
xlPasteValues=-4163
oExcel.Range("A1").Select
oExcel.Selection.copy
oExcel.Range("B1")._PasteSpecial(xlPasteValues)
注意:在Excel 中，"xlPasteValues"是一个常量，它的值是一个数值型的：-4163
oExcel.Range("A1").Copy
oExcel.Range("B3").PasteSpecial(8) &&粘贴行、列宽oExcel.Range("B3").PasteSpecial(-4122) &&粘贴格式--------------------------------------------------
如何从excel读取数据
*******建立一个excel对象*******
LOCAL hb1 as excel.application
csheetname=TRIM(thisform.text2.value)&&读取用户要读取excel的sheet名
***读取数据源所在的EXCEL文件名****
IF EMPTY(TRIM(thisformset.filepath))
MESSAGEBOX("请先选择要导入的excel文件！",0,"提示")
RETURN
ENDIF
IF EMPTY(TRIM(csheetname))
MESSAGEBOX("请先选择要导入的工作表sheet 名称！",0,"提示")
RETURN
ENDIF
try
hb1=createobject("excel.application")
catch
messagebox("请检查你是否已安装microsoft excel 应用程序！",0,"提示") endtry
***打开EXCEL对象，开始读取数据********
HB1.workbooks.open(TRIM(thisformset.filepath))
hb1.Sheets(csheetname).select
sele store&&这是要读取的数据存放的表
zap
isend=.f. &&用于判断是否记录已到底
i=1
DO WHILE isend=.f.
APPEND BLANK
crq=DTOC(drq)
cdh=hb1.Cells(i,1).Value
IF ISNULL(cdh)
cdh=""
ENDIF
**用于判断数据类型，数据类型一定要判断是否为NULL，**
** 然后如果不是指定的类型，还要进行转换*************
IF TYPE("cdh")<>'C'
cdh=ALLTRIM(STR(cdh))
endif
cdwmc=TRIM(hb1.Cells(i,2).Value)
IF ISNULL(cdwmc)
cdwmc=""
endif
cgg=hb1.Cells(i,3).Value
IF ISNULL(cgg)
cgg=""
ELSE
IF TYPE("cgg")<>'C'
cgg=ALLTRIM(STR(cgg))
ENDIF
endif
cjldw=hb1.Cells(i,4).Value
IF ISNULL(cjldw)
cjldw=""
endif
cjldw=IIF(TYPE("jldw")<>"C",ALLTRIM(STR(cjldw) ),ALLTRIM(cjldw))
nsl=hb1.Cells(i,5).Value
IF ISNULL(nsl)
nsl=0
endif
cch=TRIM(hb1.Cells(i,6).Value)
IF ISNULL(cch)
cch=''
endif
cxh=hb1.Cells(i,8).Value
IF ISNULL(cxh)
cxh=""
ELSE
IF TYPE("cxh")<>'C'
cxh=TRIM(STR(cxh))
ELSE
cxh=TRIM(cxh)
endif
ENDIF
ccpmc=hb1.Cells(i,9).V alue
IF ISNULL(ccpmc)
ccpmc=''
endif
IF TYPE("ccpmc")<>'C'
ccpmc=ALLTRIM(STR(ccpmc))
ELSE
ccpmc=TRIM(ccpmc)
ENDIF
SELECT store
REPLACE rq WITH crq,dh WITH cdh,dwmc WITH cdwmc,gg WITH cgg,jldw WITH cjldw,sl WITH nsl,ch WITH cch,cpbh WITH cxh,cpmc WITH ccpmc i=i+1
&&如果一行全为空，记作记录到底，如果中间存在多行的问题，我没有做考虑****
IF EMPTY(cxh) AND nsl=0 AND EMPTY(cch) AND EMPTY(cjldw) AND EMPTY(cdh) AND EMPTY(cgg)
isend=.t.
ENDIF
ENDDO
dele &&最后一行为空行，删除
WAIT "共转换得到"+ALLTRIM(STR(RECCOUNT()))+"条记录！" WINDOW TIMEOUT 2
hb1.quit
-----------------------------------------
******************************************** **
* 本程序通过将原dbf表拷成excel格式,然后导入并
* 设置报表格式
******************************************** ** para tablename
LOCAL hb1 as excel.application
WAIT "正在导出数据，请稍侯……" WINDOW AT 20,30 TIMEOUT 1
bhaveerror=.f. &&定义一个变量判断是否发生错误try
hb1=createobject("excel.application")
catch
messagebox("请检查你是否已安装microsoft excel 应用程序！",0,"提示")
bhaveerror=.t.
endtry
if bhaveerror=.t.
return
endif
if right(curr_path,1)<>'\'
curr_path=curr_path+"\"
endif
ctablename=tablename+"_excel"
filepath=curr_path+"temp\sheet1.xls"
*filepath="temp\sheet1.xls"
if !file(filepath)
messagebox("数据源的excel文件未生成，报表生成被终止！")
return
endif
HB1.workbooks.open(filepath)
HB1.SHEETS("sheet1").select
hb1.sheets(1).rows(1).entirerow.insert
hb1.sheets(1).rows(1).entirerow.insert
sele (ctablename)
nfieldcount=fcount()
nreccount=reccount()
hbdygs="A1:"+chr(nfieldcount+64)+"2"
HB1.range(hbdygs).select
****合并两行作为报表标题*************
HB1.selection.HorizontalAlignment = 3 &&水平方向2左对齐，3居中，4右对齐
HB1.selection.VerticalAlignment = 2 &&垂直方向1靠上，2居中，3靠下
HB1.selection.WrapText = .f. && ??
HB1.selection.orientation = 0 && ??
HB1.selection.AddIndent = .f. && ??
HB1.selection.ShrinkToFit = .f. && ??
HB1.selection.MergeCells = .t. && ??
HB1.range(hbdygs).FormulaR1C1 = "请输入报表标题"
HB1.range(hbdygs)https://www.wendangku.net/doc/bb14770964.html, = "隶书"
HB1.range(hbdygs).Characters.font.FontStyle = "常规" HB1.range(hbdygs).Characters.font.ColorIndex = 1 &&字符颜色
***根据数据源表结构的宽度设置列的宽度********
copy stru exte to temp\term_stru
sele 0
use temp\term_stru
sele (ctablename)
for i=1 to nfieldcount
cvalue=allt(field(i))
sele term_stru
loca for lower(allt(field_name))==cvalue
if found()
columnname=chr(i+64)+":"+chr(i+64)
hb1.columns(columnname).columnwidth=field_len else
endif
sele (ctablename)
endfor
sele term_stru
use
activecellname=chr(nfieldcount+64)+allt(str(nreccount +3))
*************设置数据区域的字体格式***************
HB1.range("A3:"+activecellname).Characters.font.nam e = "宋体"
HB1.range("A3:"+activecellname).Characters.font.size = 9
HB1.range("A3:"+activecellname).select
hb1.selection.Borders(1).LineStyle = .t.
hb1.selection.Borders(2).linestyle = .t.
hb1.selection.Borders(3).linestyle = .t.
hb1.selection.Borders(4).linestyle = .t.
hb1.ActiveWorkbook.SaveAs("c:\aa.xls")
hb1.application.visible=.t.
* HB1.ACTIVEWORKBOOK.SA VE &&自动保存数据
* HB1.ACTIVEWORKBOOK.CLOSE &&关闭当前工作簿
* HB1.QUIT
*-------------------------------------------------------------
如何修改sheet工作表名：
EFILENAME='D:\TEST\TEMPA.XLS' oExcel=CREATEOBJECT("Excel.application") oExcel.Workbooks.OPEN("&EFILENAME") oExcel.VISIBLE=.T.
oExcel.Worksheets("Sheet2").Select
oExcel.Worksheets("Sheet2").Name='NewSheet' &&这里的NewSheet为新的名字。
*-----------------------------------------
复制Sheet工作表
EFILENAME='D:\你的Excel表名.XLS'
oExcel=CREATEOBJECT("Excel.application") oExcel.Workbooks.OPEN("&EFILENAME") oExcel.VISIBLE=.T.
oExcel.SHEETS(1).SELECT
oExcel.SHEETS(1).COPY(NULL,oExcel.SHEETS(1)) &&&&把第1个工作表复制到第1个工作表之后oExcel.SHEETS(2).NAME='NewSheetName' &&设置第2个工作表名称
*!*oExcel.SHEETS(1).COPY(oExcel.SHEETS(1),NU LL) &&&&把第1个工作表复制到第1个工作表之前*!*oExcel.SHEETS(1).NAME='NewSheetName' &&设置第1个工作表名称
*-----------------------------------------
如何将DBF中内容COPY到EXCEL的指定区域
例如我有一个DBF:
Name_F Sl_f
Mike 546
kyle 200
想将这个内容转到EXCEL里面的E1:F2区域!
*******
USE 表名
_VFP.DataToClip('表名',RECCOUNT(),3) &&将一组记录作为文本复制到剪贴板上,3使用制表符分隔字段。
oexl=createobject('excel.application') &&创建电子表格
oexl.visible=.t. &&使电子表格可见
oexl.workbooks.add &&创建工作簿
with oexl
.range("E1:F2").select &&根据你的表中的记录数和字段数调整此项中的'F2'
.ActiveSheet.Paste
ENDWITH
*------------------------------------------------------------ VFP调用EXCEL查询打印示例
EFILENAME='查询打印.XLS'
*LOCAL oExcel
oExcel=CREATEOBJECT("Excel.application")
oExcel.Workbooks.OPEN("&EFILENAME") oExcel.CAPTION="VFP应用程序调用Microsoft Excel"
oExcel.Worksheets("查询打印").ACTIV A TE oExcel.VISIBLE=.T.
nRows=oExcel.Worksheets('查询打印').UsedRange.ROWS.COUNT
nColumns=oExcel.Worksheets('查询打印').UsedRange.COLUMNS.COUNT
oExcel.RANGE(oExcel.Cells(1,1),oExcel.Cells(nRows ,nColumns)).BORDERS.LineStyle=1
oExcel.RANGE(oExcel.Cells(1,1),oExcel.Cells(nRows ,nColumns)).HorizontalAlignment=3 &&水平(1-默认、2-靠左、3-居中、4-靠右、5-填充、6=两端对齐、7=跨列居中、8=分散对齐)
oExcel.RANGE(oExcel.Cells(1,1),oExcel.Cells(nRows ,nColumns)).VerticalAlignment=2 &&垂直(1=靠上、2=居中、3=靠下、4=两端对齐、5=分散对齐) oExcel.ActiveSheet.PageSetup.RightFooter="第&P页/ 共&N页"
oExcel.ActiveSheet.PageSetup.TopMargin=2/0.035
&&设置顶边距为2厘米
oExcel.ActiveSheet.PageSetup.BottomMargin=2/0.035 &&设置左边距为2厘米
oExcel.ActiveSheet.PageSetup.HeaderMargin=1/0.035 &&设置页眉到顶端边距为1厘米
oExcel.ActiveSheet.PageSetup.FooterMargin=1/0.035 &&设置页脚到底边距为1厘米
oExcel.ActiveSheet.PageSetup.LeftMargin=2/0.035
&&设置左边距为2厘米
oExcel.ActiveSheet.PageSetup.RightMargin=2/0.035
&&设置右边距为2厘米
oExcel.ActiveSheet.PageSetup.CenterHorizontally=.t. &&设置页面水平居中
oExcel.ActiveSheet.PageSetup.CenterVertically=.t.
&&设置页面垂直居中
oExcel.Cells.SELECT
oExcel.Cells.EntireColumn.AUTOFIT
oExcel.SELECTION.AutoFilter
oExcel.ActiveSheet.ROWS(1).INSERT
oExcel.RANGE("A2:BB2").ROWHEIGHT=37.5 oExcel.RANGE("A2:BB2").WrapText=.T.
oExcel.ActiveSheet.COLUMNS(1).COLUMNWIDTH =3
oExcel.ActiveSheet.COLUMNS(1).COLUMNWIDTH =4
oExcel.RANGE("A2:BB2").ROWHEIGHT=12.5 *oExcel.RANGE("M1").V ALUE='统计月份：'+ALLTRIM(STR(YEAR(KKS_DATE1)))+'年'+ALLTRIM(STR(MONTH(KKS_DATE1)))+'月- '+ALLTRIM(STR(YEAR(KKE_DATE1)))+'年'+ALLTRIM(STR(MONTH(KKE_DATE1)))+'月' oExcel.ActiveSheet.PageSetup.CenterHeader="&20部门出勤统计表"
oExcel.ActiveSheet.PageSetup.CenterFooter="单位领导："
oExcel.ActiveSheet.PageSetup.LeftFooter="打印时间：&D - &T"
oExcel.SELECTION.AutoFilter
oExcel.ActiveSheet.RANGE('B2').SELECT
oExcel.ActiveSheet.PageSetup.PrintTitleRows="$1:$1" oExcel.ActiveSheet.PageSetup.ORIENTATION=2 && 1：纵向打印2：横向打印
oExcel.ActiveWorkbook.Save
*-----------------------------------------
在VFP中Disabled／Enabled EXCEL中的菜单项及按钮
有时需要在VFP中控制EXCEL中的按钮及菜单项，以达到由VFP控制XLS文档的目的。可以控制XLS 文
档不能复制、不能另存、不能打印、不能以附档的形式发邮件。结合陆老师的在通用字段中存放文档的思路，完全可以用VFP开发文档发布系统，可以发布公司的守则、公告、管理办法、机密资料、图片资料等而不用担心用户复制、打印、以邮件传播资料。
XLS中各个菜单项或按钮都有唯一的ID或序号，本例是利用序号来控制的(利用ID也可以控制)。
对象大多只有三层，对应的控制方法是：
对象.CommandBars(第一层序号).Controls(第二层序号).accChild(第二层序号).属性=值
本例仅列出菜单项的部分控制，其它菜单项或按钮的序号可以用以下程序取得：
*(需要在VFP7.0以上运行)
oXls=GetObject("","excel.sheet")
XlApp=oXLS.application
XlSheet=XlApp.ActiveSheet
bars=https://www.wendangku.net/doc/bb14770964.html,mandBars.Count
str=''
FOR i=1 TO bars
str=str+CHR(13)+ALLTRIM(str(i))+'、'+https://www.wendangku.net/doc/bb14770964.html,mandBars(i).accName+'(NAME:'+xlapp.C ommandBars(i).Name+'
INDEX:'+ALLTRIM(STR(https://www.wendangku.net/doc/bb14770964.html,mandBars(i).Inde
x))+')'
bars2=https://www.wendangku.net/doc/bb14770964.html,mandbars(i).accChildCount
FOR j=1 TO bars2
try
obj=https://www.wendangku.net/doc/bb14770964.html,mandbars(i).controls(j)
str=str+CHR(13)+' '+ALLTRIM(str(j))+'、'+https://www.wendangku.net/doc/bb14770964.html,mandbars(i).controls(j).accname+'(ID:'+AL LTRIM(STR(https://www.wendangku.net/doc/bb14770964.html,mandBars(i).controls(j).Id))+')' FOR k=1 TO obj.accChildCount
try
IF NOT EMPTY(obj.controls(k).accname )
str=str+CHR(13)+'
'+ALLTRIM(STR(k))+'、'+obj.controls(k).accName+' (ID：'+ ALLTRIM(STR(obj.controls(k).Id))+')'
ENDIF
CATCH
EXIT
endtry
ENDFOR
CATCH
EXIT
endtry
ENDFOR
W AIT windows ALLTRIM(STR(i))+' / '+ALLTRIM(STR(bars))+'
'+STR(i/bars*100,10,2)+'%' nowait
ENDFOR
SA VE TO xls.txt ALL LIKE str
MODIFY COMMAND xls.txt
return
*--------------
oXLS=CREATEOBJECT('excel.application')
oXLS.Workbooks.Add
oXLS.visible=.t.
1、工作表功能表列(NAME:Worksheet Menu Bar ID:1) &&禁用/不可见系统菜单
https://www.wendangku.net/doc/bb14770964.html,mandbars(1).enabled=.f.
1、档案(ID:30002) &&禁用菜单中的“档案”项https://www.wendangku.net/doc/bb14770964.html,mandbars(1).controls(1).enabled=.f.
12、打印... (ID：4) &&禁用“档案”菜单下的“打印”项
https://www.wendangku.net/doc/bb14770964.html,mandBars(1).Controls(1).accChild(18).Enab led=.f.
*--------------以下为通过上面程序取得的Office2003 菜单信息，如果Office版本不是2003，那就通过以上程序重新取得菜单信息1、工作表菜单栏(NAME:Worksheet Menu Bar INDEX:1)
1、文件(ID:30002)
1、新建... (ID：18)
2、打开... (ID：23)
3、关闭(ID：106)
4、更新(ID：3)
5、副本另存为... (ID：748)
6、另存为网页... (ID：3823)
7、保存工作区... (ID：846)
8、文件搜索... (ID：5905)
9、权限... (ID：7994)
10、权限(ID：31308)
11、签出(ID：6127)
12、签入... (ID：6128)
13、版本记录... (ID：7799)
14、网页预览(ID：3655)
15、页面设置... (ID：247)
16、打印区域(ID：30255)
17、打印预览(ID：109)
18、打印... (ID：4)
19、发送(ID：30095)
20、属性(ID：750)
21、1 \Test\查询打印.XLS (ID：831)
22、2 \慧指资料\Others\Apple\Monitor.xls (ID：831)
23、3 \Test\temp1.CSV (ID：831)
24、4 \工作\合同编号&用户统计表.xls (ID：831)
25、此处为最近所用文件的名称(ID：831)
26、此处为最近所用文件的名称(ID：831)
27、此处为最近所用文件的名称(ID：831)
28、此处为最近所用文件的名称(ID：831)
29、此处为最近所用文件的名称(ID：831)
30、签出(ID：5950)
31、退出(ID：752)
2、编辑(ID:30003)
1、无法撤消(ID：128)
2、重复新建(ID：37)
3、剪切(ID：21)
4、复制(ID：19)
5、Office 剪贴板... (ID：809)
6、粘贴(ID：22)
7、选择性粘贴... (ID：755)
8、粘贴为超链接(ID：2787)
9、填充(ID：30020)
10、清除(ID：30021)
11、删除... (ID：478)
12、删除工作表(ID：847)
13、移动或复制工作表... (ID：848)
14、查找... (ID：1849)
15、替换... (ID：313)
16、定位... (ID：757)
17、链接... (ID：759)
18、对象(ID：961)
19、对象(ID：30019)
3、视图(ID:30004)
1、普通(ID：723)
2、分页预览(ID：724)
3、任务窗格(ID：5746)
4、工具栏(ID：30045)
5、编辑栏(ID：849)
6、状态栏(ID：850)
7、页眉和页脚... (ID：762)
8、批注(ID：1594)
9、视图管理器... (ID：950)
10、全屏显示(ID：178)
11、显示比例... (ID：925)
4、插入(ID:30005)
1、单元格... (ID：295)
2、行(ID：296)
3、列(ID：297)
4、工作表(ID：852)
5、图表... (ID：1957)
6、符号... (ID：308)
7、特殊符号... (ID：1)
8、分页符(ID：509)
9、重置所有分页符(ID：1585)
10、函数... (ID：385)
11、名称(ID：30023)
12、批注(ID：1589)
13、墨迹注释(ID：9071)
14、图片(ID：30180)
15、图示... (ID：1032)
16、对象... (ID：546)
17、超链接... (ID：1576)
5、格式(ID:30006)
1、单元格... (ID：855)
2、行(ID：30024)
3、列(ID：30025)
4、工作表(ID：30026)
5、自动套用格式... (ID：786)
6、条件格式... (ID：3058)
7、样式... (ID：254)
8、拼音指南(ID：30136)
6、工具(ID:30007)
1、拼写检查... (ID：2)
2、信息检索... (ID：7343)
3、错误检查... (ID：6122)
4、语音(ID：31155)
5、共享工作区... (ID：7710)
6、共享工作簿... (ID：2040)
7、修订(ID：30138)
8、比较和合并工作簿... (ID：2044)
9、保护(ID：30029)
10、联机协作(ID：30468)
11、单变量求解... (ID：856)
12、方案... (ID：857)
13、公式审核(ID：30028)
14、宏(ID：30017)
15、加载宏... (ID：943)
16、自动更正选项... (ID：793)
17、自定义... (ID：797)
18、显示签名... (ID：5756)
19、选项... (ID：522)
7、数据(ID:30011)
1、排序... (ID：928)
2、筛选(ID：30031)
3、记录单... (ID：860)
4、分类汇总... (ID：861)
5、有效性... (ID：2034)
6、模拟运算表... (ID：862)
7、分列... (ID：806)
8、合并计算... (ID：863)
9、组及分级显示(ID：30032)
10、数据透视表和数据透视图... (ID：2915)
11、导入外部数据(ID：30101)
12、列表(ID：31276)
13、XML (ID：31268)
14、刷新数据(ID：459)
8、操作(ID:30083)
9、窗口(ID:30009)
1、新建窗口(ID：303)
2、重排窗口... (ID：298)
3、并排比较... (ID：7698)
4、隐藏(ID：865)
5、取消隐藏... (ID：866)
6、拆分(ID：302)
7、冻结窗格(ID：443)
8、1 Object (ID：830)
9、此处为窗口名称(ID：830)
10、此处为窗口名称(ID：830)
11、此处为窗口名称(ID：830)
12、此处为窗口名称(ID：830)
13、此处为窗口名称(ID：830)
14、此处为窗口名称(ID：830)
15、此处为窗口名称(ID：830)
16、此处为窗口名称(ID：830)
17、此处为窗口名称(ID：830)
10、帮助(ID:30010)
1、Microsoft Excel 帮助(ID：984)
2、显示Office 助手(ID：1004)
3、Microsoft Office Online (ID：3775)
4、与我们联系(ID：7903)
5、转成Lotus 1-2-3 的帮助... (ID：936)
6、检查更新(ID：9340)
7、检测并修复... (ID：3774)
8、激活产品... (ID：5933)
9、客户反馈选项... (ID：7714)
10、关于Microsoft Office Excel (ID：927) 2、图表菜单栏(NAME:Chart Menu Bar INDEX:2) 1、文件(ID:30002)
1、新建... (ID：18)
2、打开... (ID：23)
3、关闭(ID：106)
4、更新(ID：3)
5、副本另存为... (ID：748)
6、另存为网页... (ID：3823)
7、保存工作区... (ID：846)
8、文件搜索... (ID：5905)
9、签出(ID：6127)
10、签入... (ID：6128)
11、版本记录... (ID：7799)
12、权限... (ID：7994)
13、权限(ID：31308)
14、网页预览(ID：3655)
15、页面设置... (ID：247)
16、打印预览(ID：109)
17、打印... (ID：4)
18、发送(ID：30095)
19、属性(ID：750)
20、1 \Test\查询打印.XLS (ID：831)
21、2 \慧指资料\Others\Apple\Monitor.xls (ID：831)
22、3 \Test\temp1.CSV (ID：831)
23、4 \工作\合同编号&用户统计表.xls (ID：831)
24、此处为最近所用文件的名称(ID：831)
25、此处为最近所用文件的名称(ID：831)
26、此处为最近所用文件的名称(ID：831)
27、此处为最近所用文件的名称(ID：831)
28、此处为最近所用文件的名称(ID：831)
29、退出(ID：752)
2、编辑(ID:30003)
1、无法撤消(ID：128)
2、重复新建(ID：37)
3、剪切(ID：21)
4、复制(ID：19)
5、Office 剪贴板... (ID：809)
6、粘贴(ID：22)
7、选择性粘贴... (ID：755)
8、清除(ID：30021)
9、删除工作表(ID：847)
10、移动或复制工作表... (ID：848)
11、链接... (ID：759)
3、视图(ID:30004)
1、工具栏(ID：30045)
2、编辑栏(ID：849)
3、状态栏(ID：850)
4、页眉和页脚... (ID：762)
5、批注(ID：1594)
6、视图管理器... (ID：950)
7、全屏显示(ID：178)
8、显示比例... (ID：925)
9、随窗口大小调整(ID：908)
10、图表窗口(ID：2571)
4、插入(ID:30005)
1、墨迹注释(ID：9071)
2、图片(ID：30180)
3、工作表(ID：852)
4、图表... (ID：1957)
5、超链接... (ID：1576)
6、符号... (ID：308)
5、格式(ID:30006)
1、单元格... (ID：917)
2、工作表(ID：30026)
6、工具(ID:30007)
1、拼写检查... (ID：2)
2、自动更正选项... (ID：793)
3、语音(ID：31155)
4、共享工作簿... (ID：2040)
5、修订(ID：30138)
6、比较和合并工作簿... (ID：2044)
7、保护(ID：30029)
8、联机协作(ID：30468)
9、宏(ID：30017)
10、加载宏... (ID：943)
11、自定义... (ID：797)
12、选项... (ID：522)
7、图表(ID:30022)
1、图表类型... (ID：918)
2、源数据... (ID：954)
3、图表选项... (ID：956)
4、位置... (ID：955)
5、添加数据... (ID：1963)
6、添加趋势线... (ID：914)
7、设置三维视图格式... (ID：919)
8、操作(ID:30083)
9、窗口(ID:30009)
1、新建窗口(ID：303)
2、重排窗口... (ID：298)
3、并排比较... (ID：7698)
4、隐藏(ID：865)
5、取消隐藏... (ID：866)
6、1 Object (ID：830)
7、此处为窗口名称(ID：830)
8、此处为窗口名称(ID：830)
9、此处为窗口名称(ID：830)
10、此处为窗口名称(ID：830)
11、此处为窗口名称(ID：830)
12、此处为窗口名称(ID：830)
13、此处为窗口名称(ID：830)
14、此处为窗口名称(ID：830)
15、此处为窗口名称(ID：830)
10、帮助(ID:30010)
1、Microsoft Excel 帮助(ID：984)
2、显示Office 助手(ID：1004)
3、转成Lotus 1-2-3 的帮助... (ID：936)
4、检测并修复... (ID：3774)
5、客户反馈选项... (ID：7714)
6、Microsoft Office Online (ID：3775)
7、关于Microsoft Office Excel (ID：927) 3、常用(NAME:Standard INDEX:3)
1、新建(ID:2520)
2、打开(ID:23)
3、保存(ID:3)
4、权限(无限制访问)(ID:9004)
5、邮件收件人(ID:3738)
6、打印(\\192.168.0.1\HP LaserJet 6L)(ID:2521)
7、打印预览(ID:109)
8、拼写检查...(ID:2)
9、信息检索...(ID:7343)
10、剪切(ID:21)
11、复制(ID:19)
12、粘贴(ID:6002)
1、公式(ID：5836)
2、值(ID：370)
3、无边框(ID：5837)
4、转置(ID：5838)
5、粘贴链接(ID：1956)
6、选择性粘贴... (ID：755)
13、格式刷(ID:108)
14、撤消(ID:128)
15、恢复(ID:129)
16、墨迹注释(ID:9071)
17、超链接...(ID:1576)
18、自动求和(ID:226)
1、求和(ID：226)
2、平均值(ID：5803)
3、计数(ID：5804)
4、最大值(ID：5806)
5、最小值(ID：5807)
6、其他函数... (ID：5808)
19、升序排序(ID:210)
20、降序排序(ID:211)
21、图表向导(ID:436)
22、绘图(ID:204)
23、显示比例:(ID:1733)
24、Microsoft Excel 帮助(ID:984) 4、格式(NAME:Formatting INDEX:4)
1、字体:(ID:1728)
2、字号:(ID:1731)
3、加粗(ID:113)
4、倾斜(ID:114)
5、下划线(ID:115)
6、左对齐(ID:120)
7、居中(ID:122)
8、右对齐(ID:121)
9、合并及居中(ID:402)
10、货币样式(ID:1643)
11、百分比样式(ID:396)
12、千位分隔样式(ID:397)
13、增加小数位数(ID:398)
14、减少小数位数(ID:399)
15、减少缩进量(ID:3162)
16、增加缩进量(ID:3161)
17、边框(ID:203)
1、边框(ID：1618)
2、绘图边框... (ID：6056)
18、填充颜色(ID:1691)
1、无颜色(ID：1453)
2、配色方案(ID：1455)
3、标准色(ID：1456)
4、最近所用颜色(ID：1457)
5、其他填充颜色... (ID：1051)
6、填充效果... (ID：1006)
7、填充效果... (ID：2668)
19、字体颜色(ID:401)
1、自动配色(ID：1926)
2、配色方案(ID：1927)
3、颜色(ID：1928)
5、数据透视表(NAME:PivotTable INDEX:5) 1、数据透视表(ID:30253)
1、设置报告格式... (ID：5473)
2、数据透视图(ID：3789)
3、数据透视表向导(ID：457)
4、刷新数据(ID：459)
5、脱机OLAP... (ID：3988)
6、删除... (ID：5955)
7、隐藏维度(ID：478)
8、选定(ID：30252)
9、组及显示明细数据(ID：30251)
10、公式(ID：30254)
11、顺序(ID：30485)
12、字段设置... (ID：460)
13、分类汇总(ID：6689)
14、排序并列出前10 个... (ID：6687)
15、属性字段... (ID：6076)
16、表选项... (ID：1604)
17、分页显示... (ID：461)
2、数据透视图(ID:30469)
1、字段设置... (ID：460)
2、选项... (ID：1604)
3、刷新数据(ID：459)
4、隐藏数据透视图字段按钮(ID：3956)
5、公式(ID：30254)
6、删除字段(ID：5416)
3、设置报告格式(ID:5473)
4、图表向导(ID:436)
5、隐藏明细数据(ID:464)
6、显示明细数据(ID:462)
7、刷新数据(ID:459)
8、隐藏总计项目(ID:5919)
9、始终显示项目(ID:5920)
10、字段设置...(ID:460)
11、显示字段列表(ID:3790) 6、图表(NAME:Chart INDEX:6)
1、图表对象:(ID:1622)
2、所选对象(ID:917)
3、图表类型...(ID:918)
1、图表类型(ID：1616)
4、图例(ID:439)
5、数据表(ID:987)
6、行中系列(ID:989)
7、列中系列(ID:988)
8、顺时针斜排(ID:1014)
9、逆时针斜排(ID:1013)
7、审阅(NAME:Reviewing INDEX:7)
1、批注(ID:1589)
2、前一批注(ID:1590)
3、下一批注(ID:1591)
4、显示/隐藏批注(ID:1593)
5、批注(ID:1594)
6、删除批注(ID:1592)
7、墨迹注释(ID:9071)
8、隐藏墨迹注释(ID:7500)
9、删除所有墨迹注释(ID:7674)
10、创建Microsoft Office Outlook 任务(ID:837)
11、更新文件(ID:455)
12、邮件收件人(以附件形式)...(ID:2188)
13、回复时包含更改...(ID:6139)
14、结束审阅...(ID:6141)
8、窗体(NAME:Forms INDEX:8)
1、标签(ID:476)
2、编辑框(ID:219)
3、分组框(ID:467)
4、按钮(ID:282)
5、复选框(ID:220)
6、选项按钮(ID:446)
7、列表框(ID:448)
8、组合框(ID:221)
9、组合式列表编辑框(ID:471)
10、组合式下拉编辑框(ID:475)
11、滚动条(ID:447)
12、微调项(ID:468)
13、控件属性(ID:222)
14、代码(ID:488)
15、切换网格(ID:485)
16、执行对话框(ID:470)
9、停止录制(NAME:Stop Recording INDEX:9)
1、停止录制(ID:2186)
2、相对引用(ID:896)
10、外部数据(NAME:External Data INDEX:10)
1、编辑查询...(ID:1950)
2、数据区域属性...(ID:1951)
3、参数...(ID:537)
4、刷新数据(ID:459)
5、取消刷新(ID:1953)
6、全部刷新(ID:1952)
7、更新状态(ID:1954)
11、公式审核(NAME:Formula Auditing INDEX:11)
1、错误检查...(ID:6122)
2、追踪引用单元格(ID:486)
3、移去引用单元格追踪箭头(ID:452)
4、追踪从属单元格(ID:451)
5、移去从属单元格追踪箭头(ID:450)
6、取消所有追踪箭头(ID:453)
7、追踪错误(ID:463)
8、批注(ID:1589)
9、圈释无效数据(ID:2035)
10、清除无效数据标识圈(ID:2055)
11、显示监视窗口(ID:5686)
12、公式求值(ID:5687)
12、全屏显示(NAME:Full Screen INDEX:12)
1、全屏显示(ID:178)
13、循环引用(NAME:Circular Reference INDEX:13)
1、定位循环引用:(ID:1623)
2、追踪从属单元格(ID:451)
3、追踪引用单元格(ID:486)
4、取消所有追踪箭头(ID:453)
14、Visual Basic(NAME:Visual Basic INDEX:14)
1、宏...(ID:186)
2、录制新宏...(ID:184)
3、安全...(ID:3627)
4、Visual Basic 编辑器(ID:1695)
5、控件工具箱(ID:548)
6、设计模式(ID:1605)
7、Microsoft 脚本编辑器(ID:3631)
15、Web(NAME:Web INDEX:15)
1、返回(ID:1017)
2、向前(ID:1018)
3、停止(ID:1019)
4、刷新(ID:1020)
5、开始页(ID:1016)
6、搜索Web(ID:1922)
7、收藏夹(ID:30176)
1、添加到收藏夹... (ID：1022)
2、打开收藏夹... (ID：1021)
8、前往(ID:30328)
1、打开超链接... (ID：1015)
2、返回(ID：1017)
3、向前(ID：1018)
4、开始页(ID：1016)
5、搜索Web (ID：1922)
6、设置“开始页”... (ID：2057)
7、设置“搜索页”... (ID：2058)
9、只显示“Web”工具栏(ID:1023)
10、地址:(ID:1740)
16、控件工具箱(NAME:Control Toolbox INDEX:16)
1、设计模式(ID:1605)
2、属性(ID:222)
3、查看代码(ID:1561)
4、复选框(ID:1848)
5、文本框(ID:1850)
6、命令按钮(ID:1851)
7、选项按钮(ID:1852)
8、列表框(ID:1853)
9、组合框(ID:1854)
10、切换按钮(ID:1855)
11、数值调节钮(ID:1856)
12、滚动条(ID:1857)
13、标签(ID:1858)
14、图像(ID:2089)
15、其他控件...(ID:642)
17、退出设计模式(NAME:Exit Design Mode INDEX:17)
1、设计模式(ID:1605)
18、刷新(NAME:Refresh INDEX:18)
1、刷新(ID:3817)
2、不刷新(ID:3819)
19、监视窗口(NAME:Watch Window INDEX:19) 1、监视窗口(ID:5684)
20、数据透视表字段列表(NAME:PivotTable Field List INDEX:20)
1、任务窗格(ID:5746)
21、边框(NAME:Borders INDEX:21)
1、绘图边框...(ID:6048)
1、绘图边框(ID：6206)
2、绘图边框网格(ID：6207)
2、擦除边框(ID:6049)
3、线条样式(ID:6050)
4、线条颜色(ID:6051)
1、自动配色(ID：6053)
2、配色方案(ID：6052)
3、标准色(ID：3242)
22、保护(NAME:Protection INDEX:22)
1、锁定单元格(ID:225)
2、允许用户编辑范围...(ID:6997)
3、保护工作表...(ID:893)
4、保护工作簿...(ID:894)
5、保护并共享工作簿...(ID:3059)
23、文本到语音(NAME:Text To Speech INDEX:23)
1、朗读单元格(ID:7006)
2、停止朗读(ID:7007)
3、按行(ID:7008)
4、按列(ID:7009)
5、按回车键开始朗读(ID:7010)
24、列表(NAME:List INDEX:24)
1、列表(ID:31262)
1、插入(ID：31274)
2、删除(ID：31275)
3、排序... (ID：928)
4、记录单... (ID：860)
5、发布列表... (ID：7684)
6、重设列表大小... (ID：7765)
7、在服务器上查看列表(ID：7763)
8、转换为区域(ID：7375)
9、取消链接列表(ID：7683)
10、数据区域属性... (ID：1951)
2、切换汇总行(ID:7372)
3、同步列表(ID:7761)
4、放弃更改并刷新(ID:7762)
5、刷新XML 数据(ID:7812)
6、导入...(ID:7433)
7、导出...(ID:7432)
8、XML 映射属性...(ID:7813)
9、编辑查询...(ID:7897)
10、图表向导(ID:7764)
11、打印列表(ID:7380)
25、并排比较(NAME:Compare Side by Side INDEX:25)
1、同步滚动(ID:7873)
2、重置窗口位置(ID:7874)
3、并排比较...(ID:7698)
26、绘图(NAME:Drawing INDEX:26)
1、绘图(ID:30013)
1、组合(ID：164)
2、取消组合(ID：165)
3、重新组合(ID：338)
4、叠放次序(ID：30078)
5、自动靠齐(ID：30084)
6、微移(ID：30082)
7、对齐或分布(ID：30174)
8、旋转或翻转(ID：30036)
9、重排连接符(ID：1033)
10、编辑顶点(ID：206)
11、改变自选图形(ID：30080)
12、设置自选图形的默认效果(ID：2179)
2、选择对象(ID:182)
3、自选图形(ID:30177)
1、线条(ID：2631)
2、连接符(ID：2633)
3、基本形状(ID：2632)
4、箭头总汇(ID：1049)
5、流程图(ID：1048)
6、星与旗帜(ID：1050)
7、标注(ID：1047)
8、其他自选图形... (ID：3889)
4、直线(ID:130)
5、箭头(ID:243)
6、矩形(ID:1111)
7、椭圆(ID:1119)
8、文本框(ID:139)
9、竖排文本框(ID:318)
10、艺术字...(ID:1031)
11、图示...(ID:1032)
12、剪贴画...(ID:682)
13、来自文件...(ID:2619)
14、墨迹绘图与书写(ID:9405)
15、填充颜色(ID:1691)
1、无颜色(ID：1453)
2、配色方案(ID：1455)
3、标准色(ID：1456)
4、最近所用颜色(ID：1457)
5、其他填充颜色... (ID：1051)
6、填充效果... (ID：1006)
7、填充效果... (ID：2668)
16、线条颜色(ID:1692)
1、无颜色(ID：1458)
2、自动配色(ID：1459)
3、配色方案(ID：1460)
4、标准色(ID：1461)
5、最近所用颜色(ID：1462)
6、其他线条颜色... (ID：1052)
7、带图案线条... (ID：1053)
17、字体颜色(ID:401)
1、自动配色(ID：1926)
2、配色方案(ID：1927)
3、颜色(ID：1928)
18、线型(ID:692)
1、线条宽度(ID：1563)
2、线型(ID：2917)
3、其他线条... (ID：1054)
19、虚线线型(ID:693)
1、虚线线型(ID：1448)
20、箭头样式(ID:694)
1、箭头样式(ID：1449)
2、其他箭头... (ID：1055)
21、阴影样式(ID:394)
1、无颜色(ID：1463)
2、阴影样式(ID：1450)
3、阴影设置... (ID：1056)
22、三维效果样式(ID:339)
1、无颜色(ID：1468)
2、三维样式(ID：1451)
3、三维设置... (ID：1057)
27、数据透视图菜单(NAME:PivotChart Menu INDEX:27)
1、字段设置...(ID:460)
2、选项...(ID:1604)
3、刷新数据(ID:459)
4、隐藏数据透视图字段按钮(ID:3956)
5、公式(ID:30254)
1、计算字段... (ID：1597)
2、计算项... (ID：1598)
3、求解次序... (ID：2914)
4、列出公式(ID：992)
6、删除字段(ID:5416)
28、工作簿标签(NAME:Workbook tabs INDEX:28)
1、Sheet1(ID:957)
2、工作表列表(ID:957)
3、工作表列表(ID:957)
4、工作表列表(ID:957)
5、工作表列表(ID:957)
6、工作表列表(ID:957)
7、工作表列表(ID:957)
8、工作表列表(ID:957)
9、工作表列表(ID:957)
10、工作表列表(ID:957)
11、工作表列表(ID:957)
12、工作表列表(ID:957)
13、工作表列表(ID:957)
14、工作表列表(ID:957)
15、工作表列表(ID:957)
16、工作表列表(ID:957)
29、单元格(NAME:Cell INDEX:29)
1、剪切(ID:21)
2、复制(ID:19)
3、粘贴(ID:22)
4、选择性粘贴...(ID:755)
5、单元格...(ID:295)
6、删除...(ID:292)
7、清除内容(ID:3125)
8、插入批注(ID:2031)
9、删除批注(ID:1592)
10、显示/隐藏批注(ID:1593)
11、设置单元格格式...(ID:855)
12、从下拉列表中选择...(ID:1966)
13、添加监视点(ID:5685)
14、创建列表...(ID:7193)
15、超链接...(ID:1576)
16、编辑超链接...(ID:1577)
17、打开超链接...(ID:1015)
18、取消超链接(ID:3626)
19、查阅...(ID:7685)
30、列(NAME:Column INDEX:30)
1、剪切(ID:21)
2、复制(ID:19)
3、粘贴(ID:22)
4、选择性粘贴...(ID:755)
5、列(ID:297)
6、删除...(ID:294)
7、清除内容(ID:3125)
8、设置单元格格式...(ID:855)
9、列宽...(ID:542)
10、隐藏(ID:886)
11、取消隐藏(ID:887)
31、行(NAME:Row INDEX:31)
1、剪切(ID:21)
2、复制(ID:19)
3、粘贴(ID:22)
4、选择性粘贴...(ID:755)
5、行(ID:296)
6、删除...(ID:293)
7、清除内容(ID:3125)
8、设置单元格格式...(ID:855)
9、行高...(ID:541)
10、隐藏(ID:883)
11、取消隐藏(ID:884)
32、单元格(NAME:Cell INDEX:32)
1、剪切(ID:21)
2、复制(ID:19)
3、粘贴(ID:22)
4、选择性粘贴...(ID:755)
5、单元格...(ID:295)
excel表格的基本操作教案
excel表格的基本操作教案篇一：《excel工作表的基本操作》教学设计 《excel工作表的基本操作》教学设计 【教学目标】 1、掌握工作表的插入、复制、移动、删除方法 2、训练学生自学能力 3、培养学生有计划的学习习惯 【教学重难点】 1、掌握工作表的插入、复制、移动、删除方法 2、训练学生自学能力 【教材分析】本节是科教版第四章第二节《表格信息加工》的第一课时内容。 【学生分析】高一年级学生在初中已学会工作表数据的录入与修改的基础上学习本节内容，将学生被分为四个大组，每个大组中，四人一小组团结合作，互帮互助，每个组挑选一个操作较好的做小组长，负责帮助有困难的同学并协助老师上课。 【教学模式与设计】在课前，教师把设计好的EXCEL
练习发送到学生机上，课上教师利用大屏幕、Powerpoint课件展示教学内容及操作步骤，教学采用先让学生根据老师给的操作步骤自己操作、后学生反馈演示、教师总结演示等方法完成教学内容。 【课时安排】一课时 【教具】计算机网络教室、投影、广播教学软件 【教学流程】 【课件展示】问候语 一、导入新课 教师：上节课我们已经学会给一张工作表输入数据，并能对工作表进行一些简单的修改，同学们已基本上完成老师布置的任务。这节课我们讲的内容还和输入有关，也许有的同学认为输入这么简单的问题还要再讲吗？用键盘敲就是了！ 其实数据输入里面有很多学问，想又快又准确的输入数据吗？ 学生回答：想知道…… 激发学生的求知欲，使教师乐“教”变成学生乐“学” 广播：打开“演示”工作簿中“课外活动表”
教师：这是大家上节课输入的工作表，大部分同学完成了老师的任务，也有一些同学在输入过程中遇到一些小困难，如有的同学忘记输入第一行的标题了，这该怎么办呢？大家有什么办法能帮助这位同学完成任务吗？ 学生：插入等…… 教师：很好，有的同学已经预习了今天的学习内容，我们今天要学习的内容就是： 【课件展示】：本节课的课题“工作表的基本操作”及本节课主要教学任 务 二、导入新课 1、插入、复制 广播：“演示”工作簿中的“课外活动表1” 教师：现在老师要交给大家一个任务，请大家打开“D：\练习”工作簿中“练习1”工作表，给工作表中加入两列“活动时间”和“序号”，并填充数据如大屏幕所示。 由于信息技术的发展速度太快，软件可以说是日新月异，每个软件的使用不可能全靠老师来教，大家应学会自主学习，为了逐步锻炼大家的自学能力，今天老师先不给大家
《VisualFoxPro6.0简明教程》教学指导书(精)
《Visual FoxPro6.0简明教程》教学指导书 一、教学目的和要求 本课程以Visual Foxpro 6.0 为基础，讲授数据库系统的基本概念和基本理论，使学生了解关系型数据库的基本概念和程序设计方法，能够独立编写VFP程序，并结合数据库的操作管理功能，实现信息管理与查询功能，为后续课程学习奠定基础。 通过本课程的学习，使学生掌握数据库的基本概念、操作、查询；掌握高级语言程序设计及可视化编程功能，掌握可视化编程技巧及技术。学完本课程后，学生应该能够独立编制小型数据库应用程序。 为了便于教师备课，掌握进度，我们给出该课程的教学指导书。但基于各学校的教学安排和情况有所不同，所以很难有统一要求，我们仅以每周3+2学时为例（3节上课，2节上机，按18周设计）写出教学要求。对于每周2+2学时的教学单位有些章节内容可以删略。 二、课程内容及其安排 （课程安排以教育部高职高专规划教材《Visual FoxPro6.0简明教程》为基础） 教学课程内容安排： 第一周 内容：第1章Visual FoxPro 6.0概述 教学目的： 要求学生掌握VFP6.0的功能，VFP6.0系统的软硬件环境，VFP6.0系统的安装及性能指标和VFP6.0文件组成。 教学重点与难点： 1.VFP6.0系统的启动 2. VFP6.0环境介绍 3．VFP6.0文件组成 作业： 1.VFP 6.0的主要特点是什么？ 2．VFP 6.0主要使用哪两种菜单？ 3．VFP 6.0的数据库文件和数据表文件的扩展名是什么？ 第二周 内容：项目管理器 教学目的： 使学生学会项目管理器的建立和使用. 教学重点与难点： 1.项目管理器的建立和界面操作 2. 设计器与生成器的使用 3. 工作目录与搜索路径的建立 作业： 1.什么是项目管理器？ 2．如何进入项目管理器 3．项目文件的扩展名是什么？
VisualFoxpro编程实例
实验五 Visual Foxpro编程实践 一. 实验目的与要求 掌握利用Visual Foxpro编制开发自己的应用程序的实践知识，并学会在程序调试中自行发现问题和修改程序代码，最终完成应用程序的无错运行。 二. 相关知识 利用Visual Foxpro自行开发编制应用程序的步骤： 1．设置好系统的工作环境(尤其注意工作目录的默认设置)。 2．如果是初次进行，应当先建立一个项目，为该项目命名，激活项目管理器。如果是接着上次的工作进行，则打开上次工作的本项目，同样也激活项目管理器。 3．在项目管理器的“数据”“数据库”下面创建一个数据库，并命名(如已创建，则跳过本步骤)。 4．在项目管理器的“数据”“数据库”“表”下面进行数据表的创建或修改工作，并输入少量的正确数据以便将来的运行调试(如果已经创建了数据表，则跳过本步骤)。 5．在项目管理器的“文档”下面创建该应用程序所用到的所有表单，设计好各表单的界面并为表单里的控件填写程序代码.(注意为表单添加各自的数据环境，否则会出错!) 6．试运行各表单，发现问题后重新修改有问题的表单的代码，反复调试和修改直至最后能无错运行。 7．将应用程序打包发布或制作成安装文件。 三. 实验容与步骤 本次实验以一个简单的学生成绩管理系统为例。首先，对该系统作一个简单的介绍：该应用系统为完成学生信息和成绩的管理系统，主要有以下几个应用模块： (1)用户登录管理：系统具有管理员功能，只有取得管理员权限的人才能使用本系统。 (2)数据添加功能：对学生基本信息、教师基本信息、班级信息、课程信息、学生成 绩信息进行添加录入。 (3)数据查询功能：对上述信息的基本查询。 (4)数据修改功能：对上述信息可进行修改工作。 (5)统计操作：可分别按个人成绩、单科成绩统计出最高成绩、最低成绩和平均成绩 等。 (6)打印功能：对上述信息可进行打印。 实验步骤如下： 1．数据库设计： 首先设置好系统的运行环境和工作目录，然后建立项目，为项目命名为“学生成绩管理系统”，激活项目管理器，并在在项目管理器的“数据”“数据库”下面创建一个数据库，命名为“学生成绩管理”，在“数据库”的“表”下面创建以下各数据表： 字段名称类型宽度 用户名字符型10 密码字符型10 字段名称类型宽度 学号字符型8 字符型10
excel表格的基本操作快捷指令
excel表格的基本操作 Excel 快捷键和功能键 Ctrl 组合快捷键 按键说明 Ctrl+( 取消隐藏选定范围内所有隐藏的行。 Ctrl+) 取消隐藏选定范围内所有隐藏的列。 Ctrl+& 将外框应用于选定单元格。 Ctrl+_ 从选定单元格删除外框。 Ctrl+~ 应用“常规”数字格式。 Ctrl+$ 应用带有两位小数的“货币”格式（负数放在括号中）。 Ctrl+% 应用不带小数位的“百分比”格式。 Ctrl+^ 应用带有两位小数的“指数”格式。 Ctrl+# 应用带有日、月和年的“日期”格式。 Ctrl+@ 应用带有小时和分钟以及AM 或PM 的“时间”格式。 Ctrl+! 应用带有两位小数、千位分隔符和减号(-)（用于负值）的“数值”格式。Ctrl+- 显示用于删除选定单元格的“删除”对话框。 Ctrl+* 选择环绕活动单元格的当前区域（由空白行和空白列围起的数据区域）。在数据透视表中，它将选择整个数据透视表。 Ctrl+: 输入当前时间。 Ctrl+; 输入当前日期。 Ctrl+` 在工作表中切换显示单元格值和公式。 Ctrl+' 将公式从活动单元格上方的单元格复制到单元格或编辑栏中。 Ctrl+" 将值从活动单元格上方的单元格复制到单元格或编辑栏中。 Ctrl++ 显示用于插入空白单元格的“插入”对话框。 Ctrl+1 显示“单元格格式”对话框。 Ctrl+2 应用或取消加粗格式设置。 Ctrl+3 应用或取消倾斜格式设置。 Ctrl+4 应用或取消下划线。 Ctrl+5 应用或取消删除线。 Ctrl+6 在隐藏对象、显示对象和显示对象占位符之间切换。 Ctrl+7 显示或隐藏“常用”工具栏。 Ctrl+8 显示或隐藏大纲符号。 Ctrl+9 隐藏选定的行。 Ctrl+0 隐藏选定的列。 Ctrl+A 选择整个工作表。 如果工作表包含数据，则按Ctrl+A 将选择当前区域。再次按Ctrl+A 将选择整个工作表。 当插入点位于公式中某个函数名称的右边时，则会显示“函数参数”对话框。
(完整版)Excel表格的基本操作[初学者专用]超级技能
目录 技巧1、单元格内强制换行 技巧2、锁定标题行 技巧3、打印标题行 技巧4、查找重复值 技巧5、删除重复值 技巧6、快速输入对号√ 技巧7、万元显示 技巧8、隐藏0值 技巧9、隐藏单元格所有值。 技巧10、单元格中输入00001 技巧11、按月填充日期 技巧12、合并多个单元格内容 技巧13、防止重复录入 技巧14、公式转数值 技巧15、小数变整数 技巧16、快速插入多行 技巧17、两列互换 技巧18、批量设置求和公式 技巧19、同时查看一个excel文件的两个工作表。技巧20：同时修改多个工作表 技巧21：恢复未保存文件 技巧22、给excel文件添加打开密码 技巧23、快速关闭所有excel文件 技巧24、制作下拉菜单 技巧25、二级联动下拉 技巧27、删除空白行 技巧28、表格只能填写不能修改 技巧29、文字跨列居中显示 技巧30、批注添加图片 技巧31、批量隐藏和显示批注 技巧32、解决数字不能求和 技巧33、隔行插入空行 技巧34、快速调整最适合列宽 技巧35、快速复制公式 技巧36、合并单元格筛选
技巧1、单元格内强制换行 在单元格中某个字符后按alt+回车键，即可强制把光标换到下一行中。 技巧2、锁定标题行 选取第2行，视图 - 冻结窗格 - 冻结首行（或选取第2行 - 冻结窗格）冻结后再向下翻看时标题行始终显示在最上面。 技巧3、打印标题行 如果想在打印时每一页都显示标题，页面布局 - 打印标题 - 首端标题行：选取要显示的行
技巧4、查找重复值 选取数据区域 - 开始 - 条件格式 - 突出显示单元格规则 - 重复值。 显示效果：
Excel表格的基本操作所有功能键的按键说明
Excel表格的基本操作所有功能键的按键说明： F1显示“帮助”任务窗格。 按Ctrl+F1可关闭并重新打开当前任务窗格。 按Alt+F1可创建当前范围中数据的图表。 按Alt+Shift+F1可插入新的工作表。 F2编辑活动单元格并将插入点放在单元格内容的结尾。如果禁止在单元格中进行编辑，它也会将插入点移到编辑栏中。 按Shift+F2可编辑单元格批注。 F3将定义的名称粘贴到公式中。 按Shift+F3将显示“插入函数”对话框。 F4重复上一个命令或操作（如有可能）。 按Ctrl+F4可关闭选定的工作簿窗口。 F5显示“定位”对话框。 按Ctrl+F5可恢复选定工作簿窗口的窗口大校 F6切换到已拆分（“窗口”菜单，“拆分”命令）的工作表中的下一个窗格。 按Shift+F6可切换到已拆分的工作表中的上一个窗格。 如果打开了多个工作簿窗口，则按Ctrl+F6可切换到下一个工作簿窗口。 F7显示“拼写检查”对话框，以检查活动工作表或选定范围中的拼写。 如果工作簿窗口未最大化，则按Ctrl+F7可对该窗口执行“移动”命令。使用箭头键移动窗口，并在完成时按Esc。 F8打开或关闭扩展模式。在扩展模式中，“EXT”将出现在状态行中，并且按箭头键可扩展选定范围。 通过按Shift+F8，您可以使用箭头键将非邻近单元格或范围添加到单元格的选定范围。当工作簿未最大化时，按Ctrl+F8可执行“大小”命令（在工作簿窗口的“控制”菜单上。 按Alt+F8可显示用于运行、编辑或删除宏的“宏”对话框。 F9计算所有打开的工作簿中的所有工作表。 如果先按F9再按Enter（对于数组公式则按Ctrl+Shift+Enter），则会计算选定的公式部分，并将选定部分替换为计算出的值。 按Shift+F9可计算活动工作表。 按Ctrl+Alt+F9可计算所有打开的工作簿中的所有工作表，不管它们自上次计算以来是否已更改。 如果按Ctrl+Alt+Shift+F9，则会重新检查相关公式，然后计算所有打开的工作簿中的所有单元格，其中包括未标记为需要计算的单元格。 按Ctrl+F9可将工作簿窗口最小化为图标。 F10选择菜单栏或同时关闭打开的菜单和子菜单。 按Shift+F10可显示选定项目的快捷菜单。 按Alt+Shift+F10可显示智能标记的菜单或消息。如果存在多个智能标记，按该组合键可切换到下一个智能标记并显示其菜单或消息。
数据库的创建与表间关系的各种操作
学科实验报告 班级2010级金融姓名陈光伟学科管理系统中计算机应用实验名称数据库的创建与表间关系的各种操作 实验工具Visual foxpro 6.0 实验目的1、掌握数据库结构的创建方式 2、表间的关联关系 实验步骤一、建立数据库。 1、在项目管理器中建立数据库。首先选择数据库，然后单击“新建”建立数据库，出现的界面提示用户输入数据库的名称，按要求输入后单击“保存”则完成数据库的建立，并打开i“数据库设计器”。 2、从“新建”对话框建立数据库。单击工具栏上的“新建”按钮或者选择菜单“文件——新建”打开“新建”对话框，首先在“文件类型”组框中选择“数据库”，然后单击“新建文件”建立数据库，后面的操作和步骤与1相同。 3、用命令交互建立数据库。命令是create database【databasename ▏？】 二、表间关系的各种操作。 1、创建索引文件。可以再创建数据表时建立其结构复合索引文件，但是也可以先建立好数据表，以后再创建或修改索引文件。 2、索引的操作。A、打开与关闭。要使用索引，必须先要打开索引。一旦数据表文件关闭所有相应的索引文件也就自动关闭了。B、确定主控索引。可以使用命令确定当前主控索引。命令格式1：set order to 【tag】<索引标识>【ascending| desceding】命令格式2：use<表文件名>order【tag】<索引标识>【ascending | esceding】C、删除索引标识。要删除结构复合索引文件中的索引标识，应当打开数据表文件，并打开其表设计器对话框。在“索引”页面中选定要删除的索引标识后，单击“删除”按钮删除。 3、创建关联。在创建数据表之间的关联时，把当前数据表叫做父表，而把要关联的表叫做子表。必须保证两个要建立关系的数据表中存在能够建立联系的同类字段；同时要求每个数据表事先分别以该字段建立了索引。A、建立表间的一对一的关系。在“数据库设计器”窗口中选择M表中的字段，并按住左键拖到关联表H中对应字段上，放开鼠标左键。这是可以看到在两个表之间的相关字段上产生了一条连线，表明两个表之间已经建立了“一对一”关系。B、建立表间一对多的关系。将M表的名称字段MC设定为主索引，或者候选索引；H表中的JG字段已经设置成普通索引。在“数据库设计器”窗口中将MC字段拖到关联表中对应字段JG上，放开鼠标左键。这时可以看到在两个表之间的相关字段上产生了一条显然与“一对一”关联不同形式的连线，表明两个表之间已经建立了“一对多”关系。 4、调整或删除关联。A、删除关联。在数据库设计器对话框窗口中，首先必须用鼠标左键单击关联线，该连线变粗了说明它已被选中。如果要删除可敲【del】。也可以单击鼠标右键在弹出对话框窗口中单击“删除关联”选项。B、编辑关联。在数据库设计器对话框窗口中，首先必须用鼠标左键单击关联线，该连线变粗了说明已被选中。在主菜单“数据库”选项的下拉菜单中的“编辑关系”选项，也可以单击鼠标右键在弹出对话框窗口中单击“编辑关系”选项。 5、设置数据表之间的参照完整性。在对数据库表建立关联关系后，就可以设置两个相关数据表之间操作的有效性原则。这些规则可以控制相关表中的记录的插入、删除或修改。
《excel工作表的基本操作》教学设计
《excel工作表的基本操作》教学设计 【教学目标】 1、掌握工作表的插入、复制、移动、删除方法 2、训练学生自学能力 3、培养学生有计划的学习习惯 【教学重难点】 1、掌握工作表的插入、复制、移动、删除方法 2、训练学生自学能力 【教材分析】本节是科教版第四章第二节《表格信息加工》的第一课时内容。【学生分析】高一年级学生在初中已学会工作表数据的录入与修改的基础上学习本节内容，将学生被分为四个大组，每个大组中，四人一小组团结合作，互帮互助，每个组挑选一个操作较好的做小组长，负责帮助有困难的同学并协助老师上课。 【教学模式与设计】在课前，教师把设计好的EXCEL练习发送到学生机上，课上教师利用大屏幕、Powerpoint课件展示教学内容及操作步骤，教学采用先让学生根据老师给的操作步骤自己操作、后学生反馈演示、教师总结演示等方法完成教学内容。 【课时安排】一课时 【教具】计算机网络教室、投影、广播教学软件 【教学流程】 【课件展示】问候语 一、导入新课 教师：上节课我们已经学会给一张工作表输入数据，并能对工作表进行一些简单的修改，同学们已基本上完成老师布置的任务。这节课我们讲的内容还和输入有关，也许有的同学认为输入这么简单的问题还要再讲吗？用键盘敲就是了！ 其实数据输入里面有很多学问，想又快又准确的输入数据吗？ 学生回答：想知道…… 激发学生的求知欲，使教师乐“教”变成学生乐“学” 广播：打开“演示”工作簿中“课外活动表” 教师：这是大家上节课输入的工作表，大部分同学完成了老师的任务，也有一些同学在输入过程中遇到一些小困难，如有的同学忘记输入第一行的标题了，这该怎么办呢？大家有什么办法能帮助这位同学完成任务吗？ 学生：插入等…… 教师：很好，有的同学已经预习了今天的学习内容，我们今天要学习的内容就是： 【课件展示】：本节课的课题“工作表的基本操作”及本节课主要教学任
visualfoxpro程序设计实验报告
VF程序设计实验报告 图书馆管理系统 专业： 学号： 姓名： 指导教师：
2010年12月31日 目录 第一部分系统概述--------------------------------2第二部分系统功能模块设计------------------------2第三部分系统数据库及表设计----------------------2第四部分系统菜单设计----------------------------5第五部分系统界面设计----------------------------6第六部分系统相关程序代码-----------------------13第七部分实验报告小结---------------------------22第八部分参考资料-------------------------------22
一、系统概述 近年来，随着图书馆规模的不断扩大，图书数量相应的增加，有关图书的各种信息量也成倍增加，面对庞大的信息量，传统的人工管理户导致图书管理的混乱，人力与物力过多的浪费，图书管理费用的增加，从而使图书馆的负担过重，影响整个图书馆的运作和控制管理。因此，为了充分发挥了图书馆的功效，最大限度地为读者服务，必须制定一套合理、有效，规范和实用的图书馆管理系统，对图书资料进行集中统一的管理。 根据上述需要，我们建立本图书馆管理系统。 根据图书、读者和管理员三者之间的关系，本系统主要实现读者对图书的查询、个人信息的修改和管理员对读者、图书的管理。 本系统采用作为开发工具。 二、系统功能模块设计 本系统可以完成一般图书馆关于图书查询、借阅及书库管理的主 要功能。其中：图书查询模块可以查询所需要的图书；读者管理模块 中，读者可以查看自己的信息，对登陆密码进行修改，管理员可以对
VisualFoxPro数据库编程函数大全
大全 数据库函数大全 VisualFoxPro数据库函数 ADATABASES()将所有打开数据库的名称和路径放到内存变量数组中 ADBOBJECTS()把当前数据库中的命名连接名、关系名、表名或sQL视图名放到一个内存变量数组中AFIELDS()把当前表的结构信息存放在一个数组中，并且返回表的字段数 ALIAS()返回当前表或指定工作区衰的别名 ASESSIONS()创建一个已存在的数据工作期ID数组 ATAGINFO()创建一个包含索引和键表达式的名字、数量和类型信息的数组 AUSED()将一个数据工作期中的表别名和工作区存入内存变量数组 BOF()确定当前记录指针是否在表头 CANDIDATE()判断索引是否为候选索引 CDX()根据指定的索引位置编号，返回打开的复合索引(．CDX)文件名称 CPDBP()返回一个打开表所使用的代码页 CREATEOFFLINE()由已存在的视图创建一个游离视图 CURSORGETPROP()返回VisualFoxPro表或临时表的当前属性设置 CURSORSETPROP()指定VisualFoxPro表或临时表的属性设置 CURSORTOXML()转换VisualFoxPro临时表为XML文本 CURVAL()从磁盘上的表或远程数据源中直接返回字段值 DBC()返回当前数据库的名称和路径 DBF()返回指定工作区中打开的表名，或根据表别名返回表名 DBSETPROP()给当前数据库或当前数据库中的字段、命名连接、表或视图设置一个属性 DELETED()返回一个表明当前记录是否标有删除标记的逻辑值 DESCENDING()是否用DESCENDING关键字创建了一个索引标识 DROPOFFLINE()放弃对游离视图的所有修改，并把游离视图放回到数据库中 EOF()确定记录指针位置是否超出当前表或指定表中的最后一个记录 FCOUNT()返回衰中的字段数目 FIELD()根据编号返回表中的字段名 FILTER()返回SETFILTER命令中指定的表筛选表达式 FLDLIST()对于SETmELDS命令指定的字段列表，返回其中的字段和计算结果字段表达式 FLOCK()尝试锁定当前表或指定表 FOR()返回一个己打开的单项索引文件或索引标识的索引筛选表达式 FOUND()如果CONTINUE、FIND、LOCATE或SEEK命令执行成功，函数的返回值为"真" FSIZE()以字节为单位，返回指定字段或文件的大小 GETFLDSTATE()返回一个数值，标明表或临时表中的字段是否已被编辑，或是否有追加的记录，或者记录的删除状态是否已更改 GETNEXTMODIFIED()返回一个记录号，对应于缓冲表或临时表中下一个被修改的记录 HEADER()返回当前或指定表文件的表头所占的字节数 IDXCOLLATE()返回索引或索引标识的排序序列 INDBC()如果指定的数据库对象在当前数据库中，则返回"真"(.T.) INDEXSEEK()在一个索引表中搜索第一次出现的某个记录 ISEXCLUSIVE()判断一个表或数据库是以独占方式打开的 ISFLOCKED()返回表的锁定状态 ISREADONLY()判断是否以只读方式打开表 ISRLOCKED()返回记录的锁定状态 KEY()返回索引标识或索引文件的索引关键字表达式 KEYMATCH()在索引标识或索引文件中搜索一个索引关键字 LOOKUP()在表中搜索字段值与指定表达式匹配的第一个记录 LUPDATE()返回一个表最近一次更新的日期
excel表格的基本操作_excel表格制作教程(免费下载)
excel表格的基本操作_excel表格制作教程（免费下载）Microsoft Excel是微软公司的办公软件Microsoft office的组件之一，是由 Microsoft为Windows和Apple Macintosh操作系统的电脑而编写和运行的一款试 算表软件。Excel 是微软办公套装软件的一个重要的组成部分，它可以进行各种数据的处理、统计分析和辅助决策操作，广泛地应用于管理、统计财经、金融等众多领域。下面讲解一下Excel表格必学的20招—— 一、让不同类型数据用不同颜色显示 在工资表中，如果想让大于等于2000元的工资总额以“红色”显示，大于等于1500元的工资总额以“蓝色”显示，低于1000元的工资总额以“棕色”显示，其它以“黑色”显示，我们可以这样设置。 1.打开“工资表”工作簿，选中“工资总额”所在列，执行“格式→条件格式”命令，打开“条件格式”对话框。单击第二个方框右侧的下拉按钮，选中“大于或等于”选项，在后面的方框中输入数值“2000”。单击“格式”按钮，打开“单元格格式”对话框，将“字体”的“颜色”设置为“红色”。 2.按“添加”按钮，并仿照上面的操作设置好其它条件(大于等于1500，字体设置为“蓝色”；小于1000，字体设置为“棕色”)。 3.设置完成后，按下“确定”按钮。 看看工资表吧，工资总额的数据是不是按你的要求以不同颜色显示出来了。 二、建立分类下拉列表填充项 我们常常要将企业的名称输入到表格中，为了保持名称的一致性，利用“数据有效性”功能建了一个分类下拉列表填充项。 1.在Sheet2中，将企业名称按类别(如“工业企业”、“商业企业”、“个体企业”等)分别输入不同列中，建立一个企业名称数据库。 2.选中A列(“工业企业”名称所在列)，在“名称”栏内，输入“工业企业”字符后，按“回车”键进行确认。 仿照上面的操作，将B、C……列分别命名为“商业企业”、“个体企业”…… 3.切换到Sheet1中，选中需要输入“企业类别”的列(如C列)，执行“数据→有效性”命令，打开“数据有效性”对话框。在“设置”标签中，单击“允许”右侧的下拉按钮，选中“序列”选项，在下面的“来源”方框中，输入“工业企业”，“商业企业”，“个体企业”……序列(各元素之间用英文逗号隔开)，确定退出。 再选中需要输入企业名称的列(如D列)，再打开“数据有效性”对话框，选中“序列”选项后，在“来源”方框中输入公式：=INDIRECT(C1)，确定退出。 4.选中C列任意单元格(如C4)，单击右侧下拉按钮，选择相应的“企业类别”填入单元格中。然后选中该单元格对应的D列单元格(如D4)，单击下拉按钮，即可从相应类别的企业名称列表中选择需要的企业名称填入该单元格中。 提示：在以后打印报表时，如果不需要打印“企业类别”列，可以选中该列，右击鼠标，选“隐藏”选项，将该列隐藏起来即可。 三、建立“常用文档”新菜单
数据库与表的创建和使用
数据库与表的创建和使用 一、常用字段类型 1、字符型 2、数值型 3、日期型 4、逻辑型(T是，F否) 5、备注型 二、项目管理器 项目管理器是VFP中处理数据和对象的主要工具。项目管理器是系统的“控制中心”。一个项目是文件、数据、文档、对象的集合，项目文件以扩展名*.pjx保存。 创建一个项目文件的方法 1、CREATE PROJECT 项目文件名或？ 2、文件—新建 3、工具栏“新建”按钮 二、数据库与表的概念 在VFP中有两种表：一种是自由表，它独立于任何数据库；一种是数据库表，它是数据库的一部分。 数据库和表是两个不同的概念。表是处理数据、建立关系数据库的应用程序的基础单元，它用于存储收集来的各种信息。而数据库是表的集合，它控制这些表协同工作，共同完成特定任务。 本节重点：数据库的创建和使用，数据库表的创建和使用，表的扩展属性，数据库表之间的关系的创建。 三、数据库的创建（*.dbc）
1、使用界面方式创建数据库：项目管理器、“新建”按钮 2、使用命令方式创建数据库 CREATE DATABASE 数据库文件名或？ 四、打开数据库 OPEN DATABASE 数据库名或？ 五、设置当前数据库 SET DATABASE TO 数据库名 六、修改数据库 MODIFY DATABASE 数据库文件名或？ 七、关闭数据库 CLOSE DATABASE &&关闭当前数据库 CLOSE DATABASE ALL &&关闭所有数据库 八、删除数据库 DELETE DATABASE 数据库文件名或？ 数据库表的创建和使用（*.dbf） 在VFP中，每个数据表可以有两种存在状态：自由表（即没有和任何数据库关联的*.dbf文件）或数据库表（即与数据库关联的*.dbf 文件）。属于某一数据库的表称为“数据库表”；不属于任何数据库而独立存在的表称为自由表。数据库表和自由表可以相互转换。 一、数据库表的创建
VFP程序设计教程习题答案
第一章 1.试说明数据与信息的区别和联系。 数据是人们用于记录事物情况的物理符号。信息是数据中所包含的意义。数据与信息既有区别，又有联系。数据是表示信息的，但并非任何数据都能表示信息，信息只是加工处理后的数据，是数据所表达的内容。另一方面信息不随表示它的数据形式而改变，它是反映客观现实世界的知识，而数据则具有任意性，用不同的数据形式可以表示同样的信息，信息只是加工处理后的数据，是数据所表达的内容。 2.什么是数据库、数据库管理系统和数据库系统？ 数据库是在数据库管理系统的集中控制之下，按一定的组织方式存储起来的、相互关联的数据集合。 数据库管理系统(Database Management System，DBMS)是对数据进行统一的控制和管理，从而可以有效地减少数据冗余，实现数据共享，解决数据独立性问题，并提供统一的安全性、完整性和并发控制功能的系统软件。 数据库系统是把有关计算机硬件、软件、数据和人员组合起来为用户提供信息服务的 系统。 3.简述数据库的三级模式结构。 为了有效地组织、管理数据，提高数据库的逻辑独立性和物理独立性，人们为数据库设 计了一个严谨的体系结构，数据库领域公认的标准结构是三级模式结构，它包括外模式、模 式和内模式。 模式又称概念模式或逻辑模式，对应于概念级。它是由数据库设计者综合所有用户的数 据，按照统一的观点构造的全局逻辑结构，是对数据库中全部数据的逻辑结构和特征的总体描述，是所有用户的公共数据视图(全局视图)。外模式又称子模式，对应于用户级。它是某个或某几个用户所看到的数据库的数据视图，是与某一应用有关的数据的逻辑表示。内模式又称存储模式，对应于物理级。它是数据库中全体数据的内部表示或底层描述。 4.数据库系统的特点是什么？ 特点是数据共享，减少数据冗余，具有较高的数据独立性，增强了数据安全性和完整性保护。 5.实体之间的联系有哪几种？分别举例说明。
VisualFoxPro常用函数分类表
VisualFoxPro磁盘_目录_文件函数 ADIR()将文件信息存放到数组中，然后返回文件个数。 CURDIR()返回当前目录或文件夹。 DEFAULTEXT()如果一个文件没有扩展名，则返回一个带新扩展名的文件名。DIRECTORY()若在磁盘上存在指定的目录，返回真(.T.)。 DISPLAYPA TH()为显示而截去长路径名到指定长度。 DRIVETYPE()返回指定驱动器的类型。 FDATE()返回文件最近一次修改的日期或日期时间。 FILE()如果在磁盘上找到指定的文件，则返回“真”(.T.)。 FILETOSTR()将一个文件的内容返回为一个字符串。 FORCEEXT()返回一个字符串，使用新的扩展名替换旧的扩展名FORCEPATH()返回一个文件名，使用新路径名代替旧文件名 FTIME()返回最近一次修改文件的时间。 FULLPATH()返回指定文件的路径或相对于另一文件的路径。 GETDIR()显示“选择目录”对话框，从中可以选择目录或文件夹。 GETFILE()显示“打开”对话框，并返回选定文件的名称。 JUSTDRIVE()从完整路径中返回驱动器的字母。 JUSTEXT()从完整路径中返回三字母的扩展名。 JUSTFNAME()返回完整路径和文件名中的文件名部分。 JUSTPATH()返回完整路径中的路径名。 JUSTTEM()返回完整路径和文件名中的根名(扩展名前的文件名)。 LOCFILE()在磁盘上定位文件并返回带有路径的文件名。 PUTFILE()激活“另存为…”对话框，并返回指定的文件名。 STRTOFILE()将一个字符串的内容写入一个文件。 SYS(3)返回一个合法文件名，可用来创建临时文件。 SYS(5)返回当前VisualFoxPro的默认驱动器。 SYS(7)返回当前格式文件的名称。 SYS(2000)返回一个按字母排序的与文件名和扩展名梗概匹配的第一个文件名。SYS(2003)返回默认驱动器或卷上的当前目录或文件夹的名称。 SYS(2014)返回指定文件相对于当前目录、指定目录或文件夹的最小化路径。SYS(2020)以字节数返回默认磁盘空间。 SYS(2022)以字节为单位返回指定磁盘簇(块)的大小。
excel表格的基本使用
excel表格的基本使用 我们本期学习一下表格的基本操作，比如如何透视，如何分列等等，学会这些操作我们处理数据的时候效率可以得到很大提高，这样就能抽出时间来做其他事情。 一、当我们要算某个区域的采样点数据时，并且这所有区域都是在一张表格里面，如果 不会透视作图，我们就得把每个区域的采样点放在一张表格里面再求和，这样特别费时间，如果会透视，就特别简单。具体操作如下： 1、首先我们选中你需要透视的列，如下图所示： 2、然后我们对这两列进行透视，具体操作，在插入里面，选择数据透视表，之后选择 确定，如下图所示： 3、之后我们选择区县作为行标签，在区县前面打钩，如下图所示： 4、之后我们就可以进行对采样点计算；
（1）、首先我们把采样点行标签拖到值里面，如下图所示： （2）、由于我们是要计算区县的总采样点，这里面他是默认的计数，我们的选择值下面下拉框里面的值字段设置，再选择求和，如下图所示： 5、这样我们就可以计算出区域的总采样点，如下图所示： 二、当我们把一个单元格里面的数据进行拆分时，如果才几个单元格，我们可以手动拆
分，如果涉及大量单元格，我们就得选择分列进行拆分； 1、首选我们选中要拆分的单元格，并在后面查出两列表格，如下图所示： 2、然后我们选择此数据进行分列； （1）、首先我们在工具栏里面选择数据再选择分列，如下图所示： （2）、接着我们选择的文件类型是分隔符号，选中之后再点击下一步，如下图所示：
（3）、点击下一步后选择其他，并在其他后面输入“-”，单击完成，如下图所示： （4）、这样我们就可以把此数据拆分出来，如下图所示： 三、当我们需要把两列数据合并起来并用横线连接，我们可使用如下操作： 1、首先我们可以在合并的后面插入一列，如下图所示：
Excel表格的基本操作技巧
Excel表格的基本操作技巧 Excel表格已经成为Office人员最常用的数据处理软件，但是对于一般人来说，所知道的Excel基本操作是很有限的。为此，小编就为大家整理了一些关于Excel表格的基本操作技巧，大家学会了，就能在你们的工作中灵活运用了，一起来看看吧。 Excel表格的基本操作一：修改字体 首先，从输入开始，先来调整字体吧。在工具栏那里一开始就可以发现字体的工具框了，在这里可以快速更改字体类型、大小、颜色等等的。
图1 字体 Excel表格的基本操作二：更改对齐方式 打好字，或者打字之前，都需要按照需要来调整字体的对齐方式的。在对齐方式工具栏中，可以快速随意地更改字体对齐方式，第一个小框中上三个图标是调整横向对齐的，下三个是调整纵向对齐的。而第二个框中还有一键调整字体的排列方向，第三个框中可以一键设置自动换行等。
图2 对齐方式 Excel表格的基本操作三：添加符号 如果想要输入一些数据制作消费统计表的话，那么就要输入￥这个符号了，一次次输入太麻烦了，直接在数字框那里，第一个就是货币的标志了，可以选择一批数据，批量添加呢。当然百分号、小数点也可以在那里快速修改。
图3 添加符号货币样式 Excel表格的基本操作四：插入和删除单元格 在单元格工具框中，可以快速一键插入或删除单元格。比如，有时输入的时候，输漏了一行数据，在这里点击插入下面的小三角，选择插入行就OK啦。
图4 插入单元格 Excel表格的基本操作五：常用函数一键搞定 如果需要求某几个单元格的和或者积之类的，那么就要用到公式了，但是不懂公式咋办?直接在在编辑框里面的第一个里找就可以了，点击求和(默认是求和的)的小三角，然后选择其他函数，就能直接找到自己想要的函数了。
《Visual Foxpro6.0数据库与程序设计》试题(附答案)
1.不允许记录中出现重复索引值的索引是（）。 A.主索引和普通索引 B.主索引，候选索引和普通索引 C.主索引和候选索引 D.普通索引，候选索引和唯一索引 2.结构化程序设计的三种基本逻辑结构是（）。 A.选择结构，循环结构和嵌套结构 B.顺序结构，选择结构和循环结构 C.选择结构，循环结构和模块结构 D.循环结构，递归结构和循环结构 3.Visual FoxPro参照完整性规则不包括（）。 A.更新规则 B.查询规则 C.删除规则 D.插入规则 4.测试数据库记录指针是否指向数据末尾所使用的函数是（）。 A.FOUND( ) B.BOF（） C.FILE（） D.EOF（） 5.命令SELECT 0的功能是（）。 A.选择编号最小的未使用工作区 B.选择0号工作区 C.关闭当前工作区的表 D.选择当前工作区 6.以下函数结果为“共和国”的是（）。 A.SUBSTR（“中华人民共和国”，5，3） B.SUBSTR（“中华人民共和国”9，6） C.SUBSTR（“中华人民共和国”9，3） D.SUBSTR（“中华人民共和国”5，6） 7.字符型数据的最大长度是( )。 A.20 B.254 C.10 D.255 8.如果内存变量和字段变量均有变量名"姓名"，那么引用内存的正确方法是（）。 A.M.姓名 B.M_>姓名 C.姓名 D.A和B都可以 9.一间宿舍可住多个学生，则实体宿舍和学生之间的联系是（）。 A.一对一 B.多对多 C.多对一 D.一对多 10.当前数据库文件有10条记录，执行下列命令后的结果是（）。 GO 5 APPEND BLANK ？RECNO（） A.11 B.6 C.5 D.10 11.Visual Foxpro的ZAP命令可以删除当前数据库文件的（）。 A.满足条件的记录 B.有删除标记的记录 C.结构 D.全部记录 12.命令：CREATE DATABASE ABC是用来（）。
Excel表格的基本操作(精选35个技巧)
【基本操作】Excel表格的基本操作（精选35个技巧） 目录 技巧1、单元格内强制换行 技巧2、锁定标题行 技巧3、打印标题行 技巧4、查找重复值 技巧5、删除重复值 技巧6、快速输入对号√ 技巧7、万元显示 技巧8、隐藏0值 技巧9、隐藏单元格所有值。 技巧10、单元格中输入00001 技巧11、按月填充日期 技巧12、合并多个单元格内容 技巧13、防止重复录入 技巧14、公式转数值 技巧15、小数变整数 技巧16、快速插入多行 技巧17、两列互换 技巧18、批量设置求和公式 技巧19、同时查看一个excel文件的两个工作表。 技巧20：同时修改多个工作表 技巧21：恢复未保存文件 技巧22、给excel文件添加打开密码 技巧23、快速关闭所有excel文件 技巧24、制作下拉菜单 技巧25、二级联动下拉 技巧26、删除空白行 技巧27、表格只能填写不能修改 技巧28、文字跨列居中显示 技巧29、批注添加图片 技巧30、批量隐藏和显示批注 技巧31、解决数字不能求和 技巧32、隔行插入空行 技巧33、快速调整最适合列宽 技巧34、快速复制公式 技巧35、合并单元格筛选
技巧1、单元格内强制换行 在单元格中某个字符后按alt+回车键，即可强制把光标换到下一行中。 技巧2、锁定标题行 选取第2行，视图- 冻结窗格- 冻结首行（或选取第2行- 冻结窗格）冻结后再向下翻看时标题行始终显示在最上面。
技巧3、打印标题行 如果想在打印时每一页都显示标题，页面布局- 打印标题- 首端标题行：选取要显示的行 技巧4、查找重复值 选取数据区域- 开始- 条件格式- 突出显示单元格规则- 重复值。
Visual FoxPro经典教程
Visual FoxPro 经典教程：第九章：创建表单 经典教程：第九章：
第九章： 第九章：创建表单
利用表单， 可以让用户在熟悉的界面下查看数据或将数据输入数据库。 但表单提供的远不止 一个界面：它还提供丰富的对象集，这些对象能响应用户（或系统）事件，这样就能使用户 尽可能方便和直观地完成信息管理工作。
本章内容要点：
? ? ? ? ?
设计表单 创建新表单 在表单中添加对象 处理对象 管理表单
设计表单
Visual FoxPro 提供了一个功能强大的表单设计器，使得设计表单的工作变得又快又容易。 在表单设计器中可以处理下列内容：
? ? ? ? ?
表单中不同类型的对象。 与表单相关联的数据。 顶层表单或子表单。 能一起操作的多个表单。 基于自定义模板的表单。
表单和表单集是拥有自己的属性、 事件和方法程序的对象， 在表单设计器中可以设置这些属 性、事件和方法程序。表单集包括了一个或多个表单，可以将它们作为一个整体来操作。例 如，如果在表单集中有四个表单，可以在运行时用一个命令显示或隐藏它们。
创建新表单
在“表单设计器”中可以新建表单， 而且在设计时刻就能看见其中各对象显示在用户面前的外 观。
若要新建一个表单
?
请在“项目管理器”中选定“表单”，并选择“新建”按钮。 -或者 -
?
从“文件”菜单中选择“新建”命令，选定“表单”按钮并选择“新建文件”按钮。 -或者 -
?
使用 CREATE FORM 命令。
表单设计器带下列工具栏的：表单设计器、表单控件、布局和 表单设计器带下列工具栏的：表单设计器、表单控件、布局和调色板
有关“表单设计器”的详细内容，请参阅《用户指南》中的第八章“用表单管理数据”。有关 工具栏的详细内容，请在“帮助”中查找“工具栏”，并选择与所需信息有关的工具栏。
设置数据环境
每一表单或表单集都包括一个数据环境。 数据环境是一个对象， 它包含与表单相互作用的表 或视图， 以及表单所要求的表之间的关系。 可以在“数据环境设计器”中直观地设置数据环境， 并与表单一起保存。
在表单运行时数据环境可自动打开、关闭表和视图。而且，通过设置“属性”窗口中 ControlSource 属性设置框，在这个属性框中列出数据环境的所有字段，数据环境将帮助您 设置控件的 ControlSource 属性。 若要打开数据环境设计器 1. 从“显示”菜单中选择“数据环境”。 2. 从快捷方式菜单中选择“添加”。 3. 在“添加表或视图”对话框中选择一表或视图添加到数据环境中去。
Excel表格的基本操作(精心整理)
Excel表格的基本操作 1、Excel表格的基本操作：Excel单元格的合并 2、Excel表格的基本操作：Excel字符格式设置 3、Excel表格的基本操作：给Excel中的数据添加单位 4、Excel表格的基本操作：Excel大写数字设置 5、Excel表格的基本操作：Excel中文日期格式 6、Excel表格的基本操作：Excel中行列隐藏操作 7、Excel表格的基本操作：Excel表格列宽行高设置 8、Excel表格的基本操作：Excel标题跨列居中 9、Excel表格的基本操作：Excel表格标题重复打印 10、Excel表格的基本操作：给Excel数据表添加页眉页脚 11、Excel表格的基本操作：Excel表格边框设置 12、Excel表格的基本操作：Excel单元格的合并 13、Excel表格的基本操作：Excel字符格式设置 14、Excel表格的基本操作：给Excel中的数据添加单位 15、Excel表格的基本操作：添加数据说明文字 16、Excel表格的基本操作教程：拆分窗口 17、Excel表格的基本操作教程：冻结行列标题 18、Excel表格的基本操作教程：添加多个视图 19、Excel表格的基本操作教程：打印指定页面 20、Excel表格的基本操作教程：设置打印区域
21、ExcelExcel表格的基本操作：“高级筛选” 22、Excel表格的基本操作：Excel 加密文件 23、Excel表格的基本操作：Excel分区域锁定 24、Excel表格的基本操作：共享Excel工作簿 25、Excel表格的基本操作：保护Excel 工作簿 26、Excel表格的基本操作：Excel工作表的移动 27、Excel表格的基本操作：Excel工作表的复制 28、Excel表格的基本操作：锁定和隐藏Excel公式 29、Excel表格的基本操作教程：加载“宏” 30、Excel表格的基本操作教程：保存“加载宏” 31、Excel表格的基本操作教程：按钮调用“宏” 32、Excel表格的基本操作教程：用窗体调用“宏” 33、Excel表格的基本操作教程：直接编辑“宏” 34、Excel表格的基本操作教程：运行“宏” 35、Excel表格的基本操作：在Excel中录制“宏” 36、Excel表格的基本操作：Excel中设置数据对齐方式 37、Excel表格的基本操作：Excel中特殊符号的输入 38、Excel表格的基本操作：Excel自定输入数据下拉列表 39、Excel表格的基本操作：Excel数据输入范围控制 40、Excel表格的基本操作：Excel正确输入身份证号码 41、Excel表格的基本操作：Excel自定义自动填充序列 42、Excel表格的基本操作：Excel内置序列批量填充
- Excel表格的基本操作技能
- (完整版)Excel表格的基本操作[初学者专用]超级技能
- Excel表格的基本操作技巧
- Excel表格的基本操作常用版
- Excel表格的10个基本操作
- 2020excel表格的基本操作实用技巧大全精品
- excel表格的基本操作
- Excel表格的基本操作教程
- Excel表格的基本操作(精心整理)
- excel表格的各种基本操作
- excel表格的基本操作快捷指令
- excel表格的基本实用操作100例
- excel表格的基本使用
- (2020年编辑)excel表格的基本操作实用技巧大全
- excel表格的基本操作剖析
- Excel表格的基本操作精心整理
- 《excel工作表的基本操作》教学设计
- Excel表格的基本操作(精心整理)
- Excel表格十大基本操作大全
- Excel课程_电子表格基本操作