修辞和字典无法一起使用

Question

我有这样的代码，但是：

• 如果我使用myDic.add Trim(cells(4,5)), key->我会收到错误消息。
• 如果我使用myDic.add cells(4,5), key->没有错误。

  

Dim MyDictionary As Scripting.Dictionary
Set MyDictionary = New Scripting.Dictionary

Do While Len(Temp.Cells(num, 1))) > 0
   "myDic.add Trim(cells(4,5)), key" 'Error Here
Loop

使用Trim时不能使用Add吗？谢谢

Answer 1

您可以对dict.add使用Trim（或键入的函数Trim $）。您的代码还有许多其他错误：

摆脱周围的“

"myDic.add Trim(cells(4,5)), key"

即

 myDic.add Trim(cells(4,5)), key

此外，您首先要在字典中添加密钥，尽管我不知道您在这里所说的密钥是什么意思。它在哪里定义，您是指要添加到字典中的值的键吗？

而且，您不必增加单元格，它始终是cells（4,5）。如果这是密钥，那么它们必须是唯一的。

传统上，我会期望

dict.add key, Trim$(ws.cells(i,5))

其中key是唯一的且已定义，ws是保存父表名称的变量，i（或者也许num？）是Long类型变量，允许您假设要向字典中循环添加一个单元格值，则可以更改要添加的值。