代码之家 › 专栏 › 技术社区 › LazyBear

Excel组合框/控件文本在活动时不显示/识别特殊字符,但在非活动时显示/识别特殊字符

excel-vba vba excel

LazyBear · 技术社区 · 6 年前

我遇到了一个奇怪的问题。

ChrW(&H25B2) ChrW(&H25BC) =)表示所需数据排序的ASC/DESC。

现在的问题是,只有当控件处于活动状态时(当我选择或单击它时),Excel才会成功地在组合框中显示unicode字符。但是,当我单击离开控件或更改焦点时,它会显示一个问号(?),好像我在试图显示一个未知的字符。字符总是正确地显示在单元格中,而不是组合框中。我在想,根据活动状态,可能会显示两种不同的字体,但这还没有设置,在属性中我看不到这个选项。我还尝试了十进制方法来添加字符( ChrW(9660) ChrW(9650) ),以防万一,但这并没有改变什么

这是怎么回事?如何始终正确显示(&A)。

Sub PopulateSortList()
    'Populate Sort Dropdown control
    With Sheet1.ComboBox_Sort
        .Clear
        .AddItem "Time - IN " & ChrW(&H25B2) 'Ascending
        .AddItem "Time - IN " & ChrW(&H25BC) 'Decending
        .AddItem "Time - OUT " & ChrW(&H25B2) 'Ascending
        .AddItem "Time - OUT " & ChrW(&H25BC) 'Decending
        .Font.Size = 11
        .TextAlign = fmTextAlignLeft
        .SelectionMargin = False
        .ListIndex = 1    
    End With
End Sub