我写了一个小的宏，它需要每日Excel报告并将其打印到特定的打印机（打印到PDF）。当我运行宏时，我仍然错过了最后的步骤。按原样运行它，我仍然需要点击弹出的“保存”按钮，并且必须导航到正确的文件路径。有没有办法让它自动为我保存按钮，并将文件保存到正确的文件夹中（如下面的代码所示）？ Sub printToPDF()
'declare variable for my file path
Dim
由于某些原因在单元格488后功能停止正确复制。 488一直到最后（大约第1,000行），它从同一单元格拉到底部。 任何方式使此代码更健壮，以便它总是会从同一行中的单元拉出？ 如果我需要澄清，请让我知道，我会很乐意详细说明，但必要的。 Sub Compare()
Dim lastRow As Long
With Sheets("MP Parameters")
las
试图删除列，对简单的出口，我得到一个错误： Run-time error '9': Subscript out of range 每次我在第二最近创建的工作簿中运行的基本的宏时间 。 Sub ONCE()
'
' ONCE Macro
' export and prep an ONC list
'
' Keyboard Shortcut: Ctrl+e
'
Range("A:
有没有办法使用FIND方法来搜索2个替代值中的1个？ Set d = .Find(What:=[a OR b]) 编辑：谢谢你的联盟的建议。我不知道这是可能的，或者我原本会提供更多细节来使问题更清楚。所以这里是第二次尝试： 我有3列。 A充满日期。 B是代码。而D是我需要插入功能的地方。该函数将评估colB中的代码，如果代码为“2”，则它将运行FIND方法以找到colB中最近的先前代码1或2，然后