首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

Excel实战技巧67:在组合框中添加不重复值(使用ADO技巧)

MyWorkbook =Application.ThisWorkbook.FullName '打开工作簿的连接 Myconnection.Open"Provider=...可以在任何事件或过程中调用它们,例如工作簿打开事件、查询刷新事件或者按下按钮后。 运行或调用过程后,在工作表中单击组合框右侧下拉按钮,结果如下图3所示。 ?...3.Extended Properties:当连接到Excel工作簿使用。告诉VBA数据源来自数据库。...当处理Excel 2007工作簿,参数为:Extended Properties=Excel12.0。...当在Excel中操作,可以使用两类连接字符串之一。使用第一类连接字符串(即使用Microsoft.Jet.OLEDB),有助于避免向后兼容问题,而且比Microsoft.ACE快3倍。

5.5K10

VBA专题10-23:使用VBA操控Excel界面之添加动态菜单

下面介绍一个简单的使用动态菜单控件示例,在工作簿中为三个工作表(名为Data,Analysis,Reports)的每个显示不同的菜单。 1. 创建一个新的工作簿,将其保存为启用宏的工作簿。 2....content = xml 'To view the XML code in the Immediatewindow 'Debug.Print xml End Sub 当首次打开工作簿或者使动态菜单控件无效...保存,关闭,然后重新打开工作簿。...当重新激活工作表Data通过调用GetMenuContent过程重新创建菜单,而复选框重置为其默认值(即,取消勾选条件)。...接着,通过在使复选框无效前存储复选框状态的Checkbox1Pressed变量重新赋值该复选框的状态。 5. 保存,关闭,然后重新打开工作簿

6K20
您找到你想要的搜索结果了吗?
是的
没有找到

在Excel中自定义上下文菜单(上)

Microsoft Office中,上下文菜单提供了一组在应用程序的当前状态或上下文中可用的有限选项。通常,可用的选择是与选定对象(如单元格或列)相关的操作。...Excel中的上下文菜单 在Microsoft Excel中,人们最常用的上下文菜单是单元格上下文菜单,这是在工作表单元格或选定单元格上单击鼠标右键看到的菜单(如下图1所示)。...注意,如何添加标记到该控件,然后用其删除控件。单击按钮或子菜单中的三个选项之一运行其他四个过程。在本例中,最后四个宏更改单元格中任何文本的大小写。...当打开或激活该工作簿,这些事件自动将控件添加到单元格上下文菜单中;当关闭或停用该工作簿,这些事件自动删除添加的控件。...AddToCellMenu End Sub Private Sub Workbook_Deactivate() Call DeleteFromCellMenu End Sub 接下来,保存、关闭并重新打开工作簿

2.6K40

Vba菜鸟教程

利用vba函数 自定义函数 操作对象 类模块 excel应用对象 操作工作簿 操作工作操作单元格 图形对象 事件 关闭事件 工作簿事件 工作表事件 控件 窗体 ActiveX控件 用户信息交互.../language-reference 代码完成后:工具-vbaproject属性-保护-查看锁定-密码 编辑器 注释‘单引号开头,可通过调出编辑窗口批量注释和取消 强制转行:插入两个空格,下划线,...,逐步调试的对象信息,变量值,数组信息,Stop可以中断 宏 开发者工具,设置安全性启用宏,保存文件需要保存为启用宏的工作簿 使用相对流录制宏,不固定位置,相对位置操作 加载宏(本地代码库) 代码保存在模块...Workbooks 工作簿集合,Workbooks(N),打开的第n个工作簿 Workbooks(“工作簿名称”) ThisWorkBook 代码所在工作簿 ActiveWorkbook 正在操作工作簿...Sheets(“工作表名称”) Sheets(N),打开的第n个工作表,在左下角的位置 Sheet1 第一个插入的工作表,与位置无关,相当于本名 ActiveSheet 正在操作工作表 Worksheets

16.8K40

VBA专题10-8:使用VBA操控Excel界面之在功能区中添加内置控件

