http://blog.csdn.net/zou_seafarer/category/275207.aspxzh-CNMon, 31 Mar 2008 12:23:27 GMT60ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504449.aspxWed, 07 Feb 2007 16:17:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504449.aspxhttp://blog.csdn.net/zou_seafarer/comments/1504449.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504449.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1504449.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1504449Excel编程碰到的第一个问题是表头。---- 表头形式定了，再就是表头的内容。如果单元格中的文本长度超过了列宽，往往只能显示部分内容，行尾那一格的内容则会“越境”进入右边那个空白单元格，很不美观。---- Columns(14).columnwidth=12 ‘设置第14列列宽为12（缺省列宽为8.38）---- 但也许你不喜欢这种方法，认为表头撑大了列宽，弄得浏览一张小表格还得向右滚动，太不方便了。不过提醒一句，Range对象大小最好与数组匹配，小了无法显示所有数据，大了则会在空白单元格只填入“N/A”表示没有取得数据。Range(cell1,cell2).value=Data.<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1504449.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504446.aspxWed, 07 Feb 2007 16:15:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504446.aspxhttp://blog.csdn.net/zou_seafarer/comments/1504446.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/02/07/1504446.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1504446.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1504446在菜单栏上单击鼠标右键，选择弹出式菜单中的“控件工具箱”，在“控件工具箱”工具条上，单击待添加的控件按钮，在工作表中将控件拖曳到所需位置和大小，单击鼠标右键选中“属性”设置控件属性后，双击控件就会出现Visual Basic编辑器。直接通过“文件”菜单中的“打开”项, 选择文件类型为dBase文件（*.dbf）, 可将dbf文件转换到Excel工作簿中,但这工作簿只存转换而来的一张工作表，其他表都自动关闭了。只要按一下图1中的“生成报表”按钮, 就能完成所有dbf 文件的转换, 且利用Excel公式自动计算功能完成所有报表的汇总计算。<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1504446.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495690.aspxSat, 27 Jan 2007 17:23:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495690.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495690.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495690.aspx#Feedback1http://blog.csdn.net/zou_seafarer/comments/commentRss/1495690.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495690关于作者 Paul Kimmel Paul Kimmel于1990年创立了Software Conceptions公司，并从那时开始设计和创建软件以及编写计算机图书。Paul Kimmel是几本关于VBA、VB、VB.NET、C#、Delphi和C++书籍的作者。Paul也是www.codeguru.com的VB Today栏目所创办的双月刊专栏作家，是一些杂志和在线刊物(包括www.InformiT.com)的经常投稿人。如果您要设计和创建软件，您可以通过pkimmel@softconcepts.com与他联系。<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495690.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495688.aspxSat, 27 Jan 2007 17:22:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495688.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495688.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495688.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495688.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495688Workbooks集合 Application对象有一个Workbooks属性，可以返回一个Workbooks集合，该集合包含所有当前已打开的Excel中的Workbook对象。例如，下面的代码将显示所打开的工作簿的数量： ‘******************************************************************** Sub testWorkbookCount() Dim wbs As Workbooks Set wbs=Application.Workbooks MsgBox wbs.Count End Sub ‘******************************************************************** 下面让我们来看看Workbooks对象的一些属性和方法。<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495688.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495685.aspxSat, 27 Jan 2007 17:21:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495685.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495685.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495685.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495685.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495685Workbook对象 一个Workbook对象代表一个打开的Excel工作簿，正如我们已讨论过的，Workbook对象存储在Workbooks集合中。 Workbook对象共有103个属性和方法，如下表1。 表1 Workbook对象成员列表<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495685.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495683.aspxSat, 27 Jan 2007 17:20:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495683.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495683.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495683.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495683.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495683HasPassword属性(只读/布尔值) 如果工作簿有密码保护，则该只读属性值为True。注意，密码能作为SaveAs方法中的一个参数被指定。 PrecisionAsDisplayed属性(可读写/布尔值) 当该属性的值为True时，在工作簿进行计算时，将仅使用工作表中所显示的数值进行计算，而不是它实际所存诸的值。该属性的缺省值为False，工作表计算基于它们所存储的数值。 <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495683.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495680.aspxSat, 27 Jan 2007 17:17:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495680.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495680.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495680.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495680.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495680加载宏可以扩展Excel的功能，与Excel的内置功能一致，是为Excel提供自定义命令或自定义功能的补充程序。某些加载宏还提供了可用于公式中的新的工作表函数。 使用某加载宏必须已安装，且须在加载宏对话框中进行调用。加载宏默认安装在Microsoft Office\Office 文件夹中的 Library 文件夹或 Addins 文件夹，或它们的子文件夹中。 其中，Excel加载宏是包含了所需要实现的功能的函数或过程的工作薄(保存为.xla文件)。<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495680.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495678.aspxSat, 27 Jan 2007 17:16:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495678.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495678.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495678.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495678.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495678常量，也称常数，在程序过程中其值保持不变。常数可以是字符串、数值、另一常数、任何(除乘幂与Is之外的)算术运算符或逻辑运算符的组合。每个主应用程序都可定义自己的一组常数，也可以用Const语句定义附加常数。定义常量使程序设计变得更简单，可在代码中的任何地方使用常数代替实际的值或字符串，从而提高程序的可读性，并且更容易修改这个值。 <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495678.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495677.aspxSat, 27 Jan 2007 17:15:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495677.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495677.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495677.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495677.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495677VBA自定义常量列表 主要包括： ● Calendar 常数 ● CallType 常数 ● Color 常数 ● Compiler 常数 ● Date 常数 ● Dir、GetAttr 和 SetAttr 常数 ● IMEStatus 常数 ● Instr、StrComp 常数 ● Keycode 常数 ● Miscellaneous 常数 ● MsgBox 常数 ● QueryClose 常数 ● Shell 常数 ● StrConv 常数 ● 系统颜色常数 ● VarType 常数 ● 其他 <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495677.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495674.aspxSat, 27 Jan 2007 17:14:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495674.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495674.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495674.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495674.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495674InputBox函数和MsgBox函数很常用，特别是在与用户进行简单的交互时经常用到。 一、InputBox函数 1、作用 显示一个输入框，并提示用户在文本框中输入文本、数字或选中某个单元格区域，当按下确定按钮后返回包含文本框内容的字符串。 2、语法 InputBox(Prompt[,Title][,Default][,Xpos][,Ypos][,Helpfile,Context]) <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495674.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495673.aspxSat, 27 Jan 2007 17:12:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495673.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495673.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495673.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495673.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=14956731、作用 在消息框中显示信息，并等待用户单击按钮，可返回单击的按钮值(比如“确定”或者“取消”)。通常用作显示变量值的一种方式。 2、语法 MsgBox(Prompt[,Buttons][,Title][,Helpfile,Context]) 参数说明： <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495673.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495670.aspxSat, 27 Jan 2007 17:11:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495670.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495670.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495670.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495670.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495670VBA图表剖析<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495670.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495672.aspxSat, 27 Jan 2007 17:11:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495672.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495672.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495672.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495672.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495672程序说明： 在工作表中选择一列数据，然后选取列表中选区的任一单元格后，消息对话框显示出该单元格数值在选区中的排序位置。按输入框提示进行操作，默认为当前选中的列。 程序清单如下： Option Explicit ‘进行变量声明 Dim MyCell As Range Dim r As Integer Dim MyRange As Range Dim Ans <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495672.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495669.aspxSat, 27 Jan 2007 17:10:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495669.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495669.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495669.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495669.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495669VBA语句集 (第1辑) <img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495669.aspx" width = "1" height = "1" />ZOU_SEAFARERhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495668.aspxSat, 27 Jan 2007 17:09:00 GMThttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495668.aspxhttp://blog.csdn.net/zou_seafarer/comments/1495668.aspxhttp://blog.csdn.net/zou_seafarer/archive/2007/01/27/1495668.aspx#Feedback0http://blog.csdn.net/zou_seafarer/comments/commentRss/1495668.aspxhttp://tb.blog.csdn.net/TrackBack.aspx?PostId=1495668VBA程序集 (第1辑)<img src ="http://blog.csdn.net/zou_seafarer/aggbug/1495668.aspx" width = "1" height = "1" />