Excel值不更新
我在VBA中做了一个功能，用于根据不同的单元格计算范围内某种颜色的单元格数量。这首先运行该功能，但是当将范围中的一个单元格的颜色更改为或正在计数的颜色时，该值不会更新。如何得到它，使功能不断更新，当我改变颜色？工作簿计算设置为自动。 函数CountColor（rSumRange As Range） Dim rCell As Range Dim iCol As Integer D
..
Office
在Windows中的Excel VBA中，如何循环解析JSON数组？
在这里回答我自己的问题。 我已经在Excel VBA中完成了一些JSON工作，还有很多结果可以在Q&格式 https://stackoverflow.com/help/self-answer
..
功能VLOOKUP的Excel问题
我知道这可能不是最好的地方，要求一个纯粹的excel问题，但是。我有一个表与以下标题：数字，日期，名称。在另一个文件中，我需要将该号码与名称相链接。它并不总是在相同的顺序，因此VLOOKUP公式。以下是下面的数据。 1 15-Nov Allen 15-Nov 10 15-Nov Allen 15-Nov 19 15 -Nov Allen 15-Nov 6 5-Mar Avalo
..
Excel - 具有多个条件的VLOOKUP
我目前正在尝试分析由PC和监视器组成的资产清单电子表格。目前我遇到的问题是将PC与其两台显示器相关联。 例如，电子表格如下所示： Sheet1 - PC的列表 监视器1监视器2 员工名称PC标签号序列号MonTag1标签序列号MonTag2标签序列号 John Smith ABC123456 123456789 ABC123423 5465614 2
..
Vlookup复制单元格的颜色 - Excel VBA
我有以下表格： ABCD 1鲍勃1 6足球 2 Nate 3 7棒球 3银3 2棒球 4盒7 1骑自行车 AD Bob？ Nate？ 我可以成功使用Vlookup填写？细胞。例如，Vlookup（A8，A $ 1D $ 4,4,0）。 我不知道的是让Vlookup复制颜色。应该有VBA的解决方案。我希望你的帮助。 解决方案 你去：
..
工作簿中所有工作表的循环不起作用
我将复制粘贴工作表中所有工作表的最后一行的第一个单元格，我的代码不起作用，代码仅在活动工作表上完成。 Sub Macro5（） ' 'Macro5 Dim ws As Worksheet 对于每个ws在ActiveWorkbook.Worksheets 范围（“A2”）。复制目标：=范围（“A3：A”& Cells（Rows.Count，“B”）。End（xlUp） .
..
如何安装/使用“Scripting.FileSystemObject”在Excel 2010 for MAC？
我正在使用具有VBA版本14.0的 Excel for Mac 2011 。 我正在尝试使用访问文件系统，我知道在Windows上工作： 函数qfil_GetDirectory（strDirectoryName As String） Dim objFSO As Variant Dim objDirectory As Variant 设置objFSO = CreateOb
..
将常量的字符串表示形式转换为常量？
我试图从数据单元格接受格式常数，所以我有一个字符串“xlTotalsCalculationAverage”。如何将其转换为它所代表的Excel常量？常量 xlTotalsCalculationAverage 等于整数2。 ActiveSheet.ListObjects （1）.ListColumns（RemainingHeader）.TotalsCalculation = xlTotals
..
通过创建时间戳跟踪更改
我发现原始代码（Excel VBA）可以保持跟踪一列： Private Sub Worksheet_Change（ByVal目标作为范围） '更新20140722 Dim WorkRng As Range Dim Rng As Range Dim xOffsetColumn As Integer Set WorkRng = Intersect（Application.Act
..
Excel VBA过滤器更改事件处理程序
有没有办法弄清楚用户何时更改纸张过滤器？ 换句话说，是否有一种 change_filter事件某种处理程序？ 解决方案 是的。 从这个文章我发布在另一个论坛上 1.A dummy WorkSheet添加了一个 SUBTOTAL A1中的公式返回到主页上过滤的范围。 2.一个 Worksheet_Calculate（）事件被添加到虚拟工作表中，当更改过滤器时， SUB
..
在VBA中打开方法
我的vba脚本在 myMacro.xls Workbooks.Open 方法工作正常如下， Workbooks.Open文件名：=“D：\ExcelMacroProj\myTest.xls”，ReadOnly：= True 但是，当我尝试将文件名值更改为新路径时，如下所示，工作显示运行时错误1004 。 Workbooks.Open文件名：=“myTest.xl
..
VBA四舍五入问题
我在VBA中有这个模糊的四舍五入问题。 a = 61048.4599674847 b = 154553063.208822 c = a + b debug.print c 结果： 154614111.66879 这是一个问题，为什么VBA取整了变量C？我没有发出任何四舍五入的功能。我期待的价值是154614111.6687894847。即使我舍弃或将变量C格式
..
找到第一个空白行，然后写入它
我需要找到工作簿中的第一个空白行，并将信息写入（行，1）和（行，2）。我想我现在很卡住了... 函数WriteToMaster（num，path）As Boolean '声明变量 Dim xlApp As Excel.Application Dim wb As Workbook Dim ws As Worksheet Dim infoLoc As Integer
..
将数组公式的文本结果转换为可用格式
当数组公式的结果是数字时，我发现通常很容易找到合适的方法将数组折叠成单个结果。然而，当数组公式的结果是文本时，我发现难以以提供单个所需结果的方式来操作公式。简而言之，是否有一种操纵我忽略的文本结果数组的方法？请参阅这个问题的底部以获得最终所需的公式，而不需要解决方案。 p> *编辑 - 再次阅读后，我可以交替地总结我的问题：有一种方法可以从“公式数组结果”访问多个文本元素，没有单独选择（例如
..
“无法获取WorksheetFunction类的VLookup属性”错误
我正在尝试开发一种表单来跟踪发票的进度。表单将有一个组合框，我可以点击并选择一个供应商号码。我希望文本框根据从组合框中选择的供应商号码自动填写。这是我迄今为止所做的： Private Sub ComboBox1_Change（） 'ComboBox1填充时的Vlookup Me.TextBox1.Value = Application.WorksheetFunction.VLookup
..
使用VBA将在线图片插入Excel
我正在开展一个项目，需要通过URL填充图片单元格。所有网址都在一列中，我想在相邻的列中加载图像。我不是VBA专家，但是我发现一些代码有效，但是由于某些原因，我收到一个错误（通常是5个图像），说： 运行时错误'1004'： 无法获取图片类的插入属性 再次，我正在使用一个系统，其中的URL是一列，即： xxxx.com/xxxx1.jpg xxxx.com/xxxx2.jpg
..
VBA不接受我的方法调用并给出编译错误：语法错误
公开Sub SavePendleValues（ByVal row1 As Integer，ByVal row2 As Integer） 调用它 对于sheetrow = 2到15'要扫描的行数 SavePendleValues（sheetrow ，工作单） 下一个工作单 获取错误：编译错误：语法错误 当我取消注释行时： SavePendleValues（s
..
当使用公式生成超链接时，打开Excel超链接的VBA不起作用
似乎有一个使用公式生成的Excel超链接的错误。我使用Excel 2010.我有一个包含网址的单元格的电子表格，我的目标是做以下两件事： 转这些细胞变成超链接。 创建一个键盘快捷方式来打开这些超级链接，所以我不必使用鼠标。 要做＃1，最初我刚刚使用函数 = HYPERLINK（）。所以，我的网址是列 A ，我使用这个公式在列 B 中进行超链接。 > 要做＃2，我创建了以下宏，它
..
导入代码行
我们可以在？就像我们在 php 的问题中的include功能一样。 例如： 我们将其存储在Excel中，并将范围称为xyz 第1行代码 第2行代码 第3行代码 然后运行一个宏时，我们称之为 Sub my_macro（） xyz End Sub 基本上我想运行几行代码重复但不想创建另一个宏并传递参数。 解决方案 这可以使用M
..
将图像（jpg）转换为Excel VBA中的base64？
我需要将中的图像（或通过VBA）转换为base64 （最终将使XML输出） 我该怎么做？我需要引用DOM吗？ 我一直在阅读这个问题，但它只适用于文本字符串而不是图像... 有没有人可以看到任何代码？ 解决方案 不记得我从哪里获取了。 公共功能EncodeFile（strPicPath As String）As String Const adTypeBinary
..