如果语句未返回正确的值

Question

我不确定我在做什么错。我想编写代码以查看我的指定范围的特定值。然后与特定列中的最后一个单元格进行比较。然后取第一个字符，看看是什么数字。因此，我的示例命名范围将是1，而我的特定列中的最后一个单元格将是1.02。我希望它从左边拉第一个字符，看看它们是否相同。但是，每次运行代码时，我都会不断返回假的if语句部分。

Dim TimeStamp As Range
Dim LastItem As Range
Dim LastItemNumber As Range

Set LastItemNumber = Range("C500").End(xlUp).End(xlUp)
Set TimeStamp = Range("C500").End(xlUp).Offset(1, -1)
Set LastItem = Range("C500").End(xlUp)


LastItemNumber.ListObject.ListRows.Add AlwaysInsert:=True
TimeStamp = Now

If Range("Meeting_Number") = Left(LastItemNumber, 1) Then
    MsgBox ("True")
    LastItemNumber.FormulaR1C1 = "1.02"
        Else
    MsgBox ("False")
End If

我希望结果填充消息框并说对。然后在该列的最后一个单元格中输入“ 1.02”。