我发现自己不断地将项目前几部分的代码复制到VBA中的其他部分。我的代码一半以上是从一个部分复制并粘贴到其他部分中的。这是一个问题，当我意识到有一个小错误，导致我回去纠正它在我复制和粘贴的每一个实例。
有没有办法使我的代码更短，并且只在VBA中引用一次复制的代码，以及pyth
浏览 1提问于2022-02-08得票数 -1
我在做别人准备的图画。目前，我将图形XREF到我自己的模板中，并将图层和过滤器设置为我的首选项。但是，我必须编辑XREF并在其他图形中创建我自己的图层和过滤器-每次-一天两次。我要将过滤器导出到图形中。我使用的是AutoCAD 2014，但将过滤器导出到其他图形的选项不可用。显然，该选项在AutoCAD的早期版本中可用，但在我的版本中不可用。但是
浏览 0提问于2019-09-13得票数 0
我有以下简单的VBA例程将CTRL+Shift+V绑定，以便在Excel中按值复制和粘贴 Selection.PasteSpecial _ , SkipBlanks:=False _End Sub
错误1004，类范围的
浏览 3提问于2014-12-10得票数 2
我正在尝试运行一个子例程-复制范围值-在excel窗口被停用之前。我使用的是64位vba，而当前的工作簿级别的子例程都没有提供这种解决方案。每当Excel失去焦点时，我都希望复制数据。
浏览 2提问于2017-01-26得票数 0
我发现生成报告作为标签分隔的文本文件非常方便，这些文本文件可以在excel中直接打开。开发人员仍然可以使用文本编辑器中的数据，分析人员可以在Excel中查看结果，这对他们更有用。特别有用的是，您可以在文本文件(例如=SQRT(A1) )中包含excel公式，然后在excel中打开文本文件时对其进行处理。这比创建基于xls或XML的电子表格容易得多，而且我仍然可以使用文本编辑器轻松地修改报表。我对excel专家的问题是:我是否可以使用任何函数、字符或特殊技巧来打开带有多个工作表的选项卡分隔
浏览 1提问于2014-02-06得票数 0
回答已采纳
1回答
=TEXTJOIN("，"，真，过滤器(‘myFile.xlsxForLookUp’！$K：$K，'myFile.xlsxForLookUp'!$N:$N=A2))列K是从中提取返回值的地方，列N是在lives中查找匹配的数据范围，A2是包含“键”的单元格，我正试图匹配
这很好，但是我想把它转换成VBA，这样我就可以将它添加到我的外接程序文件中并进行重用我认为这将是相对简单的，但我不认为TEXTJOIN或过滤器</
浏览 8提问于2022-08-23得票数 1
回答已采纳
在MS Word中，当添加注释到文本选择时，如果注释包含一些“关键字”，我想更改此选择的背景颜色。显然，如果注释被删除或不包含“关键字”，我需要删除作用域文本的此颜色/突出显示。我设法用这段代码在全局“运行宏”上做到了这一点(除了remove部分)，但理想情况下，这应该是动态的，当焦点从注释切换回文档或其他任何东西时激活。到目前为止，以下是我的代码尝试的简化版本： ''
Dim wdCmt As Comment, ca
浏览 15提问于2021-01-23得票数 0
1回答
我已经编译了VBA代码来过滤透视表中的每个名称，然后调用其他子例程来操作和格式化该表。这段代码在过去对我来说工作得很好，但是在更新源表和对数据透视表做了一些小的格式化更改之后，它现在让我失败了。Select
End Sub
首先:在代码启动时，ActiveSheet.PivotTables(1).PageFields(1).CurrentPage = PivotItem.Value行不会将过滤器更改为名称过滤器的第一个值第二:当例程
浏览 0提问于2014-08-28得票数 1
从Notepad++复制VBA代码并将其粘贴到thisOutlookSession中时，Outlook会冻结(鼠标光标在圆圈中旋转)进入无限循环。它会挂起，但不会使应用程序崩溃。我的代码中使用了事件驱动的Itemsend()和Application_Startup()等子例程。我不确定这个问题是否与代码结构本身有关。然而，其他一些随机代码似乎粘贴得很好，没有挂起的问题。
浏览 0提问于2018-11-07得票数 0
我的工作簿中有两个电子表格。在第一张表中，我有10列，数字从1到1000。特定的数字有特定的格式(彩色、粗体等等)。在第二个工作表中，我希望能够在任何单元格、任何行或任何列中输入值，并让它查找我输入的值，检查第一个工作表中我输入的值，并复制其格式。干杯!
浏览 1提问于2020-03-01得票数 0
我知道这是个罕见的问题。我将Sheet1导出为.cls (因为它是唯一的选项)，当我导入它时，它会显示在类模块中，我不能再运行它们了。
浏览 1提问于2019-04-01得票数 1
回答已采纳
我正在尝试复制一系列行，其中选择的行基于一个单元格中的值。我想对单元格中包含相同值的所有行执行此操作，然后移动到下一个值，并追加到第一个列表的底部。下面是我试图解释我希望实现的目标--希望上面的内容能帮助我更好地解释我的困境。我已经到处找过了，但是没有找到我想要的。我认为这很简单，而且很可能就是这样。
我收到一个包含数千行数据和18列的数据转储。基于列P "Contract“的值，我想将整
浏览 1提问于2011-04-12得票数 0
这里是VBA新手.Cells(Row, 3) = ActiveCell.Offset(0, -1)
End Sub
此子例程接受一个数字和一个字符串我想将具体的描述复制到另一个工作表"Shee
浏览 0提问于2015-02-12得票数 0
3回答
我的过程变得太大了，不能再运行了。我已经在脑海中重新设计了我的代码，但在开始编辑之前，我需要让我当前的代码启动并运行。我在网上看过，他们说你需要把你的程序分成subs，然后调用它们，但没有人真正解释或展示你是如何做到这一点的。
谢谢!
浏览 1提问于2011-04-29得票数 0
回答已采纳
我有两个工作簿，例如工作簿1和工作簿2。需要在工作簿2中放置一个过滤器，在G列中有过滤器"INTDN“，在工作簿1中复制列"O”和列"J“，在工作簿1中放置一个过滤器"B”和列"I“。有人能给出这方面的VBA代码吗？工作簿2在第12行G列中放置一个过滤器:- &q
浏览 2提问于2016-11-29得票数 0
我正在使用VBA例程复制目标工作表:将公式从命名范围内的单元格复制粘贴到与目标工作表上的单元格具有一定偏移量的单元格(此偏移量取决于特定的选择)。我在源工作表上有两种类型的命名区域；一种我只想从其中复制值(=rng_operationeel_input_data)，另一种我想从其中复制到公式(=rng_operationeel_formules)公式应该被“相对”<
浏览 2提问于2017-06-22得票数 0
2回答
我想要创建一个Excel公式(不使用VBA)来填充基于另一个名为“处方”的工作表，名为"Bill“。
例如，我在单张“处方”中有10行，列有标题、数量、价格和总数。我希望将Quantity>0中的行复制到工作表"Bill“中，而不需要任何空白行。我知道使用VBA很容易，我所要做的就是复制每一行(包括空白行)，设置一个自动筛选器来隐藏0，然后添加一些VBA来刷新过滤器，但我很确定没有V
浏览 0提问于2014-10-27得票数 0
回答已采纳
我有一个直接从数据库(查询)中提取的报告，但是它包含的信息比必需的多(没有值的项)，所以我添加了一个子例程来删除额外的行。子例程似乎可以很好地纠正空行。然后，我有另一个子例程，它复制返回的值，并将它们放在另一个已经布置了标题的工作表中，然后另一个子例程将签名块添加到底部。当所有这些都完成时，用户将此工作表的副本重新命名为其适用的月份和</
浏览 2提问于2015-02-03得票数 1
回答已采纳
3回答
我正在尝试做一些类似这样的事情： Call c Call c 我想在Sub c中做的是，在不传递任何参数的情况下，显示Sub a或Sub b是否调用了它。在中，我会简单地显示堆栈，但我不知道这在VBA中是否可能-你有什么想法吗？
浏览 1提问于2013-06-11得票数 9
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
云直播活动推荐
腾讯云开发者
