曾经沧海

1、显示用户窗体用于以编程方式显示用户窗体的语法是：UserFormName.Show若要显示用户窗体名为 UserForm1，使用以下代码：UserForm1.Show时可以加载到内存用户窗体而不实际显示它。 可能需要复杂的用户窗体几秒钟才显示。 可以预用户窗体加载到内存中，因为您可以决定何时引发此开销。但不显示加载到内存的 UserForm1，使用以下代码：Load

将标题改为“新标题-工作薄1”Sub new_title()Application.Caption = "新标题"End Sub 让excel的窗口始终显示在最前端Const HWND_TOPMOST = -1Const HWND_NOTOPMOST = -2Const SWP_NOSIZE = &H1Const SWP_NOMOVE = &H2Const

VBA 操作excel菜单 在thisworkbook中加入：Option ExplicitPrivate Sub Workbook_Activate()    Call myToolsEnd SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean)    'Call DelmyToolsEnd Sub

删除文件夹假设我在C区建立一个文件夹aaaa, 以下是删除该文件的程序Sub ssssss()Set fs = CreateObject("Scripting.FileSystemObject")Set f = fs.GetFolder("c:\aaaa")f.Delete End Sub-----------可以通过api函数来取得文件夹的位置,再进行删除.D

对sheet 进行保护：Sub 保护()Dim Sh As WorksheetFor Each Sh In WorksheetsSh.Protect'加密码123Sh.Protect "123"NextMsgBox "OK"End SubSub 撤销保护()Dim Sh As WorksheetFor Each Sh In Worksheet

