vba - EXCEL/VBA : converting boolean text to checks

Question

我已将数据从 Access 导出到 Excel。
某些列包含 bool 值，Excel 将它们显示为“true”或“false”。
可读性不太好，所以我想将假值更改为空白，将真值更改为“x”。

这是我编写的VBA代码:

Sub BoolToCheck()
Dim myRow As Integer
Dim myCol As Integer

For myCol = 7 To 38
    For myRow = 2 To 458

    Select Case Cells(myRow, myCol)
        Case "TRUE"
         Cells(myRow, myCol) = "x"
        Case "FALSE"
         Cells(myRow, myCol) = ""
    End Select

    DoEvents
    Next myRow
Next myCol
End Sub

但它不起作用；当我一步步运行它时，这两种情况都没有发生。
尝试从“真”和“假”切换到真和假，但它没有改变任何东西。

有人知道为什么这不起作用吗？没看懂...

Answer 1

使用 .Text 是危险的，因为它读取单元格的格式化值，如果用户减小了列宽，则可能是 ###。
True 和 False 被处理为 bool 值而不是文本/字符串，因此此代码可以工作:

Select Case ActiveSheet.Cells(j, k)
    Case True
       ActiveSheet.Cells(j, k) = "x"
    Case False
       ActiveSheet.Cells(j, k) = ""
 End Select