Office
我一直在网路上查找这个问题的解决方案,但是由于某种原因,我无法找到与使用.onAction直接相关的选项。 我正在使用另一个问题的答案作为参考: https://stackoverflow.com/a/18199035 在循环的部分通过形状,脚本将.onAction事件分配给每个形状。无论何时在Excel 2010中运行,我得到错误: 无法运行宏“SelectCell”Sh
..
我有一张名为“受让人”的表,其中包含某些人的姓名。我有另一个名为Raw的工作表,其中包含多行包含文本字符串。我的要求是找出单元格中的任何名称是否存在于单元格中,如果是,则该单元格中的最后一个名称。要指定更多,请参见以下示例 受让人表格包含单元格A1中的Vivek S. Panicker,A2中的John Smith和A3中的William Dezuza Margeret。原始图表A1单元格包
..
我已经看过如何编辑超链接 - 但是当用作自定义公式时,我需要添加超链接。 我得到了一个#VALUE 错误,我不知道为什么。有没有人有任何想法为什么当我尝试使用它在一个工作表中 c $ = testit39() 公共函数testit39()As String Application.Volatile Dim rng作为范围,milestoneinfo As String,mile
..
我想在我的VBA代码中实例化的一些第三方COM对象上从我的工作簿关闭事件中调用System.Runtime.InteropServices.Marshal.ReleaseComObject(obj),类似于以下内容: Public Sub disconnect(obj As Variant) Dim refs As Long refs = 0 如果不是obj是没有,然后 做
..
我遇到麻烦我的宏。我在表单上有一个按钮和几个复选框,我正在尝试编写一个代码,当我点击按钮时,它将检查范围(“A1”)。文本,取得该文本(在这种情况下为“ checkbox1“),我想这样说: questionnaire =范围(”A1“)。文本 问卷调查值=范围(“A2”)价值 我想要的是,当我在“A1”中写一个控制名称时,当我点击按钮时,该控件将取值为“A2”。问题是我不
..
我需要使用Excel的VBA检查regEx。我正在使用Mac OS 10.10 ans office 2011.所以没有我可以使用的dll文件。 这里要做什么?我读了我要绑定一个苹果脚本。但是这个脚本需要怎么做?这个脚本需要什么内容? 谢谢。 解决方案 本来,你不可能真的 - AppleScript实际上并不适合这种事情(VBA方面) 有您可以安装和使用的其他库,以支持像Ma
..
我已经使用条件格式设置来在保存的名为“Loops_1000”的范围内将单元格设置为红色,这些范围具有重复的值。为了讨论,范围是 A1:Z100 。所以现在我可能有100个单元格,其中包含各种标签数据(例如 C-03012034 )。格式是General。我想搜索范围,并找到所有的红色单元格(背景红色= 3我相信),并将数据返回到一个空列(AA)升序。 我在本网站上查找了一个解决方案,利用名称
..
我的excel表中有一个feed,如果该值相应变化,则要使单元格闪烁绿色/红色。有人可以帮忙吗?谢谢。 Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range 设置KeyCells =范围(“B1:B27”) 如果不是Application.Intersect(KeyCells,Rang
..
在为答案时,我偶然遇到意外的行为/ q / 27827384/3198973“>这个问题。 链接在一起范围 code>地址始终返回语句中第一个 Range 对象的地址。例如: Public Sub Unexpected() Debug.Print Range(“B3”)。地址 Debug.Print Range(“B3”)。Range(“A1”)。Address En
..
在我的上一个问题(需要的一切都在这个问题上;链接在这里是为了完整性和度量)我要求从Web位置将XML数据提取到Excel。我收到的代码(由 user2140261 提供)作为答案在这里: Sub GetNode() Dim strXMLSite As String Dim objXMLHTTP As MSXML2.XMLHTTP Dim objXMLDoc As MSXML2.D
..
这是我的代码示例,但我被困住,因为我不会不知道在单元格公式中包含变量的语法。 表格(“Orderboek”)。选择 范围(“H”&(rOi + 1))。FormulaR1C1 =“= Sum(H3:H”& rOi&“)” 我的变量声明如下: Dim i As Integer ,a As Range'i = index a een gebied Dim prT
..
我需要删除行: - 没有Word“获取”到列A,例如:如果A1是配置获取,我不应该删除;但如果是nFormat或其他任何东西,我应该删除。 - 对于具有单词“get”的行,我还需要检查列C中的值是否为0,如果不是0,我也应该删除。 我的功能正在使用少量行的工作表,但问题是,我真的需要运行它大量,假设为60000行。有人可以帮助我吗? 我的功能是: Sub DeleteRow
..
我正在使用名为Rev00,Rev01,Rev02等 - 在我的工作簿中的其他工作表。 这将是非常有帮助的(为了比较不同修订的子摘要)设置完全相同的多重过滤器(如在活动工作表中设置)仅在以“Rev”开头的所有页面。 此操作最希望通过双击 Range(“A1”)或某处(我不想要这个按钮)。 如果可能,下一个双点击范围(“A1”)应该重置过滤器。 Sub Test() Dim
..
我很喜欢excel宏和vba。 我有一个excel文件,第一页中有大约30万行,第一列中有项目标识符(它们可能是几个具有相同值),第二个表中约有1000行(第一列还包含项标识符但它们在这里是独一无二的)。我需要编写一个基于第二张表将第一张表中的行隐藏的宏。我的意思是我需要循环抛出第一张表中的所有行,如果第一个单元格值与第二个列的第一列的任何单元格不匹配,则隐藏此行。 i知道这将非常慢,因为
..
这实际上是我第一次在这个网站上发布 - 我非常感谢所有的帮助我可以得到! 我有一个包含 客户电子邮件, 他们的名字, 他们的检查日期和 及其处理日期。 我想每天向他们发送提醒电子邮件如果他们的处理日期是今天。我已经成功地编写了代码 - 但是我没有能够粗体部分电子邮件( ProcessingDate , CheckDate 和时间)。 再次感谢你! 这是我的代码:
..
我使用ADO中的代码在工作簿之间复制粘贴数据。第一个工作簿的数据是垂直的。我想把它复制并粘贴到其他工作簿在水平位置。我如何用下面的代码呢?感谢提前 Public Sub GetData(SourceFile As Variant,SourceSheet As String,_ SourceRange As String,TargetRange As Range,Header As Bo
..
我已经创建了一个userform(更改活动工作表或所有工作表的列和行宽度),它有三个框架。 在第一帧中,我给了两个选项框。第一个选项框: - 要从列B向上更改列宽和其他选项框,以便从列c开始更改行列宽度。 用户将选择其中任何一个,然后移动到第二个框架:其中再次有两个选项可以使活动工作表和第二个选项框中的更改在所有工作表中进行更改。 因此,如果第一个窗体中的用户将选择第一个选项(从B向上更改行
..
我不需要匹配帐号,只需要匹配帐号文件 示例文件1:\\directory\Loaded\Jan2014\excel1 示例文件2:\\directory\Loaded\Feb2014\excel2 示例文件3:\\directory\Loaded\Feb2014\excel3 (帐号总是填充在列B中,行1到5作为标题) 使用上述示例所需的输出:
..
我正在尝试阅读excel中大(15MB)大文件中的前几个字符。现在,我使用典型的: Set MyObject = New Scripting.FileSystemObject 设置mySource = MyObject。 GetFolder(mySourcePath) 对于每个myFile在mySource.Files 与新的Scripting.FileSystemObject 与.
..
可以使用对象使用语句作为从中调用的过程的参数与阻止,而不必完全限定该对象?这可能相当于这个或我。 使用thisThing.thatThing.otherThing.myObject MySub [?]'如何指定myObject作为参数? MySub这个不,不是吧... MySub我不是这样吗? '当然我可以这样做: MySub thisThing.thatThing.ot
..