VBA嵌套的for循环不会运行
可能是由于以下几个原因导致的：
- 循环条件不满足：请检查循环条件是否正确，确保循环可以执行。例如，循环的起始值、结束值、步长等参数是否设置正确。
- 循环体内部逻辑错误：请检查循环体内部的代码逻辑是否正确。确保循环体内的语句可以正常执行，并且没有语法错误或逻辑错误。
- 嵌套层数过多：如果嵌套的for循环层数过多，可能会导致程序执行时间过长或内存溢出。建议优化代码逻辑，减少嵌套层数，或者考虑使用其他循环结构来替代嵌套的for循环。
- 变量命名冲突：请确保在嵌套的for循环中使用的变量没有命名冲突。如果变量名重复，可能会导致循环无法正常执行。
- 其他语法或逻辑错误：请仔细检查代码中是否存在其他语法或逻辑错误，例如缺少必要的语句、拼写错误等。可以使用调试工具逐行执行代码，查找错误所在。
对于VBA嵌套的for循环不会运行的问题，可以参考腾讯云的VBA开发文档和相关产品：
希望以上信息对您有帮助，如果还有其他问题，请随时提问。
相关·内容
3回答
这是excel的VBA中的一个循环示例。
Sub Tests ()
Dim a As Integer
Dim b As Integer
b = 5
For a = 1 to b
MsgBox a
Next a
End Sub
当我在a中删除Next a时，脚本仍然正常运行。那么为什么我们要有Next a而不是Next呢？
浏览 3提问于2014-05-01得票数 1
回答已采纳
我正在写一个VBA excel代码来找到2级因子的所有不同的组合。每个因素都有2个可能的水平。例如，如果我有3个因子，则级别的可能组合的数量将为2^3 = 8。我的目标是在Excel中打印出8种组合。
例如，我的因子(级别)是Weight(50,60)和height(160,170)的唯一组合
50,160
50,170
60,160
60,170
重量在A列，高度在B列
我的问题是，是否可以写出一个VBA代码来打印出所有可能的因数组合(从2到12)，并且代码应该用excel VBA编写。
浏览 2提问于2019-01-25得票数 0
不是100%确定我的语法是否正确，而是新进入了PLSQL。现在，我有一个接受数据的游标，我试图在single表中创建一个条目，然后为在这个值和Submission_Value之后收到的每一个值创建一个条目。每次运行存储的proc时只能有一个提交，但可以有多个与每个提交相关的条目。当我运行存储过程时，它从未完成运行，但是当我将插入提交到循环中时，它运行得很好。下面是我的代码：
create or replace PROCEDURE AGGREGATE_HOURLY IS
Cursor c1 is
select sum(value_tx) AS sum_of_Values
, v.unit_c
浏览 0提问于2018-04-05得票数 0
回答已采纳
更新:我让代码做了我想做的事情(粘贴在下面)，尽管有些人可能不同意我的方法(我会接受反馈，因为我是100%的新手)。
我正在尝试创建一个简单的VBA代码来运行一个带有if then语句的循环，-and如果语句为真，则停止循环。如果语句在结束之前从未为真，则当单元为IsEmpty()时停止循环。
这就是我到目前为止所拥有的。这显然是不正确的，而且它没有运行，但我希望这次尝试能帮助您理解我正在尝试做的事情。
Sub runoutDateLoop()
r = 8
Do Until IsEmpty(Cells(r, 1))
c = 24
Do Until Cells(r, c - 1).Value &
浏览 1提问于2018-08-07得票数 1
3回答
我收到了一个运行时错误，但这可能是我遇到的最小问题。逻辑在我的头脑中是有意义的，但我可能没有使用正确的语法或函数。我的代码如下，带有注释和“希望”：
Sub Random_Points()
Dim i As Integer
Dim j As Integer
Dim Max As Integer
Dim RandomNumber As Integer
Max = 100 '(Max is being multiplied by the Rnd function to provide a random number between 0-100)
浏览 0提问于2016-03-14得票数 2
1回答
语境
我在excel VBA中有一个用于在远程数据库上进行只读查询的应用程序.
查询是从UDF执行的，我的应用程序将数据数组从记录集对象传递给函数，并调用Excel将数组写入单元格范围的快速过程。
挑战
应用程序必须能够选择返回数据集顶部的字段名。这对我来说是一个巨大的性能挑战。我所知道的在VBA中为2D数组追加或预置的唯一方法是遍历整个数组。通常，我通过直接将recordset.getRows()对象传递给我的UDF来避免这样的循环。但是，当将字段列表和查询结果与循环方法(我所知道的唯一方法)组合时，我对大量查询的计算时间增加了一倍或三倍。
我对此进行了基准测试:对于2k行和5个字段的查询，
浏览 7提问于2015-07-04得票数 0
回答已采纳
我有一个大的工作簿，有几个网络和文件连接。我运行了几个宏来更新这些连接的不同序列，代码的形式很简单：
ActiveWorkbook.Connections("XMLConnect3").Refresh
ActiveWorkbook.Connections("XMLConnect4").Refresh
当这段代码运行时，在宏中的每次刷新尝试都会有4个弹出窗口，
“以下数据范围未能刷新: XMLConnect”
“以下数据范围未能刷新: XMLConnect1”
“以下数据范围未能刷新: XMLConnect2”
“以下数据范围未能刷新: Table
浏览 0提问于2018-06-06得票数 1
1回答
对于VBA，是否有相当于人的控制和f函数？
基本上，我有两个非常长的单张，它们有一些共同的值，但也有一些独特的值，我试图将它们合并为一个。
这样做的简单代码方法是通过两个嵌套循环-在列表B中运行，直到找到匹配的列表A，然后移动到列表A的下一个条目，然后一直运行到列表B。
这是可怕的低效。
有什么简单的方法可以让代码快速地从另一个工作表上的这个单元格中找到数据，然后匹配这些行吗？
浏览 2提问于2015-03-23得票数 0
回答已采纳
嗨，你能告诉我为什么下面的代码不起作用吗？我想在牢房里填上"aaaa“。我是VBA初学者，如果您能提供一些理论参考，我将不胜感激。谢谢
Sub aa()
Dim row As Integer
Dim col As Integer
For row = 1 To 20
For col = 1 To 20
Cells(row, col) = "aaaa"
Next row
Next col
End Sub
浏览 1提问于2018-06-28得票数 0
回答已采纳
2回答
顺序不重要的VBA循环
、、、
我试图在3个变量上运行一个循环，在这些变量中，顺序并不重要。
我首先尝试的代码如下，其中nx在行中运行，极限是我的数据库的最后一行：
Do While n3 <= limit
Do While n2 <= limit
Do While n1 <= limit
Call Output
n1 = n1 + 1
Loop
Call Output
n2 = n2 + 1
n1 = n0
Loop
Call Output
浏览 4提问于2020-05-23得票数 3
回答已采纳
1回答
我做了一个简单的异步扩展，它定期计数Arch的更新并显示在面板上。
如果在Gnome已经运行的情况下启用了该扩展，则该扩展可以正常工作。在任何其他情况下(使用预启用扩展启动Gnome )，它会破坏桌面并返回到GDM。
我的代码可以在： 找到
也许异步函数有什么问题吗？是从那里得到的
谢谢。
浏览 5提问于2021-05-06得票数 2
2回答
在我的VBA代码中，我从表中的最后一行到表的顶部。但是我想要这个直到循环结束当它到达第10行。
现在我正在使用这个做循环：
Do
' Do Something
Loop Until ActiveCell.Address = "$N$10:$BI$10"
如何更改代码，使其在到达第10行时停止？
浏览 1提问于2018-06-27得票数 2
回答已采纳
我试图使用下面找到的VBA代码遍历文件夹：
我只是简单地复制和添加了我自己的宏。虽然它没有给出一个错误。代码不起作用。当我运行宏时，它根本没有反应。
我有一些500+文件，我需要将宏应用到其中一些文件实际上是嵌套在文件夹中的。
我真的很感激有人能帮我创建一个工作的宏。在堆栈交换中找到的--要么出现错误，要么根本不响应。
如果有一个宏启用工作版本的代码提交这里-这将是一个很大的帮助。
我很清楚，在文件夹代码中有VBA excel循环，也有递归的--当我测试这些解决方案时，它们不适合我。这并不是说他们根本不工作。
将我指向其他线程并不能帮助我读取所有的线程。我花了时间对他们进行测试。
这就是我需要
浏览 1提问于2015-09-09得票数 0
2回答
我有一个Excel/VBA电子表格，通过ADODB连接到Oracle数据库。连接工作正常，普通查询运行良好。但我试图变得有点聪明，避免使用with as子句运行多个select语句。这个链接基本上解释了我想要做的事情：
当我的SQL在没有Excel的情况下直接运行时，它可以正常工作。然而，Excel/VBA在With As子句上有问题，并抛出一个“运行时错误'3704'；应用程序定义的或对象定义的”错误。这是我的SQL和代码的简化版本：
SQL
with ORDERED as (select
start_value, country
from
MYTABLE
where co
浏览 1提问于2015-05-21得票数 2
回答已采纳
我知道题目还不清楚，所以希望我能澄清：
考虑以下VBA脚本(由M.Paige编写)：
Sub rem_space()
Set myRange = ActiveDocument.Content
With myRange.Find
.Text = " :"
.Replacement.Text = ":"
.Execute Replace:=wdReplaceAll, Forward:=True, _
Wrap:=wdFindContinue
End With
End Su
浏览 4提问于2014-10-29得票数 1
回答已采纳
3回答
我正在运行一些‘嵌套的循环’的例子，下面的代码给出了一个例子。但从技术上讲，这不是一个for循环吗？
xLimits = range(getWidth(pic))
for x in xLimits:
pixel = getPixelAt(pic, x, 0)
setColor(pixel, green)
嵌套的不是像这样吗？
for x in xLimits:
for y in yLimits:
code
code
code
有人同意或不同意我的意见吗？
我知道这可能并不重要，但如果我没有以正确的方式看待这件事，我想知道原
浏览 3提问于2013-06-12得票数 3
回答已采纳
1回答
我正在尝试使用MS启动IE自动化，我正在学习教程。
我知道IE ReadyState =4意味着网页已经加载
根据该条：
在VBA中使用IE时，人们遇到的一个非常常见的问题是VBA试图在Internet完全加载之前运行代码。通过使用这段代码，您可以告诉VBA重复一个循环，直到IE就绪(IE.ReadyState - 4)。
'IE ReadyState = 4 signifies the webpage has loaded (the first loop is set to avoid inadvertently skipping over the second loop)
浏览 5提问于2019-10-22得票数 1
回答已采纳
我想知道VBA case语句是否会运行多行代码：
Const HARD = 30
Select Case Hardness
Case "Hard"
If PenetrationRate.Cells(i, 1) >= Hard Then
Total = Total + Metres.Cells(i, 1)
DoEvents
End If
Case "Soft"
If PenetrationRate.Cells(i, 1) < Hard Then
Total = Total
浏览 2提问于2012-07-23得票数 1
1回答
显示带参数的枢轴表列表
、、、
我有一本工作簿，里面有许多工作表和许多枢轴表。在所有这些枢轴表中都有一个概述，将很好地确保我有一致的参数、标题等。
它应该显示关键信息，如：
工作表名称、数据透视表名称、数据透视表位置、指向位置的超链接、选择参数(如OLAP支持、当前连接切片等)、类型(功率轴或标准)
我想我们都会很高兴在所有复杂的应用程序中都有这样的应用程序。有谁能知道如何在VBA或其他什么地方设计这个吗？
浏览 2提问于2012-08-03得票数 0
在运行VBA时，我在打开工作表时遇到了问题(因为Excel/VBA被占用，据我所知，它阻止了另一个工作表打开)。
SendKeys ("%O")
Application.Wait DateAdd("s", 1, Now)
'Loop that waits for file to open
Dim TestWorkbook As Workbook
Set TestWorkbook = Nothing
On Error Resume Next
Set TestWorkbook = Workbooks("export.csv")
Op
浏览 1提问于2018-11-16得票数 0
让我们假设我想要运行一些很好的VBA代码，这些代码可以最好地分解成四个很好的小顺序函数。
Call Init()
Call FirstStep()
Call SecondStep()
Call CleanUp()
但是，如果前三个中的一个失败并出现错误或用户取消，那么我想整齐地退出并运行CleanUp。
我从..开始。
If Init() Then
If FirstStep() Then
If SecondStep() Then
End If
End If
End If
Call CleanUp
但那是丑陋的。
接下来是..。
Select Ca
浏览 2提问于2017-04-28得票数 3
2回答
我有过我的第一次"Client-took-my-work-and-then-ghosted-me-without-paying“经历。对于未来，我想放一个杀手锏，伪装成一个常规的宏，这使得整个事情无法使用。那样的话，即使他们雇人破解密码，删除我的“你的审判已经过期.”检查一下，一个普通的宏(比如"Fix_Sheet_Formatting")很容易被忽略和运行，破坏一切，保存更改。
不过，这就让VBA.我们说的是彻底清洗，所以一切都必须进行。我会想办法让自己做，我只是不想浪费时间去追求一些不可能的事情：
VBA代码可以在运行时从工作簿中删除本身，还是必须从另一个工作簿上的
浏览 1提问于2016-12-13得票数 4
回答已采纳
1回答
早些时候，我使用以下代码创建了一个vba宏 Private Sub CheckBox1_Click()
If Me.CheckBox1.Value = True Then
Range("A56").Value = Range("A56").value & " Text"
End Sub 它工作得很好，直到我在excel mobile中打开它，它说它可以运行vba宏，有没有办法让它在平板电脑上工作？我可以用不同的方式写吗？所有我想要的是一种快速的方式来添加一些预制的句子到现有的字段与一个值 感谢您的帮助:)
浏览 16提问于2020-10-03得票数 0
回答已采纳
因此，我对VBA ()完全没有经验。
基本上，我有通过字典运行的代码，并从它们中删除某些元素。下面是一个快速示例(不在生产代码中)：
Dim testDict As New Scripting.Dictionary
testDict.Add 1, 5
testDict.Add 2, 10
testDict.Add 3, 15
testDict.Add 4, 20
testDict.Add 5, 25
testDict.Add 6, 30
Dim Key As Variant
For Each Key In testDict.Keys()
If testDict.Item(Key)
浏览 2提问于2016-01-13得票数 1
回答已采纳
我正在尝试使用VBA从excel运行存储的MS-access查询。我已经创建了一个通用函数来执行此任务(使用ADODB)。无论有没有参数，我都可以得到结果。
但是，当我尝试运行一个引用Access vba模块的存储查询时，excel会报告一个运行时错误"undefined function MissCat“(这是存储查询使用的自定义函数的名称)。
我原以为这是可行的，因为access知道函数的定义，但现在我感觉ADODB接口正试图在没有我在access中创建的VBA模块的帮助下，在存储的查询中插入SQL。
我正在跳过这些障碍，因为我的大多数用户在他们的机器上都没有安装访问。
我是否可以
浏览 1提问于2011-09-22得票数 1
回答已采纳
1回答
我试图使用vba将这个表10x10转换为6x6。我需要考虑各种不同选择的可能性，这样“用户”就可以选择这6家公司中的任何一家，并将创建一个包含这些值的新表。
例如，如果我选择了C2,C4,C5,C6,C9,C10，那么我的新表将是
C2xC2
C2xC4
C2xC5
C2xC6
C2xC9
C2xC10
C3xC2..... and so on for 36 values
我还没有试过什么，也不知道从哪里开始。如能提供任何帮助，将不胜感激。
浏览 2提问于2022-11-18得票数 0
我正在寻找关于调用Qt应用程序的of ()之后发生的事情的文档。这个问题源于我在处理QDialogs的返回值时遇到的一个问题。我想澄清以下顺序：
QCoreApplication::quit()或QApplication::quit()调用
没有为QDialogs调用QWidget::closeEvent()。似乎所有打开的对话框都是通过调用它们的reject()方法自动关闭的。这是最重要的部分，这种行为有保证吗？
“事件循环阻塞”QDialog::exec()方法返回，必须由调用方小心处理(访问已删除对象的成员，.)。
发出aboutToQuit信号
应用程序的析构函数称
浏览 3提问于2017-01-03得票数 1
回答已采纳
1回答
这在MS Access VBA中是否有效：
iif ([company] = "starbucks", "retail", iif ([item] <> "", "DLookup(....)", ""))
我正在尝试得到类似于上述工作的东西。
浏览 3提问于2011-12-06得票数 0
回答已采纳
1回答
我正在从excel中的两个表/列表中寻找所有可能的组合。是否有可能使用VBA来编写脚本代码等等？我没有创造力..。
表A x表B=表C(包括来自A和B的所有可能组合)
浏览 3提问于2022-04-06得票数 -2
这是我第一次使用mclapply在多个进程上运行并行脚本，但是我在我的笔记本电脑上尝试了这个脚本，它运行得很好并且正确地填充了dataframe，但是现在当我在我的office pc上运行这个脚本时，当打印结束并且是收集数据的时候，脚本就会停止这个错误：
错误:无法分配大小为80 Kb的向量
fun <- function(testdf) {
l=12000
errordf=data.frame()
errordf <- mclapply(1:nrow(15000), function(i)
{
for (ind in 1:nro
浏览 4提问于2013-02-18得票数 0
我正在编写一个Excel VBA程序，用于检查VBA表单并将其转换为HTML表单。其中大部分都可以工作，但我需要知道如何判断VBA控件是否在帧内。因为当我在HTML中使用绝对定位时，如果(例如)框架中控件的left属性需要添加框架的left属性。
浏览 1提问于2017-08-03得票数 0
1回答
我精通VBA，但只用SQL编写过基本的条件select语句。我有一个静态表STFile，它大约有900列。它每天为活动表创建一次快照，以创建历史记录。
ST...Date….ST1_PROD…ST1_PCT 1…ST1_PCT 2…ST2_PROD…ST2_PCT 1…ST2_PCT 2…etc.
AA..3/5/14.141……...…..0.8………..…..0.2……...…..142……...…...0.95……..…..0.05……..…..
BB..3/5/14.010……....…..1……..…..…..0……......…..141……...…...0.8……..…....0
浏览 0提问于2014-03-06得票数 0
1回答
在Excel VBA中，我要用不在括号内的逗号拆分。
我需要拆分字符串的VBA脚本
例如：
myString = "ab, cd(c1,c2,d1), ef, gh ,ij(i1,i2,j1,j2)"
E需要输出如下：
[
ab,
cd(c1,c2,d1),
ef,
gh,
ij(i1,i2,j1,j2)
]
浏览 0提问于2019-11-14得票数 0
我是通过VBA进行新编程的；目前，我已经为单个行-列创建了单个宏；在本例中，我为行"2“和列"M2:BF2”创建了一个宏，但我需要这个宏命令来遍历接下来的320行，而我不知道该如何操作。这是我的命令： enter image description here 如果有任何建议或指导，我将不胜感激。 对每个人都是最好的 豪尔赫
浏览 24提问于2020-04-14得票数 0
1回答
下面的VBA今早工作了，但现在我得到了一个错误
在文件结束后输入
我从服务器输出中读取一个文件。搜索状态并将其写入输出文件。
Set objFSO = CreateObject("Scripting.FileSystemObject")
'How to read a file
'Open Input File
strFile = "C:\Users\vhaisplowryb\Desktop\TestFile.txt"
Set objFile1 = objFSO.OpenTextFile(strFile)
'Open Outpu
浏览 0提问于2018-06-11得票数 0
2回答
我正在将VBA宏转换为Excel脚本，以便在Excel Web上运行宏
VBA代码：
//Parameters is a Sheet who has startCol/endCol Cell number and startRow/endRow numbers
// Cells 3,4 is startCol; Cells 3,5 is endCol
// Cells 3,2 is startRow; Cells 3,3 is endRow
For column = Sheets("Parameters").Cells(3,4) To Sheets("Paramete
浏览 30提问于2021-06-03得票数 0
回答已采纳
1回答
我正在VBA中迭代一个范围，目前处于for循环中。我有一个if语句，它在满足某些条件时从范围中移除值，但是当我这样做时，将跳过范围中的下一个值。
我知道我可以用Java中的数组和迭代器来解决这个问题，VBA有类似的东西吗？
浏览 5提问于2013-08-28得票数 1
回答已采纳
2回答
n= int(input())
x = int(input())
for i in range (1,x+1):
print()
a = 0
while(a<=x):
for j in range((i*n),(i*n)+a):
print(j,end="")
a+=1
如果我运行这个程序，它不会给出输出，而是接受无限输入，请告诉我错误，并给出您的程序，下面的问题是，程序必须接受两个整数值n和x作为输入，并以所需的模式打印输出：
示例输入/输出
投入：
8 5
产出：
8
16 17
24
浏览 0提问于2018-10-15得票数 1
回答已采纳
3回答
COM对象清理
、、、、
我正在从C# dll中定义的excel中的VBA脚本实例化一个COM对象。我实例化的C#类有一个终结器，它执行垃圾收集，特别是它引用的其他MS Office对象，我应该看到这些对象在任务管理器中出现和消失。事实上，单元测试表明，当调用dll时，Office进程会出现，当它完成时，Office进程会消失。
当从VBA调用dll时，我注意到进程在VBA函数结束后仍保持打开状态，即对象在被调用后未被清除，这使我相信VBA不会释放COM对象。
我的函数看起来像这样：
Function Raz(inp As String)
Dim o: Set o = CreateObject("foo.ba
浏览 6提问于2010-11-13得票数 3
2回答
我是第一次使用VBA。到目前为止，我成功地构建了一个模型。但是，我仍然希望加快计算速度(我已经关闭了ScreenUpdating、EnableEvents、xlCalculationAutomatic、DisplayPageBreaks)。我在网上读到for循环非常耗时。不幸的是，我真的有很多这样的东西。因此，我的问题是：
假设我有以下类型的代码：
For p = 1 To Periods
Demand(p) = Worksheets("Sheet1").Cells(3, 1 + p)
Next p
我的第一个问题:这个for循环真的减慢了运行时间吗？第二个问题:如何重写
浏览 2提问于2015-02-12得票数 2
如何强制excel工作簿将自身用作工作表链接的源？
我正在编写一个VBA宏，以自动化将excel工作表添加到工作簿的过程。工作表(sheet1)只从问卷的几个工作表(response1、response2、response3)中获得一定(但非常多)的答复。因此，sheet1包含了大量的单元格引用，这些引用在运行宏之前不会导致任何地方。
例如，a1 in sheet1 "='response1'!b6“。这将返回一个#REF！运行宏之前发生错误(这很好)。运行宏后，sheet1现在在正确的工作簿中，"='response1'!b6“现在是一个有效的
浏览 1提问于2016-10-20得票数 0
回答已采纳
因此，我正在尝试编写一个vba宏，如果前面的单元格中有“午餐”一词是通过if语句在单元格中填充的话，它可以将单词“午餐”写到接下来的3个单元格中。我想要一些vba代码来读取行中的每个单元格，如果它找到了这个单词--午餐。接下来的3个单元将包含“午餐”这个词。我希望将公式保留在单元格中，以便电子表格的功能保持灵活。这就是我到目前为止所写的。但它并没有达到预期的效果。请帮帮忙
Public Sub WriteLunchToCell()
Dim rg As Range
For Each rg In Sheet1.Range("BY62:FP62")
If InStr(1, r
浏览 5提问于2015-05-17得票数 0
回答已采纳
1回答
这是我的while循环，大循环，然后我们有一个for循环，如果问题是if中的代码继续循环，并使程序崩溃。当我运行我的代码并添加一个现有的id号来验证它时，它继续发送它存在的错误消息，并且我无法将我的手放在循环的问题所在
while (exist>=0){
exist=0;
for(int i=0; i<idArr.length; i++){
if(AddID.getText().equals(idArr[i])){
exist=1;
JOptionPane.showMessageDialog(null,
浏览 4提问于2020-12-17得票数 0
回答已采纳
3回答
我想问你如何使用multiple do while，或者是否有其他方法来自动化这种类型的计算。我有一个工作表与收盘价的股票命名为关闭。在另一个名为returns的工作表上，我想计算Returns。我不知道有多少行和列将处于关闭状态。所以我为第一列写了宏。
Sub CalcReturns()
' CalcReturns
Dim row As Integer
Worksheets("Returns").Activate
row = 3
Do While Cells(row, 1) <> ""
Cells(row, 2).Value = Wor
浏览 3提问于2014-07-03得票数 1
2回答
我使用R中的runjags包在一个单独的处理节点上运行每个链的贝叶斯统计模型，我希望通过使用run.jags包在并行循环中嵌套run.jags调用来一次适应多个模型。然而，这通常会导致错误消息，可能是因为foreach循环“不知道”在循环中我正在调用其他并行进程，因此内核可能是双分配的(或其他什么的)。下面是一个错误消息示例：
{：task 2中的错误失败--“在试图运行JAGS模型时遇到了以下错误：
socketConnection中的错误(“localhost”、port = port、server = TRUE、blocking = TRUE )：无法打开连接
下面是一些生成数据
浏览 2提问于2018-12-03得票数 3
我正尝试在VBA中运行一个循环，该循环将刷新第三方数据，复制/粘贴输出为值，将API周期更改为较早的日期，并在循环上运行此循环。我认为，我的问题是，VBA不会在复制/粘贴下一组值之前等待第三方数据刷新。我使用FactSet作为API并提取一些非常简单的数据。
I=我的相对日期范围。我从-1 (等于上个月)开始，在重新开始刷新和复制/粘贴之前，我希望循环继续将这个月份字段移回一个。
ExecuteExcel4Macro会刷新整个工作簿的FDS代码--这很好用。
第三组代码应该等到FDS代码刷新，不再抛出错误，然后复制/粘贴输出。
I变量没有变化，FDS代码刷新太频繁，循环只是一遍又一遍地复制/粘
浏览 29提问于2020-05-31得票数 0
对VBA来说很新鲜。
假设我有一个6×2数组，其值显示在右边，而我有一个空的2×3数组(不包括头)。我的目标是让左边的数组看起来像显示的那样。
(Header) 1 2 3 1 a
a c e 1 b
b d f 2 c
浏览 2提问于2022-06-18得票数 0
回答已采纳
我一直在进行宏vba的验证...
在vba中如何使if条件与"and“和"multiple or”结合使用？
下面是我的代码：
If (not cook = True) And (if (exp_gas > 0) or (exp_woodburn > 0) or _
(exp_oil > 0) or (margarine > 0)) Then
MsgBox "He doesn't cook", vbInformation
End If
它给了我语法错误。
浏览 0提问于2017-08-16得票数 1
回答已采纳
对excel有一定的经验，但对VBA非常陌生，需要一些帮助。我有一个包含日期的范围(D:AE)。每列的行数是可变的，但使用的单元格总数不少于~1500个，最高可达10,000个。我正在尝试创建一个宏，它将查找从今天起超过30天的此范围内的任何日期，然后清除同一单元格的内容。最终结果将是日期仅在接下来的30天内。我做了一些相当广泛的搜索，但我的经验限制并没有给我留下太多。任何帮助都将不胜感激！
浏览 5提问于2017-03-17得票数 1
回答已采纳
我在VBA分配中工作，需要创建一个数组，该数组以相反的顺序自动填充值16至9。这是我目前的代码：
nTeams = 16 ' variable to enable other size brackets
ReDim arrBracket(nTeams / 2) '<< ReDim array to appropriate size
'***** Fill the array where element 1 of the array holds the value of the
' lowest
浏览 1提问于2016-10-03得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
