Трим и словарь не могут работать вместе

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

Вы можете использовать Trim (или набрать функцию Trim $) с dict.add.В вашем коде есть ряд других ошибок:

Избавьтесь от "около"

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

т.е.

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

Кроме того, вы сначала добавляете ключ со словарямиХотя я не знаю, что вы подразумеваете здесь под ключом. Где он определен и вы подразумеваете ключ для значения, которое вы хотите добавить в словарь?

И вы не увеличиваете ячейкувсегда ячейки (4,5). Если бы это был ключ, они должны быть уникальными.

Традиционно я ожидал бы что-то вроде

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

, где key уникально и определено, ws - это переменная, содержащая имя родительского листа, i (или, может быть, num?) - это переменная типа Long, которая позволяет изменять добавляемое значение, если вы хотите добавить значение ячейки в цикле ксловарь.