小编Gra*_*ant的帖子

我正在开发一个VBA脚本,它从Access中提取一系列日期,然后过滤数据并根据过滤后的数据创建图表.过滤后的数据将进入单独的工作表,图表将从中提取数据.我可以使用SQL语句从Access中获取数据,但Excel中的AutoFilter错误输出.这是我的......

    Sheet3.Range("F4:F500").AutoFilter(, "Riveter 01").Copy Destination:=Sheet2.Range("A5")

它给出了应用程序定义或对象定义的错误,我无法弄清楚原因.这是正确的方式还是有更简单的方法？

谢谢!

PS:这个过滤器将在22台独特的机器上运行,因此我计划为每台机器运行一个循环.如果这不是最快或最正确的方式,请告诉我.

加载总机时，我试图从Access VBA打开Outlook应用程序。我打开了任务管理器，可以看到一个Outlook实例出现了大约5秒钟，然后关闭了，但是我无法打开资源管理器窗口。我一直在尝试将VBA中的代码组合在一起：确定现有的Outlook实例是否处于打开状态以及其他来源，但是它不能正常工作。有任何想法吗？

而且我想坚持使用后期绑定，因此，如果有人使用XP打开，则不必担心对象库。

Function OpenEmail()

Dim olApp As Object ' Outlook.Application
Dim olFolderInbox As Object
Dim objExplorer As Object

On Error Resume Next

Set olApp = GetObject(, "Outlook.Application")

If olApp Is Nothing Then
    MsgBox "Outlook is not Open"
    Set olApp = CreateObject("Outlook.Application")
End If

Set objExplorer = CreateObject("Outlook.MAPIFolder")
Set objExplorer = olApp.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)

objExplorer.Activate

'Set olApp = Nothing

End Function

我已经在这里提到了关于后期绑定的帖子,但我不确定它是否已经回答了我的问题.我不得不使用Access VBA在XP的Office 2003和Win 7的Office 2010之间切换.如果我在2010年编辑,则2003无法打开该文件,因为"无法加载.dll"并且与Office 2003中缺少的Microsoft Outlook 14.0对象库有关.

如果我正在进行后期绑定,是否有任何理由让对象库被检查？或者它是否仍然需要检查,我将永远需要在2003年编辑？

提前致谢!

我正在寻找一种在谷歌电子表格中获取 2 列并将它们合并到一个数组中的方法，希望我可以获取这 2 列并setValues在新工作表上使用。

为什么？

我最终会使用 2 个不同的工作表，并且基本上进行了大规模的查找，并将所有结果和所需的列传输到一个新的工作表中。我可以得到完整的dataRange，循环遍历每个数组，获取我想要的值并将它们推送到一个新数组。但是有没有更简单的方法呢？如果我只能查看 row1 并获取标题及其索引，我是否可以将所有列 A 和列 D 放入多维数组中？

例子

标题1 | H2 | H3

我想要 H1 和 H3 以及它们的行，这样我就可以将它们放在新的工作表中

多维数组：

[ [H1, H3], [数据H1,数据H3] ]

当前代码

  var freqArr = new Array(); //Array with sheet data
  var myArray = new Array(); //Blank array to house header index
  var freqSheet = SpreadsheetApp.getActiveSpreadsheet().getSheetByName('KEY_test_test');
  var freqData = freqSheet.getDataRange(); //all data
  var freqNumRows = freqData.getNumRows(); //number of rows
  var freqNumCol = freqData.getNumColumns(); //number of …