创建新工作簿并保存为启用宏的工作簿。 3. 关闭该工作簿,然后在CustomUI Editor中打开工作簿。 4....在Excel中打开工作簿文件。 下图展示在功能区的“开始”选项卡出现了含两个内置控件的名为Fav的组。 ?...注意到,这是对特定文档进行功能区定制,即仅包含XML代码的工作簿显示定制的功能区,当关闭该工作簿,自动移除功能区中的定制。...要在其他工作簿中显示定制的功能区,应将工作簿保存为加载宏(Excel加载宏(*.xlam)),并执行下列步骤在Excel启动时装载加载宏文件: 1....如果要水平排列一组组合框、菜单、库、复选框、标签或者普通控件,应使用box元素。 下图展示了上述XML代码的效果: ? 添加通用控件 当在功能区中添加内置控件,也可以使用控件元素而不是指定其类型。

6K30

答案:Excel VBA编程问答33题,继续……

10.当用户在任何工作表中进行修改操作,将触发哪个事件? Workbook.SheetChange事件。 11.用户如何阻止打开工作簿触发Open事件? 按住Shift键。...数据验证是确保用户不会输入无效数据的过程,例如在输入数字应输入文本。 13.你应该在何处放置工作簿级别事件的事件过程? 在ThisWorkbook模块中。...15.如何允许用户查看工作簿但不能进行修改? 通过在“另存为”对话框的“工具”菜单中设置“修改权限密码”。 16.是非题:保护工作簿的密码可防止用户查看你的VBA代码。 错误。...必须使用“项目工程属性”对话框中的“保护”选项卡,将VBA工程与设置给工作簿的任何密码分开锁定。 17.是非题:一个bug阻止程序运行。 错误。bug阻止程序正常运行,但不会阻止程序运行。...监视值仅在程序进入中断模式才更新。 23.VBA如何将bugs报告给程序员? 不会。除了测试程序外,没有其他方法可以找到bugs。

4.2K20

VBA专题10-6:使用VBA操控Excel界面之执行命令以及激活功能区选项卡的两种方法

SendKeys方法 例如,下面的VBA代码模拟按下ALT、A和ALT键: Application.SendKeys "%A%" 将上面的语句放在Workbook_Open事件中,在打开工作簿,将激活...创建新工作簿并将其保存为启用宏的工作簿。 3. 关闭该工作簿并在CustomUI Editor中打开。 4....' customUI.onLoad的回调 Sub Initialize(ribbon As IRibbonUI) Set myRibbon = ribbon End Sub 当在Excel中打开工作簿...使用对功能区的引用,可以接着通过myRibbon对象激活功能区选项卡(以及使功能区中的选项卡和控件无效)。 12. 保存,关闭,然后重新打开工作簿。...要激活特定的内置功能区选项卡,例如“数据”选项卡,使用下面的代码: myRibbon.ActivateTabMso "TabData" 如果要在打开工作簿激活“数据”选项卡,在Initialize过程中插入上面的语句

3.6K20

VBA专题10-14:使用VBA操控Excel界面之在功能区中添加自定义库控件

excelperfect 在自定义功能区,我们可以插入图像到自定义库中,图像文件的类型可以是ico、bmp、png、jpg和tif。 要给自定义功能区选项卡添加库控件,执行下列步骤: 1....创建一个新工作簿,并将其保存为启用宏的工作簿。 2. 关闭该工作簿,然后在Custom UI Editor中打开工作簿。 3....在Excel中打开该文件。 12. 按Alt+F11键激活VBE。 13. 插入一个标准的VBA模块,并粘贴在步骤9中复制的回调代码。 14. 在过程中添加一个MsgBox语句来测试控件。...图2 代替上述第4步和第5步中手工插入图像,可以通过使用VBA过程使用相同的图像填充库。通过赋VBA过程的名称到loadImage回调属性来实现。下面列出了XML代码和VBA代码: ?...当打开工作簿,执行LoadImage过程。

2.9K10

Excel实战技巧50: 避免因粘贴破坏数据有效性

然而,将数据复制粘贴到设置了数据有效性的单元格破坏掉数据有效性设置。 利用VBA代码,可以避免因粘贴数据而破坏单元格数据有效性设置。...CatchPaste", , False End Sub Private Sub Workbook_Open() CatchPaste End Sub 在工作簿打开,进行相应的设置。...在工作簿关闭或者非当前工作簿,恢复相应的设置。...关闭该工作簿,并使用CustomUI编辑器打开工作簿,输入下面的XML代码: <customUI xmlns="http://schemas.<em>microsoft</em>.com/office/2006/01/...再<em>打开</em><em>工作</em><em>簿</em>,试试效果,如下图1所示。 ? 图1 标准模块代码的图片版如下: ? ? ? clsCommandBarCatcher的类模块代码的图片版: ?

