所以我有一个挑战,我正在努力 - 找到一个字符串中最长的字母字符串.例如,"abcghiijkyxz"应该导致"ghiijk"(是的,我加倍).
我已经做了很多循环来解决问题 - 迭代整个字符串,然后为每个字符,使用lower和ord开始第二个循环.写这个循环没有任何帮助.
但是,有人告诉我,Regex对于这类事情会很棒.我的正则表达式很弱(我知道如何获取静态集合,我的前瞻性知识延伸到知道它们存在).我如何编写正则表达式以期待,并按字母顺序检查下一个字符的下一个字符？或者是否建议使用正则表达式对此类事物不实用？
编辑:普遍的共识似乎是正则表达式对于这类事情确实很糟糕.
因此，有很多方法可以使用助手列来反转列表以将其转换为新列表。我编写了一些代码，这些代码确实使用助手列来反转列表，然后再使用它。
我想知道如何在不使用求和产品中使用辅助列的情况下反转列表-例如，
=sumproduct(Reverse(A1:A3),B1:B3)
我在 Excel 中有一个宏。该宏的一部分使用Workbooks.Open(Filepath).
我打开的一些工作簿中包含（做得不好）VBA 代码，然后尝试计算 UDF 并失败。
不求助于 anOn Error Resume Next或 an On Error GoTo，我怎么说“打开这个文件，不要运行任何代码”。
由于可能的安全问题，首先尝试避免让代码执行。我觉得打开这些文件很舒服，而且它们很有可能不会受到损害，但可能会发生破坏，为什么在我不需要的时候有一个漏洞？我也不希望错误消息中断我的代码执行。
在网上搜索只显示我 shift+open 打开文件而不执行代码，这根本不是我想要做的。我正在寻找等效的 VBA 方法。
我有一个与日期对应的数字字典.我不得不想象有一个比我存储所有日期更好的方法,然后回想起它们.
换句话说,我可以创建一个共同的字典,然后可以访问代码中的其他部分,所以我不是在函数中隐藏全局字典吗？
Function Get_Val_Date(Val_Date_Key As Long)
Dim Date_Dict As Scripting.Dictionary
Set Date_Dict = New Scripting.Dictionary
Date_Dict.Add 1, "9/30/1997"
Date_Dict.Add 2, "9/30/1998"
Date_Dict.Add 3, "9/30/1999"
Date_Dict.Add 4, "9/30/2000"
Date_Dict.Add 10, "9/30/2001"
Date_Dict.Add 11, "9/30/2002"
Date_Dict.Add 12, "9/30/2003"
Date_Dict.Add 13, "9/30/2004"
Date_Dict.Add 14, "9/30/2005"
Get_Val_Date = Date_Dict(Val_Date_Key)
End Function
我有一组大约 10 个模块/表单/类，我喜欢在许多项目中使用和重用它们。通常这些模块是在项目的中间或结束时出现的，而不是在开始时出现（所以没有制作模板并从一开始就使用它 - 我用它来制作一些项目）。是否有一种简单的方法来批量导入模块和引用（不涉及将文件扩展名更改为 .zip）？
我愿意接受文件扩展名更改方法，但我想先耗尽我的其他资源
创建新工作表时,可以使用名称设置名称..name = "Name Here!"但是,VBA对象仍将使用"Sheet1"作为名称.
如何创建新工作表并设置VBA对象名称？
请注意,我不是问如何设置工作簿上显示的名称,也不是.name属性.