VBA - scripting.dictionary排除空白

Question

scripting.dictionary可以从范围中排除空白吗？ 我正在使用此代码从范围中查找特殊值。我不需要范围的excel公式，而是VBA中的解决方案（如果存在）。

使用此代码，我在列表框中总是有一个空白项目。

Dim v, e

With Sheets("DATA").Range("NAMED_RANGE")
    v = .Value
End With

With CreateObject("scripting.dictionary")
    .CompareMode = 1
    For Each e In v
        If Not .Exists(e) Then .Add e, Nothing
    Next
    If .Count Then Me.TextBox121.List = Application.Transpose(.keys)

    ThisWorkbook.Worksheets("DICTIONARY").Range("B2").Resize(UBound(.keys), 1).Value = _
    Application.Transpose(.keys)
End With

Answer 1

console.log(userSvc.getAuthenticatedUser());