6.7K31

Excel VBA编程

worksheet事件 使用工作簿事件 open事件:当打开工作簿发生 beforeclose事件: 在关闭工作簿之前发生 sheetchange事件:更改任意工作表中的单元格发生 常用的workbook...,Excel显示一个警告框,让我们确定是否执行这些操作。...worksheet对象(普通工作表) workbooks 当前所有打开工作簿 workbook对象 引用workbook对象 通过文件索引引用 通过文件名引用 sub test() workbooks...在保存工作簿之前发生 Deavtivate 在工作簿状态作为非活动状态发生 NewChart 在工作簿新建一个图表发生 Newsheet 在工作簿新建一个工作发生 open 打开工作簿发生...控件的Tab键顺序决定用户按下【Tab】或【Shift+Tab】组合键后控件激活的顺序。在设计窗体,系统按照添加控件的先后顺序确定控件的Tab顺序。但是这个顺序是可以更改的。

45.2K21

002 C# 写入Excel,Word,Ppt完整攻略

这期,想给大家介绍一下C#操作微软三大件Excel,Word,Ppt攻略。 你可能会说,不就是在这几个软件里写入数据吗? 有什么难的,我打开软件不用编码就能写。...因为前期绑定运行速度极快,而且编写代码可以有代码提示。 这期,我特别向你介绍这种操作方法。 文末有源码获取途径,源码仅供个人学习使用,切勿商用。...完善命名空间引入代码 编辑写入Excel单击事件代码 流程:生成Excel主程序》新建工作簿通过Cells属性写入单元格》另存在桌面上》关闭Excel程序。...友情贴士:当引入三大件命名空间后,生成Application及二级对象。 编辑器提示对象与事件存在二义性、 这时,你需要在Application及二级对象前加上 _ 即可消除错误提示。...BUG修正 在实际操作过程中,通过对比三大件之间的差异。 发现使用Quit()指令无法正常关闭Excel和Ppt后台进程。

2.8K00

Excel编程周末速成班第22课:使用事件

有三类事件: 事件始终是用户操作的结果,例如单击用户窗体上的控件或按某个键 用户操作或VBA代码可能引起的事件,例如打开工作簿或激活图表 与用户操作无关的事件,例如一天中的特定时间的发生 总体而言,Excel...图22-1:在代码编辑窗口输入事件过程 事件顺序 处理事件,你需要了解某些操作导致触发Excel中的多个事件。在这些情况下,多个事件以特定顺序发生。...下面是一个示例:将在工作簿中添加新工作,将按以下顺序触发下列三个应用程序级事件: 当添加新的工作,将发生WorkbookNewSheet。...你可以通过将Application对象的EnableEvents属性设置为False来禁用大多数事件。这样做禁用除用户窗体和控件外的所有事件。何时需要禁用事件?...注意:因为EnableEvents属性是Application对象的属性,所以它适用于所有打开工作簿。你不能有选择地禁用某个工作簿的事件。

2.8K10

VBA实战技巧32:安装Excel加载宏

为了构建在对话框中的列表,Excel查看以下几个位置: 1.Add-ins文件夹 C:\Users\[用户名]BHTHP\AppData\Roaming\Microsoft\AddIns 或者: C:...每次Excel启动,都会弹出一个找不到加载项的警告消息框,如下图6所示。 图6 因此,为什么代码显示一个如下图7所示的消息框。...Application.AddIns.Add(ThisWorkbook.FullName, False) oAddIn.Installed = True RemoveEmptyBooks 第一行代码确保在Excel中至少打开一个工作簿窗口...最后一行关闭加载项打开的所有工作簿为什么?因为当没有活动工作簿你无法打开加载项对话框,显然这也阻止Excel通过VBA将新加载项添加到列表中。...下面是添加一个空工作簿并再次删除它的代码: Option Private Module Dim moWB As Workbook Sub AddEmptyBook() '如果需要添加一个空工作簿.

4.6K20

VBA专题10-20:使用VBA操控Excel界面之隐藏和取消隐藏控件、组和选项卡

