我似乎不明白为什么这个按钮会给出一个运行时错误'424‘。我不知道是不是for循环抛出了它。我尝试用.select替换.activate,但什么也没有发生。 Private Sub updateX_Click()Dim emptyRowX As LongSheets("X").Activate
emptyRow = WorksheetFunction.Count
我正在尝试从外部/关闭的excel工作表中获取列,并将其与打开的工作表中的列进行比较。found()对于所有数据都不够大Private Sub CommandButton1_Click()
Dim objExcel As New Excel.ApplicationVariantDim endStr As Variant
varData = Application.GetOpenFilename("
我正在尝试创建一个循环,让Excel告诉基于DOS的系统搜索条件。如果它找不到条件,我就会陷入无限循环。我发现很多情况下,循环会一直运行到满足某个条件为止。我是VBA的新手,所以请对我的知识缺乏掉以轻心。我已经尝试了几个单一条件指南,并购买了虚拟VBA,(帮助不是很大) Sub Test ()End Sub 我希望对某个点进行整数计数