使用特定的通配符打开此目录中的所有文件
它的标题很简单。我需要能够打开具有“ x .xlsx”但不是“* xy.xlsx”的文件夹的文件。 只需不知道该怎么做我可以获取文件目录，然后使用星号选择所有带有“x”的文件。但是我有文件，我不想打开，唯一的改变是文件名末尾他们有少量文本（“y”）。 这是我到目前为止。我将添加什么。 Workbooks.Open（Dir& FileNameStart&“*”） 解决方
..
Office
是否可以将宏从一个Excel工作簿复制到另一个使用VBA？
我想使用VBA将宏从一个Excel工作簿复制到另一个。这可能吗？如果是，那么怎么样？ 解决方案 http://office.microsoft.com/en-us/excel/HP051994121033.aspx http://office.microsoft.com/en-us/project/HP453044431033.aspx http ：//www.mrexcel.
..
VBA Excel查找和替换没有替换已替换的项目
我正在寻找一个可以找到和替换数据的excel脚本，但是对于所有的爱，我无法弄清楚如何写。 情况： A ----------- B ----------- C 猫-------狗------香蕉 狗------鱼------苹果 鱼------猫-------橙色 因此，宏将查看列B中单元格中的数据，然后查看列C中的相邻单元格，并替换列A中该数据的所有实例，如果所
..
VBA索引匹配错误
我目前拥有吨/列的产量表（产品名称位于左侧，得分手在顶部，分数位于该范围内的每个单元格中）。我想要做的是创建一个导出/快照，其中只有几行同一工作簿中另一张表上的列。 我试图找出最简单的方式来刷新此工作表中每个单元格的分数，并且到目前为止已经使用Index / Match。我想对其进行编码，使这个过程容易/自动化。理想情况下，我想匹配产品/列名称，以便我可以在出口表上更改订单，金额等。
..
如何通过使用超链接（或通过将宏分配给超链接）在Excel中扩展组
我的表格顶部有一张表格，这个表格有不同的部分名称。 当我点击它们时，我想插入一个超级链接到这些部分名称去打开它的组。 请参阅我的观点表和部分作为默认（折叠） 我可以创建一个宏： 扩展所有组 转到我单击的部分 折叠所有组 只打开活动单元格上的组 但是，将这个宏分配到〜20个不同的部分会增加文件大小。 经过一些搜索，我在这里找到了这个： Excel：将宏
..
复制和粘贴活动列与合并单元格的VBA代码
我正在尝试复制活动列并将其粘贴在它旁边，但代码选择整个工作表，因为它合并了单元格。 Sub CopyPaste（） 列（ActiveCell.Column）.Selection Selection.Copy ActiveCell.Offset（0,1）.PasteSpecial Paste：= xlPasteAll End Sub 你能帮助我添加缺少的代码忽
..
搜索特定的列标题名称，复制列和粘贴以附加到另一个wookbooksheet
我的工作簿有一张，两张或三张。 每张表可以包含以下列标题名称中的至少一个：“电话”或“数字”。 如何使用这些列标题名 复制整个列（仅数据），然后将其粘贴（只需一列即可添加相同的列标题名称）转换为VBA代码（Sheet Module）所在的另一个工作簿。谢谢。 解决方案 选项比较文本 Sub search_and_append（） Dim i As Long Dim
..
SUM公式VBA
我正在尝试计算vba中更改单元格范围的总和。不幸的是，单元格值是变量。我似乎无法得到以下公式。 Private Sub calcOverheadRate（startCell As Integer，endCell As Integer） 总计= endCell + 1 范围（“D”& Total）.Formula =“= SUM（”D“& startCell&”&“D”& endCell）
..
excell 2007宏验证数据输入到单元格并显示msgbox如果不正确
有人可以帮助下列代码。它给我一个错误在以下行： 设置范围=“C5：L14” 这是完整的代码： Private Sub Worksheet_Change（ByVal Target As Excel.range） Dim ws As Worksheet Dim range As Worksheet 设置ws = Application.ActiveSheet
..
VBA：将所选图表从Excel复制+粘贴到Powerpoint
我正在将Microsoft Excel图表对象格式化为活动 PPT幻灯片，将Excel中的所选图表复制并粘贴到Powerpoint 2010。理想情况下，我希望能够将这些图表放置在活动的Powerpoint幻灯片上的特定位置。我已经扫描了网络，但是如果不是大多数解决方案都是将PPT幻灯片随机粘贴在一张纸上的所有幻灯片。我甚至没有代码，但如果有人可以帮助，那将是非常棒的。谢谢！ 解决方案 所
..
有没有办法在excel宏中使用find函数来改变用户输入的值？
我想要做的是在一张纸上放置用户输入字段，用户将文本输入到单元格中。然后，它们可以运行一个选择不同工作表的宏，然后在查找功能中使用该输入的文本。 找到文本后，需要选择文本所在的整个列，以及所有单元格直到下一个填充的单元格（在行“发现”字/短语所在）。这些单元格将被删除。 我有两个主要问题。我似乎找不到如何使用 Find 函数与一个变化的值（我说值，但我的意思是任何单词，短语等被放入用户输
..
Excel VBA十六进制到ascii错误
朋友 我发现以下功能将十六进制转换为文本。它适用于大部分十六进制文字转换，但会产生异常结果。 p> 例如：Hex值为： 050003d40201414c4552542d42656c6f772038353435206966204e462054726164657320666f722031352d3230206d696e75746573202c77617463682050414e49
..
选择不同/不同值时，调整透视图的大小
使用VBA创建数据透视表时，我会根据图表中不同的值的数量设置图表的大小。使用透视图可以选择仅显示图表的某些值。所以例如如果我有这个图表： 然后我只选择2我得到这个： 这太大了，有时甚至会更大。我想要的是当用户选择较少以使其自动变小时自动调整大小。所以我希望它是这样的： 解决方案 最后我找到了一个使用change事件的解决方案。所以当我选择不同的值时，我会检查我有多少值，然后根据
..
VBA数据透视表范围更改
我有一个数据透视表，它的范围和数据总是改变我有以下数据： Selection.CurrentRegion.Select DataArea =“Sheet21！R1C1：R”& Selection.Rows.Count& “C”& Selection.COLUMNS.Count ActiveSheet.PivotTables（“PivotTable7”）。ChangePivotCache
..
Excel VBA - 自动过滤器和高级过滤器使用错误
我有一个要求，我需要使用自动过滤器首先过滤数据，然后使用高级过滤器来获取唯一值。但高级过滤器不会单独使用自动过滤的值。如何一起使用？ 这里是我的代码， Colmz = WorksheetFunction.Match（“RSDate”，Sheets（“RS_Report”）。Rows（1），0） ActiveSheet.ListObjects（“RS”）。Range.AutoFi
..
VBA关闭Java提醒弹出窗口，名称为“来自网页的消息”
我可以在网页中浏览和输入数据，但是当选择不同的项目来更新模态时警告显示.. 如何点击确定按钮tru VBA？ 任何帮助请... 这是网页中的代码，我认为在我选择触发警报的项目时触发。 这是我在HTML脚本中看到的： function onUpdatedShowAlertTS（varControl）{ if（varControl ==“ddlProjectS
..
如何使用VBA动态链接excel中的现有形状与直线
我在工作簿的“sheet1”中有4个圆角矩形，现在我想将它们与形状名称相链接。形状名称将在另一张表的列A中，列中的名称和文本框中的名称将相同，因此我需要使用VBA代码链接它们，我是VBA中的初学者，我已经尝试了一些代码，但卡在两者之间，任何人都可以帮我解决我的问题。 Sub ConnectingShapes（） Dim ws As Worksheet Dim txBox As Sha
..
在Excel中编写脚本 - 根据逗号分隔列表插入新行
我有一个问题，我如何为以下情况编写一个宏： 我有一堆数据，有一个单元格，一些的数据包含更多的一个项目用逗号分隔。每次这个列中都有一个逗号，我想要添加一个新的行，其中添加了与上述相同的数据，但是与当前列的前一个项目之后是什么...我知道这一点很难遵循，所以这里是一个例子： ORIGINAL： 应该是： 所以基本上，每次在 CORRESPONDING中遇到逗号PART 列，它创
..
我在一台电脑上收到VBA的类型不匹配错误，但是其他错误。为什么？
我有一个带有宏的Excel文件。在这个文件中，有一个用户表单。在表单中，有一个文本框。我调用用户窗体“MyForm”和TextBox“MyTextBox”。 我也有一个模块。在这个模块中有一个这样的子程序 Sub MySub（s As String） MyForm.MyTextBox.Value = s ... End Sub 在大多数计算机上，上面的代码
..
另一个用于excel 2007的OPTIMIZING宏vba代码。代码是一种用于我的数据的转移器
你好这个代码最初没有完成，这里有一些thigns，我不太明白，我已经改变了一点从我的同事代码，以适应我的数据，它的工作原理。但太慢当我有4000 + kb的excel文件，它可能会完全冻结。 （我已经检查过，当这个转座运行的时候，它仍然在excel行限制之内，我以前做了计算，并且做了一个宏，根据列和行的数量自动分割excel文件，以确保这样） 。该代码似乎开始快，然后运行的时间越长。至少这是对我来
..