excelperfect 内置控件(不被允许) 不能够单独隐藏内置组中的内置控件。然而,可以隐藏内置组,因此隐藏该组中的所有控件。可以单独禁用(和启用)组中的控件。...当打开工作簿执行该回调。 GroupAlignmentExcel组元素包括getVisible属性。通过该属性指向HideAlignmentGroup过程,在打开工作簿或使该控件无效执行。...如果活动工作表不是标准工作表,就隐藏该组,否则该组可见。 注意,当打开工作簿,创建ribbon对象。编辑VBA代码可能销毁这个新创建的对象。...试图使与销毁对象相关的控件无效是不可能的,唯一的办法是重新创建ribbon对象重新打开工作簿。 当激活图表工作,“开始”选项卡中的“对齐方式”组被隐藏,如下图所示: ?...当打开工作簿或者当其中一个或两个控件被无效执行该回调。

7.8K20

最全Excel 快捷键总结,告别鼠标!

Ctrl+F5 :可恢复选定工作簿窗口的窗口大小。 F6 F6 :在工作表、功能区、任务窗格和缩放控件之间切换。...在已拆分(通过依次单击“视图”菜单、“管理此窗口”、“冻结窗格”、“拆分窗口”命令来进行拆分)的工作表中,在窗格和功能区区域之间切换,按 F6 可包括已拆分的窗格。...Shift+F6 :可以在工作表、缩放控件、任务窗格和功能区之间切换。 Ctrl+F6 :如果打开了多个工作簿窗口,则按 Ctrl+F6 可切换到下一个工作簿窗口。...Alt+F11:按 Alt+F11 将打开 Microsoft Visual Basic 编辑器,您可以在其中通过使用 Visual Basic for Applications (VBA) 来创建宏。...Ctrl+N:创建一个新的空白工作簿。 Ctrl+O:显示“打开”对话框以打开或查找文件。 Ctrl+P:在 Microsoft Office Backstage 视图 中显示“打印”选项卡。

7.2K60

ActiveReports 9实战教程(3): 图文并茂的报表形式

以往做报表相关的工作,最害怕的是报表的UI设计工作,当遇到一个布局非常复杂的报表,往往花上两、三间才能完成报表的UI设计工作。...当我们打开ActiveReports报表设计画面(如双击*.rdl、*.rpx、*.rdlx),我们最关心的可能是工具箱和属性窗口,而没有注意到VS菜单栏上面的 报表菜单选项,报表菜单总共有6个菜单项...当选择SnapLines,可以根据对齐辅助线来判断控件之间的相对位置关系;当选择Snap to Grid通过鼠标移动控件的最小单位是一个单元格的距离,而且可以根据单元格的数量来判断控件的正确位置。...还可以通过选择Chart后,单击图表数据进行修改:序列(系列)、类别分组、序列分组数据填充操作。 ?...添加Image报表控件,并设置国航机票的背景图片。 ? Step 3:添加条形码 上面添加了Image控件后,我们来添加条形码控件。 ? 配置条形码属性 ? LayerName:设置为Layer1。

1.7K60

VBA通用代码:自定义右键菜单

标签:VBA,快捷菜单 在《VBA通用代码:在Excel中创建弹出菜单》中,我们给出了一段在工作表中创建弹出菜单的代码,将给代码指定快捷键,这样通过按快捷键可以在工作表调用弹出菜单,从而执行其中的命令。...删除该控件以避免重复....Set ContextMenu =Application.CommandBars("Cell") ' 删除带有标签: My_Cell_Control_Tag 的自定义控件....Private Sub Workbook_Deactivate() Call DeleteFromCellMenu Call DeletePopUpMenu End Sub 关闭Excel工作簿...然后,再重新打开工作簿。 此时,右键单击任意单元格,可以看到在单元格快捷菜单中增加了一个自定义命令,如下图1所示。 图1 注:本文整理自microsoft.com,供有兴趣的朋友参考。

1.3K30

VBA编写笔记:常用的对象和方法

Application.Volatile 方法 用于将用户自定义函数标记为易失性函数,无论何时在工作表的任意单元格中进行计算,易失性函数都必须重新进行计算。...非易失性函数只在输入变量改变才重新计算,若不用于计算工作表单元格的用户自定义函数中,则此方法无效。 记录   GetObject获取的表格对象是多应用模式。...unprotect解除工作表保护,protect 保护工作表,同样适用于工作簿。   range对象的offset属性能整体偏移选择其它范围,并返回它的range对象。...WorksheetFunction 对象 用作可从 Visual Basic 中调用的 Microsoft Excel 工作表函数的容器。...表格插入控件 可插入的控件分为表单控件和activex控件。表单控件只能通过shapes对象去获取,activex对象可以直接操作

1.8K20
领券