财务金额小写转大写：1 先在vbe里新建模块，并写入代码：Function xxzdx(M)y = Int(Round(100 * Abs(M)) / 100)j = Round(100 * Abs(M) + 0.00001) - y * 100f = Round((j / 10 - Int(j / 10)) * 10)A = IIf(y b = IIf(j > 9.4

仅在a列出现数据菜单：thisworkbook代码：Option ExplicitPrivate Sub Workbook_Deactivate()    Call DeleteMycellEnd Subsheet1 代码：Option ExplicitPrivate Sub Worksheet_BeforeRightClick(ByVal Target A

本sheet中复制：　　Sub Macro1()　　    Range("A1").Copy Range("B1")　　End Subsheet间复制： 　　Sub mycopy()　　   Workbooks("book1").Sheets(1).[a1:a10].Copy _　　   Workbooks("book2").Sheets(1).[b1:b10]

1.在公式后面添加“&""”2.在选项里设置，工具——选项——视图，去掉“零值”前的勾

摘要:使用Microsoft Office所带的控件来实现代码操作excel表格。  最近由于工作需要，不得不操作Excel，包括基本的数据输入输出、字体设置、颜色设置、单元格的合并、填充色的设置，当然还包括图表的生成以及渐近线的操作等。折腾了许久，项目终于完成了^_^。现在将学习操作Excel的点点滴滴记录下来和大家一同分享，也作为自己的一次总结。      1、Excel的对象

VARIANT变量是COM组件之间互相通信的重要的参数变量之一，它可以容纳多种不同的类型，如short、long、double等，包括各类指针和数组。组件之间的互相调用是比较耗时的，尤其带当组件位于不同进程中时，因此，减少传递次数是提高效率的一种有效方法。其中，Excel表格的操作就可能涉及到大量数据，一次传递一个二维数组是提高对Excel表的操作效率。下面以两种不同方式来实现VARIANT二维数

本文所述加载宏是指使用EXCEL VBA制作的加载宏，这类文件的后缀默认为xla，因此又称XLA加载宏。内容划分为五部分，第一部分为概述，简单介绍加载宏的一般知识；第二部分至第四部分介绍制作加载宏函数、过程和事件主要技巧；第五部分为制作加载宏的其它方面。一、概述 1．制作加载宏的一般步骤（1）创建一个新的工作薄，在其中添加代码。（2）在“文件”菜单上单击“属性”。在“文件名 属

COleVariant是数据库常用到的数据类型。它可以是字串，整型值，日期等。知道怎样将它转换为CString很有用处。        设有CString A; COleVariant B; 来看看怎样将COleVariant转换为CString:        switch(B.vt){            case VT_BSTR:  A=B.bstrVal; bre

Private Sub Workbook_Open()With Application '禁止自动填充 .CellDragAndDrop = False '屏蔽常用工具栏剪切、复制、粘贴 .CommandBars(3).Controls("剪切(&T)").Enabled = False .CommandBars(3).C

1.新建MFC工程，2.选择Menu->View->ClassWizade，打开ClassWizade窗口，选择Add Class->From a type library，选择D:Program FilesMicrosoft OfficeofficeExcel9.OLB(D:Program FilesMicrosoft Office是本机上Microsoft Office 2000的安装

在thisworkbook中加入：Option ExplicitPrivate Sub Workbook_Activate()    Call myToolsEnd SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean)    'Call DelmyToolsEnd SubPrivate Sub Workbook

创建新工作簿更好的方法是将其分配给一个对象变量。下例中，由 Add 方法返回的 Workbook 对象分配给了对象变量 newBook。然后，又设置了 newBook 的若干属性。使用对象变量可以很容易地控制新工作簿。Sub AddNew()Set NewBook = Workbooks.Add    With NewBook        .Title = "All Sa

一、简介加载宏可以扩展Excel的功能，与Excel的内置功能一致，是为Excel提供自定义命令或自定义功能的补充程序。某些加载宏还提供了可用于公式中的新的工作表函数。使用某加载宏必须已安装，且须在加载宏对话框中进行调用。加载宏默认安装在Microsoft Office/Office 文件夹中的 Library 文件夹或 Addins 文件夹，或它们的子文件夹中。其中，Ex

利用VC操作Excel的方法至少有两种1 .利用ODBC把Excel文件当成数据库文件，来进行读、写、修改等操作，网上有人编写了CSpreadSheet类，提供支持。2. 利用Automation（OLD Automation）方法。将Excel当成组件服务器，利用VBA。又分为基于MFC的和SDK两种。     主要研究了一下第二种基于MFC的OLE编程方法。一、Excel的

Office VBA Addin加载宏是一种使用VBA编写的程序，它通过加载设置，可以随Office程序启动而自动加载运行，是制作Excel自定义函数、Office菜单和功能区按钮、添加常用辅助功能的常用载体。在Excel、PPT中都可以编制加载宏文件，Word则可以通过模板文件进行加载。根据版本和程序的不同，加载宏的文件类型也稍有区别，在2003版本中，Excel的加载宏扩展名是xla、PP

这是自动化服务超时引起，它有一个默认的响应时间，解决方法：在App::InitInstance()里AfxOleInit()之后加上这个:AfxOleGetMessageFilter()->EnableBusyDialog(FALSE);AfxOleGetMessageFilter()->SetBusyReply(SERVERCALL_RETRYLATER);AfxOleGetMe

在VBA中访问一个对象，必须清楚该对象在对象体系中处于何种位置，然后通过对象访问符合“.”进行访问，从包含该对象的最外层对象开始，由外及里逐次取其子对象，一直到达要访问的对象为止。例如要访问当前工作表的第4列第3行单元格的存储内容，Application.activesheets.range(“d3”).value。【VBA中主要包含6层基本对象】 Applicat

主要有ColorIndex和Color两种方法1.Interior.ColorIndex指的是EXCEL内置索引颜色，只有56种，索引值分别为1~56；并且EXCEL工作表中只能表现出这56种颜色。2.Interior.Color（本身是变体类型）的颜色是由RGB函数返回的long值数据决定的。取值范围是0~256的3次方。超过这个范围的值，也不会报错，但并没有与之对应的颜色值。根据某种算

因为用ODBC连接Excel，不能处理任意创建的Excel文件，于是我决定另写一个版本，用Automation技术。其实就是用Excel自己的类库，进行操作。我在实习的时候，用过这种方法，开发AutoCAD图纸签名程序。说Automation技术，只不过是随着别人叫而已，具体是什么东西，我还不太清楚。慢慢理解吧。程序参考自：http://blog.youkuaiyun.com/bodybo/a