一 : 如何用excel制作图表?excel画图方法介绍
在使用excel分析数据的过程中，我们或许面对一堆数据无法更为明晰的看到具体情况，那么我们可以通过将数据转换为我们能看到需要内容的趋势图进行分析更为直观，下面笔者分享下excel画图怎么画，具体的有哪些步骤。
步骤
1、这边笔者以一个考试成绩作图进行演示，通过数据进行画图我们可以直观的看到不同分数段的有哪些人，占多大比例
2、首先我们找到插入选项，找到后并点击
3、接着我们首先选择需要分析的名字，我们拖动鼠标选择数据，因为还需要只要具体分数，那么我们按住ctrl,继续选择学生的语文分数
4、全部选择以后我们在插入中找到图表
5、接着选择条形图
6、接着选择第一个就可以，最后出现效果是这样的
7、为了更美观一些我们右击选择
8、然后编辑选择修改数据，修改完成后确定
9、最后拉大一些，我们可以看到分数在80-90分最多，其中有哪些人，这样可以依次分析了
以上就是excel画图方法介绍，操作很简单的，大家学会了吗？希望这篇文章能对大家有所帮助！
二 : EXCEL技巧——如何制作课程表
[课程表设计]EXCEL技巧——如何制作课程表——简介
[课程表设计]EXCEL技巧——如何制作课程表——知识点
三 : Visual Foxpro中如何实现对EXCEL表格的操作
Visual Foxpro中如何实现对EXCEL表格的操作
VFP和Excel都可以用来进行处理数据库表格，如果巧妙地将二者的优点结合起来，将会大大方便我们的工作。［www.61k.com]比如我们可以利用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．给单元格赋值
www.61k.com (1,4).value=XM(XM为数据库字段名) 8．设置指定列的宽度(单位：字符个数)
oE www.61k.com (1).ColumnWidth=5 9．设置指定行的高度(单位：磅)
oE www.61k.com (1).RowHeight=1 (设定行高为1磅，1磅=0.035厘米)
oE www.61k.com ("50:100").RowHeight=1 &&设置第50行至100行的高度 10．在第18行之前插入分页符
oExcel.Worksheets("Sheet1").Rows(18).PageBreak=1 11．在第4列之前删除分页符
oE www.61k.com (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.Active www.61k.com ="报表1" 14．设置页眉(字体大小)
oExcel.Active www.61k.com ="&50报表1" &&'&'后面的50可以自定义，表示字体的大小
15．设置页脚
oExcel.Active www.61k.com ="第&P页"
15.设置页脚(字体大小)
oExcel.Active www.61k.com ="&28第&P页" &&'&'后面的28可以自定义，表示字体的大小
16．设置页眉到顶端边距为2厘米
oExcel.ActiveSheet.PageSetup.HeaderMargin=2/0.035 17．设置页脚到底边距为3厘米
oExcel.ActiveSheet.PageSetup.FooterMargin=3/0.035 18．设置顶边距为2厘米
oExcel.Active www.61k.com =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.Active www.61k.com =.t. 23．设置页面垂直居中
oExcel.Active www.61k.com =.t. 24．设置页面纸张大小(1－窄行8?5?11 39－宽行14?11 9:A4)
oExcel.ActiveSheet.PageSetup.PaperSize=1 25．打印单元格网线
oExcel.ActiveSheet.PageSetup.PrintGridlines=.t. 26．拷贝整个工作表
oExcel.Active www.61k.com 27．拷贝指定区域
oExcel.ActiveSheet.Range("A1:E2").Copy 28．粘贴
oExcel.WorkSheet("Sheet2").Range("A1").PasteSpecial 29．在第2行之前插入一行
oE www.61k.com (2).Insert 30．在第2列之前插入一列
oE www.61k.com (2).Insert 31．设置字体
oE www.61k.com (2,1).Font.Name="黑体" 32．设置字体大小
oE www.61k.com (1,1).Font.Size=25 33．设置字体为斜体
oE www.61k.com (1,1).Font.Italic=.t.
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
34．设置整列字体为粗体
oE www.61k.com (1).Font.Bold=.t. 35．清除单元格公式
oE www.61k.com (1,4).ClearContents 36．打印预览工作表
oExcel.ActiveSheet.PrintPreview 37．打印输出工作表
oExcel.ActiveSheet.PrintOut 38.
www.61k.com (1).Controls(1).accChild(18).Execute &&打印（菜单序号18为Excel2003的‘打印’项）
&&不同版本Excel的菜单序号可以通过以下程序取得
*(需要在VFP7.0以上运行)
oXls=GETOBJECT("","excel.sheet") XlApp=oXLS.APPLICATION XlSheet=XlApp.ActiveSheet
bars= www.61k.com .COUNT STR=''
FOR i=1 TO bars
STR=STR+CHR(13)+ALLTRIM(STR(i))+'、'+ www.61k.com (i).accName+'(NAME:'+ www.61k.com (i).NAME+'
INDEX:'+ALLTRIM(STR( www.61k.com (i).INDEX))+')'
bars2= www.61k.com (i).accChildCount FOR j=1 TO bars2 TRY
obj= www.61k.com (i).CONTROLS(j) STR=STR+CHR(13)+' '+ALLTRIM(STR(j))+'、'+ www.61k.com (i).CONTROLS(j).accname+'(ID:'+ALLTRIM(STR( www.61k.com (i).CONTROLS(j).ID))+')'
FOR k=1 TO obj.accChildCount TRY IF NOT EMPTY( www.61k.com (k).accname ) STR=STR+CHR(13)+' '+ALLTRIM(STR(k))+'、'+ www.61k.com (k).accName+' (ID：'+ ALLTRIM(STR( www.61k.com (k).ID))+')' ENDIF CATCH EXIT
ENDTRY ENDFOR CATCH EXIT ENDTRY ENDFOR
WAIT WINDOWS ALLTRIM(STR(i))+' / '+ALLTRIM(STR(bars))+'
'+STR(i/bars*100,10,2)+'%' NOWAIT ENDFOR
SAVE 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 = www.61k.com ("result", "Excel (*.xls), *.xls")
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
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)+"左页眉"
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
.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．拷贝整个工作表（含格式）
oE www.61k.com .copy &&拷贝
oExcel.sheets(1).select &&选择第一工作表
oExcel.ActiveSheet.Paste &&粘贴
oE www.61k.com (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") www.61k.com &&显示B5单元格的批注内容
oExcel.Workbooks.CLOSE oExcel.QUIT RELEASE oExcel
www.61k.com .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 将选择默认应答。(www.61k.com)
如果将本属性设置为 False，那么宏运行结束后， Microsoft Excel 并不自动将其设置回 True。故当宏运行结束后，都应将本属性设置回 True 值。
54.将当前工作表中的已用区域（只读）存入数组。 strPath='D:\TEST\123.xls' LOCAL oExcel
oExcel=CREATEOBJECT("Excel.Application") oExcel.WorkBooks.OPEN(strPath)
arrTableInfo=oExcel.ActiveSheet.UsedRange.VALUE &&将当前工作表中的已用区域（只读）存入数组。 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
ole.selection.Font.name="黑体" 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
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
lnSheetCount=.WorkBooks(1) www.61k.com &&统计工作表数量 ENDWITH
?'当前EXCEL表中工作表的数目为：'+ALLTRIM(STR(lnSheetCount)) FOR EACH oMyVar IN oExcel.sheets
?'当前EXCEL表中工作表的名称分别为'+oMyVar.name &&显示Excel表中所有工作表 NEXT oMyVar
oExcel.WORKBOOKS.CLOSE &&关闭工作簿 部分程序代码如下：
m.outfilename=putfile('输出结果','agcallop','xls') &&取导出文件名称
ef=CREATEOBJECT('Excel.application') &&调用Excel程序 ef.Workbooks.add &&添加工作簿
ef.Worksheets("sheet1").Activate &&激活第一个工作表 ef.visible=.t.
oExcel.QUIT &&退出Excel
-------------------------------------------------------------- 获取工作表名称
在以下示例中，创建了一个 microsoft excel 实例，添加了一个新的工作簿。（www.61k.com]使用 foreach 语句显示工作簿中每个工作表的名称。此示例要求在运行示例的机器上正确安装 microsoft excel。 oExcel = CREATE("Excel.Application") oExcel.Workbooks.ADD
FOR EACH oMyVar IN oExcel.sheets ? oMyVar.name NEXT oMyVar
-------------------------------------------------------------- Excel报表巧生成
巧让FoxPro数据生成Excel报表
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
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号，页脚处添加页号。
&&显示Excel界面 www.61k.com .Select &&选择整张表
ef.Selection.Font.Size = 10
&&设置整表默认字体大小为10 select 0 use agcallop
&&选择被导出的表 num=reccount()
&&求导出总记录数 go top i=5
ef.range("F1:K1").Select &&选择标题栏所在单元格 www.61k.com &&合并单元格 with ef.range("F1 ")
&&设置标题及字体属性
.value='客户服务部业务代表工作量情况统计表' .Font.Name="黑体" .Font.size=18 endwith
www.61k.com (2).RowHeight=1/0.035 &&设置第二行高度为1cm ef.range("H2:O2").Select
&&选定统计条件栏所在单元格 www.61k.com &&合并单元格
ef.range("H2").Font.size=10
ef.range("H2").HorizontalAlignment=4
&&设置内容对齐方式为右对齐,3为居中，4为右对齐
ef.range("H2").value='统计时间：'+dtoc(date())+' 打印日期：'+dtoc(date()) www.61k.com ("3:4").Select with ef.Selection
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
.HorizontalAlignment = 3 &&设置3、4行为水平对齐 .VerticalAlignment = 2 &&垂直居中
.NumberFormatLocal = "@" &&设置3、4行为字符型内容 endwith
ef.Range("A3:A4").Select www.61k.com
&&纵向合并第一列3、4行 ef.Range("A3").value='工号' &&设置第一列标题内容 www.61k.com ("A").Select &&整列选择
ef.Selection.HorizontalAlignment = 3 &&水平居中
www.61k.com ("A:B").Select
ef.Selection.NumberFormatLocal = "@" &&设置A、B列为字符型内容 ef.Range("B3:B4").Select www.61k.com
&&纵向合并第二列3、4行 ef.Range("B3").value='姓名' &&设置第二列标题内容 www.61k.com ("B").Select &&整列选择
ef.Selection.HorizontalAlignment = 3 &&水平居中
ef.Range("C3:E3").Select &&横向合并第三行C-E列 www.61k.com
ef.Range("C3").value='话务总量'
&&第三行大标题为“话务总量”的列 ef.Range("C4").value='电话呼入量'
&&“话务总量”下第1个小标题“电话呼入量”ef.Range("D4").value='电话呼出量'
&&“话务总量”下第2个小标题“电话呼出量”ef.Range("E4").value='合 计'
&&“话务总量”下第3个小标题“合计” ef.Range("F3:H3").Select www.61k.com
ef.Range("F3").value='话务总时间' ef.Range("F4").value='呼入时间' ef.Range("G4").value='呼出时间' ef.Range("H4").value='合 计' ef.Range("I3:K3").Select
www.61k.com
ef.Range("I3").value='单个话务平均时间' ef.Range("I4").value='呼入时间' ef.Range("J4").value='呼出时间' ef.Range("K4").value='合 计' ef.Range("L3:L4").Select www.61k.com
ef.Range("L3").value='累计工作时间' ef.Range("M3:M4").Select www.61k.com
ef.Range("M3").value='无效时间' ef.Range("N3:N4").Select www.61k.com
ef.Range("N3").value='录入量' ef.Range("O3:O4").Select www.61k.com
ef.Range("O3").value='有效时间比'
接下来通过scan语句，依次为每一行每一列单元格赋值。[www.61k.com］为了获得更好的打印效果，还需进行页面设置，如标题行、页面居中、横向排版等，还可以加边框线。
以上程序在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,RAT('\',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
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
RELEASE oExcel &&释放变量
*************例子****************** lcFileName='D:\TEST.XLS'
oExcel=CREATEOBJECT('Excel.application')
oExcel.Workbooks.Open('&lcFileName') &&打开文件 R=oExcel.SHEETS(1) www.61k.com .COUNT &&有数据的总行数
C=oExcel.SHEETS(1) www.61k.com .COUNT &&有数据的总列数
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
www.61k.com (R,C).Select &&选中数据
www.61k.com .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。[www.61k.com］ '前提：要安装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) www.61k.com .Count '有数据的总行数
C = oExcel.SHEETS(1) www.61k.com .Count '有数据的总列数
www.61k.com (R, C).Select '选中数据
www.61k.com .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
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
EXECL内置的VBA语言（Visual Basic For OLE（Object Linking and Embedding）对象链接与嵌Application）为EXECL功能的扩展提供了便利的手段，用户可使用该语言直接驱动VFP完成数据检索等功能。(www.61k.com］
程序首先生成一个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 '产生新的工作表单
ActiveSheet.Name = 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
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
入，是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 && 新建一工作表单
.ActiveSheet.Name = 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
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
ENDDO
OleApp.Quit && 关闭EXCEL，保存更新后的工作簿文件
**************************************** objexcel.activeworkbook.close(.f.)
那个是关闭excel啊~~不是存盘~关闭了就不能存盘了
-------------------------------------------------------------- 设置打印参数：
问：用Excel做报表，可打印时怎么选择打印机，即.ActiveWindow.SelectedSheets.PrintOut的参数有哪些？ 答：
expression.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName) expression 必选。［www.61k.com)该表达式返回“应用于”列表中的某个对象。
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).Value="'0123" 或用变量
cString="'"+"0123" &&其中0123可以取自表中一个字段
o.Cells(1,1).value=cString
&&o.Range("A1:A1").value=cString 2.
www.61k.com (1,1).Select &&或eole.Range("A1:E1").Select
oExcel.Selection.NumberFormatLocal = "@" &&把被选定的单元格设为文本格式
www.61k.com (1,1).Value="0123" &&给所选单元格覆值
---------------------------------------------- 在 Excel 中插入行和列 :
www.61k.com (1).Insert() &&在第一行前面插入一
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
IF EMPTY(TRIM(thisformset.filepath)) 行
www.61k.com (2).Insert() &&在第二列前面插入 MESSAGEBOX("请先选择要导入的excel文件！一列 ",0,"提示") ---------------------------------------------- RETURN
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
ENDIF 获取 Excel 记录数
loXls = CREATEOBJECT("excel.application") IF EMPTY(TRIM(csheetname)) bookExcel = MESSAGEBOX("请先选择要导入的工作表sheetloXls.APPLICATION.Workbooks.OPEN("f:\pz.xls") nrows=bookExcel.Worksheets('pz') UsedRange =nrows.UsedRange r= www.61k.com .COUNT &&有数据的总行
数
c= www.61k.com .COUNT &&有数据的总列
数 loXls.Workbooks.close loXls.quit ---------------------------------------------- 问：在EXCEL中如何在打开文件的同时自动执行一
个宏命令。（www.61k.com）
答： 只要将宏的命名为 AUTO_OPEN 即可。
如果要在文件关闭时运行，则命名为auto_close 。 ---------------------------------------------- 问:在VFP中可以执行EXCEL的选择性粘贴吗?
.Range("A2").PasteSpecial ("xlPasteValues") && 会出错
.Range("A2").PasteSpecial (3) && 也会出错
.Range("A2").PasteSpecial && 只好这样了
如何才能只粘贴值呢?
答:
xlPasteValues=-4163 oExcel.Range("A1").Select oE www.61k.com 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( www.61k.com .value)&&读取用户
要读取excel的sheet名
***读取数据源所在的EXCEL文件名****
名称！",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= www.61k.com (i,1).Value IF ISNULL(cdh) cdh="" ENDIF **用于判断数据类型，数据类型一定要判断是否为NULL，** ** 然后如果不是指定的类型，还要进行转换*************
IF TYPE("cdh")<>'C' cdh=ALLTRIM(STR(cdh)) endif
cdwmc=TRIM( www.61k.com (i,2).Value) IF ISNULL(cdwmc) cdwmc=""
endif cgg= www.61k.com (i,3).Value IF ISNULL(cgg)
cgg="" ELSE IF TYPE("cgg")<>'C'
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
cgg=ALLTRIM(STR(cgg)) ENDIF endif
cjldw= www.61k.com (i,4).Value IF ISNULL(cjldw) cjldw="" endif
cjldw=IIF(TYPE("jldw")<>"C",ALLTRIM(STR(cjldw)),ALLTRIM(cjldw))
nsl= www.61k.com (i,5).Value IF ISNULL(nsl) nsl=0 endif
cch=TRIM( www.61k.com (i,6).Value) IF ISNULL(cch) cch='' endif
cxh= www.61k.com (i,8).Value IF ISNULL(cxh) cxh="" ELSE
IF TYPE("cxh")<>'C' cxh=TRIM(STR(cxh)) ELSE
cxh=TRIM(cxh) endif ENDIF
ccpmc= www.61k.com (i,9).Value 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
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
hb1.sheets(1).rows(1).entirerow.insert sele (ctablename) nfieldcount=fcount() nreccount=reccount()
hbdygs="A1:"+chr(nfieldcount+64)+"2" HB1.range(hbdygs).select
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
****合并两行作为报表标题*************
HB1.selection.HorizontalAlignment = 3 &&水平方向 2左对齐，3居中，4右对齐
HB1.selection.VerticalAlignment = 2 &&垂直方向 HB1.range("A3:"+activecellname).Characters.font.name = "宋体"
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") 1靠上，2居中，3靠下
HB1.selection.WrapText = .f. && ?? www.61k.com = 0 && ?? HB1.selection.AddIndent = .f. && ?? HB1.selection.ShrinkToFit = .f. && ?? www.61k.com = .t. && ??
HB1.range(hbdygs).FormulaR1C1 = "请输入报表标题"
HB1.range(hbdygs).Characters.font.name = "隶书" HB1.range(hbdygs).Characters.font.FontStyle = "常规" HB1.range(hbdygs).Charac www.61k.com = 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)
www.61k.com (columnname).columnwidth=field_len else endif
sele (ctablename) endfor
sele term_stru use
activecellname=chr(nfieldcount+64)+allt(str(nreccount+3))
*************设置数据区域的字体格式***************
hb1.application.visible=.t.
* HB1.ACTIVEWORKBOOK.SAVE &&自动保存数据
* 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为新的名字。（www.61k.com] *----------------------------------------- 复制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),NULL) &&&&把第1个工作表复制到第1个工作表之前 *!*oExcel.SHEETS(1).NAME='NewSheetName' &&设置第1个工作表名称
*-----------------------------------------
如何将DBF中内容COPY到EXCEL的指定区域 例如我有一个DBF: Name_F Sl_f Mike 546 kyle 200
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
想将这个内容转到EXCEL里面的E1:F2区域! ******* USE 表名
_VFP.DataToClip('表名',RECCOUNT(),3) &&将一组记录作为文本复制到剪贴板上,3使用制表符分隔字段。（www.61k.com］
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("查询打印").ACTIVATE oExcel.VISIBLE=.T.
nRows=oExcel.Worksheets('查询打印') www.61k.com .COUNT
nColumns=oExcel.Worksheets('查询打印') www.61k.com .COUNT
oExcel.RANGE( www.61k.com (1,1), www.61k.com (nRows,nColumns)).BORDERS.LineStyle=1
oExcel.RANGE( www.61k.com (1,1), www.61k.com (nRows,nColumns)).HorizontalAlignment=3 &&水平(1-默认、2-靠左、3-居中、4-靠右、5-填充、6=两端对齐、7=跨列居中、8=分散对齐)
oExcel.RANGE( www.61k.com (1,1), www.61k.com (nRows,nColumns)).VerticalAlignment=2 &&垂直(1=靠上、2=居中、3=靠下、4=两端对齐、5=分散对齐) oExcel.ActiveSheet.PageSetup.RightFooter="第&P页 / 共&N页"
oExcel.Active www.61k.com =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.Active www.61k.com =.t. &&设置页面水平居中
oExcel.Active www.61k.com =.t. &&设置页面垂直居中 www.61k.com .SELECT
www.61k.com .EntireColumn.AUTOFIT oExcel.SELECTION.AutoFilter
oE www.61k.com (1).INSERT
oExcel.RANGE("A2:BB2").ROWHEIGHT=37.5 oExcel.RANGE("A2:BB2").WrapText=.T.
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
oE www.61k.com (1).COLUMNWIDTH=3
oE www.61k.com (1).COLUMNWIDTH=4
oExcel.RANGE("A2:BB2").ROWHEIGHT=12.5
*oExcel.RANGE("M1").VALUE='统计月份：'+ALLTRIM(STR(YEAR(KKS_DATE1)))+'年'+ALLTRIM(STR(MONTH(KKS_DATE1)))+'月 - '+ALLTRIM(STR(YEAR(KKE_DATE1)))+'年'+ALLTRIM(STR(MONTH(KKE_DATE1)))+'月'
oExcel.Active www.61k.com ="&20部 门 出 勤 统 计 表"
oExcel.Active www.61k.com ="单位领导："
oExcel.ActiveSheet.PageSetup.LeftFooter="打印时间：&D - &T"
oExcel.SELECTION.AutoFilter
oExcel.ActiveSheet.RANGE('B2').SELECT
oExcel.ActiveSheet.PageSetup.PrintTitleRows="$1:$1" oExcel.Active www.61k.com =2 && 1：纵向打印 2：横向打印 oExcel.ActiveWorkbook.Save
*-----------------------------------------
在VFP中Disabled／Enabled EXCEL中的菜单项及按钮
有时需要在VFP中控制EXCEL中的按钮及菜单项，以达到由VFP控制XLS文档的目的。可以控制XLS文
档不能复制、不能另存、不能打印、不能以附档的形式发邮件。结合陆老师的在通用字段中存放文档
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
的思路，完全可以用VFP开发文档发布系统，可以发布公司的守则、公告、管理办法、机密资料、图 片资料等而不用担心用户复制、打印、以邮件传播资料。(www.61k.com)
XLS中各个菜单项或按钮都有唯一的ID或序号，本例是利用序号来控制的(利用ID也可以控制)。 对象大多只有三层，对应的控制方法是：
对象.CommandBars(第一层序号).Controls(第二层序号).accChild(第二层序号).属性=值
本例仅列出菜单项的部分控制，其它菜单项或按钮的序号可以用以下程序取得： *(需要在VFP7.0以上运行) oXls=GetObject("","excel.sheet") XlApp=oXLS.application XlSheet=XlApp.ActiveSheet bars= www.61k.com .Count str=''
FOR i=1 TO bars
str=str+CHR(13)+ALLTRIM(str(i))+'、'+ www.61k.com (i).accName+'(NAME:'+ www.61k.com (i).Name+'
INDEX:'+ALLTRIM(STR( www.61k.com (i).Index))+')'
bars2= www.61k.com (i).accChildCount FOR j=1 TO bars2 try
obj= www.61k.com (i).controls(j)
str=str+CHR(13)+' '+ALLTRIM(str(j))+'、'+ www.61k.com (i).controls(j).accname+'(ID:'+ALLTRIM(STR( www.61k.com (i).controls(j).Id))+')' FOR k=1 TO obj.accChildCount try IF NOT EMPTY( www.61k.com (k).accname )
str=str+CHR(13)+'
'+ALLTRIM(STR(k))+'、'+ www.61k.com (k).accName+' (ID：'+ ALLTRIM(STR( www.61k.com (k).Id))+')' ENDIF CATCH EXIT endtry ENDFOR CATCH EXIT endtry ENDFOR
WAIT windows ALLTRIM(STR(i))+' / '+ALLTRIM(STR(bars))+'
'+STR(i/bars*100,10,2)+'%' nowait ENDFOR
SAVE 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) &&禁用/不可见系统菜单 www.61k.com (1).enabled=.f.
1、档案(ID:30002) &&禁用菜单中的“档案”项 www.61k.com (1).controls(1).enabled=.f.
12、打印... (ID：4) &&禁用“档案”菜单下的“打印”项
www.61k.com (1).Controls(1).accChild(18).Enabled=.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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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： 1、单元格... (ID：295) 2、行 (ID：296) 3、列 (ID：297)
4、工作表 (ID：852) 5、图表... (ID：1957) 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)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
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)
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
2、编辑栏 (ID：849) 3、状态栏 (ID：850)
4、页眉和页脚... (ID：762) 5、批注 (ID：1594)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
7、审阅(NAME:Reviewing INDEX:7) 1、批注(ID:1589) 2、前一批注(ID:1590) 3、下一批注(ID:1591)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
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) 6、删除...(ID:292) 7、清除内容(ID:3125) 8、插入批注(ID:2031) 9、删除批注(ID:1592)
10、显示/隐藏批注(ID:1593) 11、设置单元格格式...(ID:855) 12、插入分页符(ID:1588) 13、重置所有分页符(ID:1585)
14、设置打印区域(ID:364) 15、添加到打印区域(ID:1583) 16、排除在打印区域之外(ID:1586) 17、重设打印区域(ID:2038) 18、页面设置...(ID:247)
33、柱形图(NAME:Column INDEX:33) 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) 12、插入分页符(ID:1588) 13、重置所有分页符(ID:1585) 14、设置打印区域(ID:364) 15、添加到打印区域(ID:1583) 16、排除在打印区域之外(ID:1586) 17、重设打印区域(ID:2038) 18、页面设置...(ID:247)
34、行(NAME:Row INDEX:34) 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) 12、插入分页符(ID:1588) 13、重置所有分页符(ID:1585) 14、设置打印区域(ID:364) 15、添加到打印区域(ID:1583) 16、排除在打印区域之外(ID:1586) 17、重设打印区域(ID:2038) 18、页面设置...(ID:247)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
35、工作表(NAME:Ply INDEX:35) 1、取消成组工作表(ID:1968) 2、插入...(ID:945)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
3、删除(ID:847) 4、重命名(ID:889)
5、移动或复制工作表...(ID:848) 6、选定全部工作表(ID:946) 7、工作表标签颜色...(ID:5747) 8、查看代码(ID:1561)
36、XLM 单元格(NAME:XLM Cell INDEX:36) 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:186)
37、文档(NAME:Document INDEX:37) 1、保存(ID:3)
2、另存为...(ID:748) 3、打印...(ID:4)
4、页面设置...(ID:247) 5、拼写检查...(ID:2) 6、新建窗口(ID:303) 7、重排窗口...(ID:298) 8、显示比例...(ID:925) 9、查看代码(ID:1561)
38、桌面(NAME:Desktop INDEX:38) 1、新建...(ID:18) 2、打开...(ID:23)
3、保存工作区...(ID:846) 4、开始计算(ID:960) 5、选项...(ID:522) 6、工具栏(ID:30045) 1、常用 (ID：761) 2、格式 (ID：761)
3、Visual Basic (ID：761) 4、Web (ID：761) 5、保护 (ID：761) 6、边框 (ID：761) 7、窗体 (ID：761) 8、公式审核 (ID：761) 9、绘图 (ID：761)
10、监视窗口 (ID：761)
11、控件工具箱 (ID：761) 12、列表 (ID：761) 13、审阅 (ID：761)
14、数据透视表 (ID：761) 15、图表 (ID：761) 16、图片 (ID：761)
17、退出设计模式 (ID：761) 18、外部数据 (ID：761) 19、文本到语音 (ID：761) 20、艺术字 (ID：761) 21、符号栏 (ID：761) 22、自定义... (ID：797)
39、非默认拖放(NAME:Nondefault Drag and Drop INDEX:39)
1、移动到此位置(ID:2046) 2、复制到此位置(ID:2045) 3、仅复制数值(ID:2048) 4、仅复制格式(ID:2047) 5、链接此处(ID:2158)
6、在此创建超链接(ID:2159)
7、复制选定区域，原有区域下移(ID:2049) 8、复制选定区域，原有区域右移(ID:2050) 9、移动选定区域，原有区域下移(ID:2051) 10、移动选定区域，原有区域右移(ID:2052) 11、取消(ID:569)
40、自动填充(NAME:AutoFill INDEX:40) 1、复制单元格(ID:2019) 2、以序列方式填充(ID:2020) 3、仅填充格式(ID:2021) 4、不带格式填充(ID:2022) 5、以天数填充(ID:2023) 6、以工作日填充(ID:2024) 7、以月填充(ID:2025) 8、以年填充(ID:2026) 9、等差序列(ID:2027) 10、等比序列(ID:2028) 11、序列...(ID:2029)
41、按钮(NAME:Button INDEX:41) 1、剪切(ID:21) 2、复制(ID:19)
3、将墨迹作为文本复制(ID:9382) 4、粘贴(ID:22) 5、清除(ID:47)
6、编辑对象(ID:961) 7、对象(ID:30019)
1、<动词> (ID：1965)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
2、<动词> (ID：1965) 3、<动词> (ID：1965) 4、<动词> (ID：1965) 5、<动词> (ID：1965) 6、<动词> (ID：1965) 7、<动词> (ID：1965) 8、<动词> (ID：1965) 9、<动词> (ID：1965) 10、<动词> (ID：1965) 11、<动词> (ID：1965) 12、<动词> (ID：1965) 13、<动词> (ID：1965) 14、<动词> (ID：1965) 15、<动词> (ID：1965) 16、转换... (ID：1967) 8、设置对象格式...(ID:962) 9、置于顶层(ID:166) 10、置于底层(ID:167) 11、分组(ID:164) 12、指定宏...(ID:859)
42、对话框(NAME:Dialog INDEX:42) 1、粘贴(ID:22)
2、Tab 键次序...(ID:469) 3、执行对话框(ID:470)
43、序列(NAME:Series INDEX:43) 1、所选对象(ID:917) 2、图表类型...(ID:918) 3、源数据...(ID:954) 4、添加趋势线...(ID:914) 5、清除(ID:47)
44、图形区(NAME:Plot Area INDEX:44) 1、所选对象(ID:917) 2、图表类型...(ID:918) 3、源数据...(ID:954) 4、图表选项...(ID:956) 5、位置...(ID:955)
6、设置三维视图格式...(ID:919) 7、图表窗口(ID:2571) 8、清除(ID:47)
45、基底和墙纸(NAME:Floor and Walls INDEX:45) 1、所选对象(ID:917)
2、设置三维视图格式...(ID:919) 3、清除(ID:47)
46、趋势线(NAME:Trendline INDEX:46) 1、所选对象(ID:917) 2、清除(ID:47)
47、图表(NAME:Chart INDEX:47) 1、所选对象(ID:917) 2、清除(ID:47)
48、设置数据系列格式(NAME:Format Data Series INDEX:48)
1、所选对象(ID:917) 2、图表类型...(ID:918) 3、源数据...(ID:954) 4、添加趋势线...(ID:914) 5、隐藏明细数据(ID:464) 6、显示详情(ID:4002)
49、设置数据轴格式(NAME:Format Axis INDEX:49)
1、所选对象(ID:917) 2、清除(ID:47)
3、隐藏明细数据(ID:464) 4、显示明细数据(ID:462)
50、设置图例项格式(NAME:Format Legend Entry INDEX:50)
1、所选对象(ID:917) 2、隐藏明细数据(ID:464) 3、显示明细数据(ID:462) 4、清除(ID:47)
51、编辑栏(NAME:Formula Bar INDEX:51) 1、剪切(ID:21) 2、复制(ID:19) 3、粘贴(ID:22)
4、设置单元格格式...(ID:855) 5、汉字重选(ID:3720)
6、朝鲜文及朝鲜文汉字转换...(ID:3492) 7、编辑拼音字段(ID:1611)
8、从下拉列表中选择...(ID:1966) 9、查阅...(ID:7685)
52、数据透视表上下文菜单(NAME:PivotTable Context Menu INDEX:52)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
1、设置单元格格式...(ID:855) 2、数据透视图(ID:3789) 3、数据透视表向导(ID:457) 4、刷新数据(ID:459) 5、删除...(ID:5955) 6、隐藏维度(ID:478) 7、选定(ID:30252)
1、标志 (ID：995) 2、数据 (ID：993)
3、标志和数据 (ID：994) 4、整张表格 (ID：1600)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
5、启用选定内容 (ID：991) 8、组及显示明细数据(ID:30251) 1、隐藏明细数据 (ID：464) 2、显示明细数据 (ID：462) 3、组合... (ID：3159) 4、取消组合... (ID：3160) 9、顺序(ID:30485)
1、移至首端 (ID：4148) 2、上移 (ID：4149) 3、下移 (ID：4150) 4、移至尾端 (ID：4151) 5、移至列 (ID：6688) 10、字段设置...(ID:460) 11、表格选项...(ID:1604)
12、显示数据透视表工具栏(ID:6927) 13、显示字段列表(ID:3790)
53、查询(NAME:Query INDEX:53) 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:1950) 13、数据区域属性...(ID:1951) 14、参数...(ID:537) 15、刷新数据(ID:459)
54、查询布局(NAME:Query Layout INDEX:54) 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:1950) 13、数据区域属性...(ID:1951)
14、参数...(ID:537) 15、刷新数据(ID:459) 16、插入分页符(ID:1588) 17、重置所有分页符(ID:1585) 18、设置打印区域(ID:364) 19、添加到打印区域(ID:1583) 20、排除在打印区域之外(ID:1586) 21、重设打印区域(ID:2038) 22、页面设置...(ID:247)
55、自动计算(NAME:AutoCalculate INDEX:55) 1、无(ID:2012) 2、平均值(ID:2013) 3、计数(ID:2014) 4、计数值(ID:2015) 5、最大值(ID:2016) 6、最小值(ID:2017) 7、求和(ID:2018)
56、对象/图形区(NAME:Object/Plot INDEX:56) 1、设置对象格式...(ID:917) 2、图表类型...(ID:918) 3、源数据...(ID:954) 4、图表选项...(ID:956) 5、位置...(ID:955)
6、设置三维视图格式...(ID:919) 7、图表窗口(ID:2571) 8、剪切(ID:21) 9、复制(ID:19) 10、粘贴(ID:22) 11、清除(ID:47)
12、置于顶层(ID:166) 13、置于底层(ID:167) 14、指定宏...(ID:859)
57、标题栏(图表)(NAME:Title Bar (Charting) INDEX:57)
1、打印...(ID:4)
2、页面设置...(ID:247) 3、拼写检查...(ID:2)
58、框架(NAME:Layout INDEX:58) 1、设置单元格格式...(ID:855) 2、删除...(ID:292)
3、数据透视表向导(ID:457) 4、刷新数据(ID:459) 5、选定(ID:30252)
1、标志 (ID：995) 2、数据 (ID：993)
3、标志和数据 (ID：994)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
4、整张表格 (ID：1600) 5、启用选定内容 (ID：991) 6、组及显示明细数据(ID:30251) 1、隐藏明细数据 (ID：464) 2、显示明细数据 (ID：462) 3、组合... (ID：3159) 4、取消组合... (ID：3160) 7、公式(ID:30254) 8、字段设置...(ID:460) 9、表格选项...(ID:1604) 10、分页显示...(ID:461) 11、插入分页符(ID:1588)
12、重置所有分页符(ID:1585) 13、设置打印区域(ID:364) 14、添加到打印区域(ID:1583) 15、排除在打印区域之外(ID:1586) 16、重设打印区域(ID:2038) 17、页面设置...(ID:247)
59、数据透视图快捷菜单(NAME:Pivot Chart Popup INDEX:59)
1、所选对象(ID:917)
2、数据透视图选项...(ID:1604) 3、数据透视表向导(ID:457) 4、刷新数据(ID:459)
5、隐藏数据透视图字段按钮(ID:3956) 6、组及显示明细数据(ID:30251) 1、隐藏明细数据 (ID：464) 2、显示明细数据 (ID：462) 3、组合... (ID：3159) 4、取消组合... (ID：3160) 7、删除字段(ID:47)
60、拼音信息(NAME:Phonetic Information INDEX:60)
1、剪切(ID:21) 2、复制(ID:19) 3、粘贴(ID:22)
4、从拼音列表选取(ID:3514)
61、自动合计(NAME:Auto Sum INDEX:61) 1、求和(ID:226) 2、平均值(ID:5803) 3、计数(ID:5804) 4、最大值(ID:5806) 5、最小值(ID:5807) 6、其他函数...(ID:5808)
62、选择性粘贴下拉框(NAME:Paste Special Dropdown INDEX:62)
1、公式(ID:5836) 2、值(ID:370)
3、无边框(ID:5837) 4、转置(ID:5838) 5、粘贴链接(ID:1956) 6、选择性粘贴...(ID:755)
63、查找格式(NAME:Find Format INDEX:63) 1、格式...(ID:5939)
2、从单元格选择格式...(ID:5935) 3、清除查找格式(ID:5937)
64、替换格式(NAME:Replace Format INDEX:64) 1、格式...(ID:5940)
2、从单元格选择格式...(ID:5936) 3、清除替换格式(ID:5938)
65、列表区域快捷菜单(NAME:List Range Popup INDEX:65)
1、剪切(ID:21) 2、复制(ID:19) 3、粘贴(ID:22)
4、选择性粘贴...(ID:755) 5、插入(ID:31274)
1、行 (ID：7373) 2、列 (ID：7568) 6、删除(ID:31275)
1、行 (ID：7374) 2、列 (ID：7569) 7、清除内容(ID:3125) 8、列表(ID:31276)
1、创建列表... (ID：7193) 2、重设列表大小... (ID：7765) 3、汇总行 (ID：7372) 4、转换为区域 (ID：7375) 5、发布列表... (ID：7684)
扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
6、在服务器上查看列表 (ID：7763) 7、取消链接列表 (ID：7683) 8、同步列表 (ID：7761)
9、放弃更改并刷新 (ID：7762)
10、隐藏非活动列表的边框 (ID：9747) 9、XML(ID:31268)
1、导入... (ID：7433) 2、导出... (ID：7432)
3、刷新 XML 数据 (ID：7812) 4、XML 源... (ID：7693)
5、XML 映射属性... (ID：7813) 6、编辑查询... (ID：7897) 7、XML 扩展包... (ID：7784)
excel表格的操作 Visual Foxpro中如何实现对EXCEL表格的操作
［www.61k.com）扩展：visual foxpro 操作题 / foxpro操作excel表格 / visual foxpro
本文标题：如何制作excel表格-如何用excel制作图表?excel画图方法介绍61阅读| 精彩专题| 最新文章| 热门文章| 苏ICP备13036349号-1