![](https://img-blog.csdnimg.cn/20201014180756923.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VBA
文章平均质量分 71
HiRuyue
这个作者很懒,什么都没留下…
展开
-
Excel VBA用户窗体常用的方法
1、显示用户窗体用于以编程方式显示用户窗体的语法是:UserFormName.Show若要显示用户窗体名为 UserForm1,使用以下代码:UserForm1.Show时可以加载到内存用户窗体而不实际显示它。 可能需要复杂的用户窗体几秒钟才显示。 可以预用户窗体加载到内存中,因为您可以决定何时引发此开销。但不显示加载到内存的 UserForm1,使用以下代码:Load转载 2013-03-28 16:23:38 · 7695 阅读 · 0 评论 -
vba改动excel参数
将标题改为“新标题-工作薄1”Sub new_title()Application.Caption = "新标题"End Sub 让excel的窗口始终显示在最前端Const HWND_TOPMOST = -1Const HWND_NOTOPMOST = -2Const SWP_NOSIZE = &H1Const SWP_NOMOVE = &H2Const转载 2013-06-16 10:29:09 · 832 阅读 · 0 评论 -
VBA 操作excel菜单
VBA 操作excel菜单 在thisworkbook中加入:Option ExplicitPrivate Sub Workbook_Activate() Call myToolsEnd SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean) 'Call DelmyToolsEnd Sub转载 2013-06-16 10:40:37 · 1793 阅读 · 0 评论 -
VBA常用操作
删除文件夹假设我在C区建立一个文件夹aaaa, 以下是删除该文件的程序Sub ssssss()Set fs = CreateObject("Scripting.FileSystemObject")Set f = fs.GetFolder("c:\aaaa")f.Delete End Sub-----------可以通过api函数来取得文件夹的位置,再进行删除.D转载 2013-06-16 10:32:39 · 1257 阅读 · 0 评论 -
VBA工作表操作
对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转载 2013-06-16 10:34:54 · 2265 阅读 · 0 评论 -
vba自定义功能函数
财务金额小写转大写: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转载 2013-06-16 10:36:48 · 1860 阅读 · 0 评论 -
vba活用excel右键菜单
仅在a列出现数据菜单:thisworkbook代码:Option ExplicitPrivate Sub Workbook_Deactivate() Call DeleteMycellEnd Subsheet1 代码:Option ExplicitPrivate Sub Worksheet_BeforeRightClick(ByVal Target A转载 2013-06-16 10:38:19 · 4826 阅读 · 0 评论 -
vba处理单元格数据
本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]转载 2013-06-16 10:39:16 · 886 阅读 · 0 评论 -
回避VLOOKUP公式找到空值返回0的问题
1.在公式后面添加“&""”2.在选项里设置,工具——选项——视图,去掉“零值”前的勾原创 2013-07-05 17:51:58 · 13936 阅读 · 0 评论 -
VC操作EXCEL表格
摘要:使用Microsoft Office所带的控件来实现代码操作excel表格。 最近由于工作需要,不得不操作Excel,包括基本的数据输入输出、字体设置、颜色设置、单元格的合并、填充色的设置,当然还包括图表的生成以及渐近线的操作等。折腾了许久,项目终于完成了^_^。现在将学习操作Excel的点点滴滴记录下来和大家一同分享,也作为自己的一次总结。 1、Excel的对象转载 2013-05-05 00:29:59 · 943 阅读 · 0 评论 -
C++使用VARIANT实现二维数组的操作
VARIANT变量是COM组件之间互相通信的重要的参数变量之一,它可以容纳多种不同的类型,如short、long、double等,包括各类指针和数组。组件之间的互相调用是比较耗时的,尤其带当组件位于不同进程中时,因此,减少传递次数是提高效率的一种有效方法。其中,Excel表格的操作就可能涉及到大量数据,一次传递一个二维数组是提高对Excel表的操作效率。下面以两种不同方式来实现VARIANT二维数转载 2013-06-30 10:30:40 · 1784 阅读 · 0 评论 -
VBA加载宏制作攻略
本文所述加载宏是指使用EXCEL VBA制作的加载宏,这类文件的后缀默认为xla,因此又称XLA加载宏。内容划分为五部分,第一部分为概述,简单介绍加载宏的一般知识;第二部分至第四部分介绍制作加载宏函数、过程和事件主要技巧;第五部分为制作加载宏的其它方面。一、概述 1.制作加载宏的一般步骤(1)创建一个新的工作薄,在其中添加代码。(2)在“文件”菜单上单击“属性”。在“文件名 属转载 2013-05-14 20:25:07 · 4363 阅读 · 0 评论 -
COleVariant和VARIANT转换为CString类型
COleVariant是数据库常用到的数据类型。它可以是字串,整型值,日期等。知道怎样将它转换为CString很有用处。 设有CString A; COleVariant B; 来看看怎样将COleVariant转换为CString: switch(B.vt){ case VT_BSTR: A=B.bstrVal; bre转载 2013-05-04 21:34:03 · 2265 阅读 · 0 评论 -
EXCEL VBA禁用和启用快捷键
Private Sub Workbook_Open()With Application '禁止自动填充 .CellDragAndDrop = False '屏蔽常用工具栏剪切、复制、粘贴 .CommandBars(3).Controls("剪切(&T)").Enabled = False .CommandBars(3).C转载 2013-03-28 16:27:42 · 4539 阅读 · 0 评论 -
VC操作EXCEL
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的安装转载 2013-03-24 23:09:27 · 758 阅读 · 0 评论 -
VBA 操作excel菜单
在thisworkbook中加入:Option ExplicitPrivate Sub Workbook_Activate() Call myToolsEnd SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean) 'Call DelmyToolsEnd SubPrivate Sub Workbook转载 2013-03-28 17:10:10 · 1147 阅读 · 0 评论 -
EXCEL VBA常用到的技巧
创建新工作簿更好的方法是将其分配给一个对象变量。下例中,由 Add 方法返回的 Workbook 对象分配给了对象变量 newBook。然后,又设置了 newBook 的若干属性。使用对象变量可以很容易地控制新工作簿。Sub AddNew()Set NewBook = Workbooks.Add With NewBook .Title = "All Sa转载 2013-03-28 17:07:14 · 2064 阅读 · 0 评论 -
VBA加载宏基础
一、简介加载宏可以扩展Excel的功能,与Excel的内置功能一致,是为Excel提供自定义命令或自定义功能的补充程序。某些加载宏还提供了可用于公式中的新的工作表函数。使用某加载宏必须已安装,且须在加载宏对话框中进行调用。加载宏默认安装在Microsoft Office/Office 文件夹中的 Library 文件夹或 Addins 文件夹,或它们的子文件夹中。其中,Ex转载 2013-05-06 09:20:00 · 1905 阅读 · 0 评论 -
VC操作Excel文件编程相关内容总结
利用VC操作Excel的方法至少有两种1 .利用ODBC把Excel文件当成数据库文件,来进行读、写、修改等操作,网上有人编写了CSpreadSheet类,提供支持。2. 利用Automation(OLD Automation)方法。将Excel当成组件服务器,利用VBA。又分为基于MFC的和SDK两种。 主要研究了一下第二种基于MFC的OLE编程方法。一、Excel的转载 2013-04-03 11:41:12 · 614 阅读 · 0 评论 -
加载宏(Addin)使用方法
Office VBA Addin加载宏是一种使用VBA编写的程序,它通过加载设置,可以随Office程序启动而自动加载运行,是制作Excel自定义函数、Office菜单和功能区按钮、添加常用辅助功能的常用载体。在Excel、PPT中都可以编制加载宏文件,Word则可以通过模板文件进行加载。根据版本和程序的不同,加载宏的文件类型也稍有区别,在2003版本中,Excel的加载宏扩展名是xla、PP转载 2013-05-06 10:18:53 · 6143 阅读 · 0 评论 -
VBA编程“由于另一个程序正在运行中,此操作无法完成.”解决方法.
这是自动化服务超时引起,它有一个默认的响应时间,解决方法:在App::InitInstance()里AfxOleInit()之后加上这个:AfxOleGetMessageFilter()->EnableBusyDialog(FALSE);AfxOleGetMessageFilter()->SetBusyReply(SERVERCALL_RETRYLATER);AfxOleGetMe原创 2013-05-07 20:25:53 · 5490 阅读 · 0 评论 -
VBA对象体系
在VBA中访问一个对象,必须清楚该对象在对象体系中处于何种位置,然后通过对象访问符合“.”进行访问,从包含该对象的最外层对象开始,由外及里逐次取其子对象,一直到达要访问的对象为止。例如要访问当前工作表的第4列第3行单元格的存储内容,Application.activesheets.range(“d3”).value。【VBA中主要包含6层基本对象】 Applicat转载 2013-05-07 16:14:34 · 1359 阅读 · 0 评论 -
EXCEL中背景颜色
主要有ColorIndex和Color两种方法1.Interior.ColorIndex指的是EXCEL内置索引颜色,只有56种,索引值分别为1~56;并且EXCEL工作表中只能表现出这56种颜色。2.Interior.Color(本身是变体类型)的颜色是由RGB函数返回的long值数据决定的。取值范围是0~256的3次方。超过这个范围的值,也不会报错,但并没有与之对应的颜色值。根据某种算原创 2013-05-13 17:27:25 · 2430 阅读 · 0 评论 -
VC操作Excel-Automation版
因为用ODBC连接Excel,不能处理任意创建的Excel文件,于是我决定另写一个版本,用Automation技术。其实就是用Excel自己的类库,进行操作。我在实习的时候,用过这种方法,开发AutoCAD图纸签名程序。说Automation技术,只不过是随着别人叫而已,具体是什么东西,我还不太清楚。慢慢理解吧。程序参考自:http://blog.csdn.net/bodybo/a转载 2013-05-04 22:14:07 · 795 阅读 · 0 评论