Questions tagged «vba»

Visual Basic for Applications(VBA)是一种事件驱动的,面向对象的编程语言,用于编写宏,用于整个Office套件以及其他应用程序。VBA不等同于VB.NET或VBS;如果您在Visual Studio中使用,请使用[vb.net]。如果您的问题是有关对任何MS Office应用程序进行编程的,则还请使用适当的标记:[excel],[ms-access],[ms-word],[outlook]或[ms-project]。


10
执行查询DoCmd.RunSQL时出现错误3340查询''已损坏
自从安装Office 2010的Windows更新以解决KB 4484127以来,我在执行包含WHERE子句的查询时遇到错误。 例如,执行以下查询: DoCmd.RunSQL "update users set uname= 'bob' where usercode=1" 导致此错误: 错误号= 3340查询''已损坏 当前仍在安装有问题的更新: 如何成功运行查询?我应该只卸载此更新吗?
83 vba  ms-access 

13
VBA数组排序功能?
我正在寻找一种在VBA中对数组进行体面排序的实现。最好使用Quicksort。或者,除了冒泡或合并以外的任何其他排序算法都足够。 请注意,这是与MS Project 2003一起使用的,因此应避免使用任何Excel本机功能以及与.net相关的任何内容。

9
使用VBA检查文件是否存在
Sub test() thesentence = InputBox("Type the filename with full extension", "Raw Data File") Range("A1").Value = thesentence If Dir("thesentence") <> "" Then MsgBox "File exists." Else MsgBox "File doesn't exist." End If End Sub 在这种情况下,当我从输入框中提取文本值时,它不起作用。但是,如果"the sentence"从If中删除Dir()并将其替换为代码中的实际名称,则它可以工作。有人可以帮忙吗?
82 excel  vba 

7
vba中的dim和set有什么区别
请原谅我是VBA的新手。 有时候我用 Dim r as Range r = Range("A1") 其他时候我用 Set r = Range("A1") 有什么不同?我什么时候应该使用什么?
82 excel  vba  vb6 

9
如何在Excel中将列中的行合并到一个单元格中?
例如 A1:I A2:am A3:a A4:boy 我想将它们全部合并到一个单元格“ Iamaboy”中 此示例显示4个单元格合并为1个单元格,但是我有很多单元格(超过100个),我不能使用A1 & A2 & A3 & A4我的方法一一键入它们吗?
80 excel  vba 

1
检索显示异常行为的日历项(Outlook API,WebDAV)
我们正在编写一个MS Outlook插件。为了满足我们的业务逻辑,它应该检查某些日期之间的所有约会。从日历中检索所有项目时,我们遇到了一些问题。我们尝试了两种选择: Outlook API。我们使用MSDN中描述的标准逻辑-按[开始]对项目进行排序,设置IncludeRecurrences为True并运行对日历项目的Find \ Restrict查询,例如此处。在我们的测试环境中,它运作良好。但是,在我们客户的环境中:对于定期约会,开始日期和结束日期设置为“主约会”的相应日期。例如,在某个房间的日历中,我们有一个在1月创建的每周约会,如果我们尝试查找8月的所有项目,则除此定期约会外,我们还有其他4个项目,但它们的开始日期和结束日期设置为1月。 。但是Outlook在同一日历中显示正确的日期... 非常糟糕,但是我们仍然有WebDAV!我们编写了一个简单的测试应用程序,并尝试使用WebDAV查询日历中的所有项目。当然,我们并没有重新发明轮子,只是从文档中粘贴了代码。前一个问题已解决,但下一个问题出现了:它不会返回大约六个月前创建的重复项目。我不知道-没有参数限制“旧”物品! 怎么了?我们缺少重要的东西吗? 技术详细信息:Exchange 2003,Outlook 2003-2010。坦白说,如果打开“缓存Exchange模式”,第一个错误就会消失,但是我们不能这样做。 var nameSpace = application.GetNamespace("MAPI"); var recepient = nameSpace.CreateRecipient(roomEMail); recepient.Resolve(); var calendar = nameSpace.GetSharedDefaultFolder(recepient, OlDefaultFolders.olFolderCalendar); var filter = string.Format("[Start]<'{1}' AND [End]>'{0}'", dateFrom.ToString("dd/MM/yyyy HH:mm", CultureInfo.InvariantCulture), dateTo.ToString("dd/MM/yyyy HH:mm", CultureInfo.InvariantCulture) ); var allItems = calendar.Items; allItems.Sort("[Start]"); allItems.IncludeRecurrences = true; var _item = …

8
标准VBA功能的“找不到项目或库”
因此,我必须在PC上运行其他人的excel应用程序,并且在标准功能(例如日期,格式,十六进制,中点等)上得到“找不到项目或库”。 一些研究表明,如果我在这些功能前面加上“ VBA”。就像“ VBA.Date”中那样,它将正常工作。 网页建议它与我系统上的项目引用有关,而在开发人员系统上必须可以。我将在一段时间内与其他人一起处理这个问题,并将这些应用程序分发给许多其他人,因此我需要了解我需要修复的excel设置有什么问题,或者需要在其中更改哪些内容。 xls文件,以便它可以在各种系统上运行。我想避免让每个人都使用“ VBA”。作为一个明确的参考,但是如果没有理想的解决方案,我想这就是我们要做的。 如何制作“ VBA”。隐含在我的项目属性/引用/等中? -亚当

9
如何在用户定义的函数上放置工具提示
在Excel 2007中,如何向用户定义的函数添加描述和参数提示?当我开始为内置函数键入函数调用时,Excel会显示说明和参数列表-工具提示。我想对定义的功能执行相同的操作。 不只是用于公式插入向导,还包括在公式框中,因此,如果我键入"=myFun(",则会"("在工具提示处弹出,就像对于"=average(" 在VBA帮助中没有任何帮助,在MSDN上没有任何帮助,在我可以找到的任何Excel和VBA专用论坛中也没有任何帮助,因此,这显然是一个漫长的尝试。
78 excel  vba 



7
将每个工作表保存在工作簿中以单独的CSV文件
如何将每个工作表保存在Excel工作簿中,CSV以使用宏分隔文件? 我有一个具有多个工作表的excel,并且我正在寻找一个将每个工作表保存到单独的宏CSV (comma separated file)。Excel不允许您将所有工作表保存到不同的CSV文件。
77 excel  vba  csv 


11
在Excel VBA中解析JSON
我有与Excel VBA中相同的问题:解析JSON对象循环,但找不到任何解决方案。我的JSON具有嵌套对象,因此建议的解决方案(如VBJSON和vba-json)不适用于我。我还修复了其中之一,使其正常工作,但是由于doProcess函数的许多递归,结果是调用堆栈溢出。 最好的解决方案似乎是原始帖子中看到的jsonDecode函数。它非常快速并且非常有效。我的对象结构全部位于类型JScriptTypeInfo的通用VBA对象中。 此时的问题是,我无法确定对象的结构,因此,我事先不知道将驻留在每个通用对象中的键。我需要遍历通用VBA对象以获取键/属性。 如果我的解析javascript函数可以触发VBA函数或sub,那就太好了。
77 json  excel  parsing  vba  object 


By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.