使用单元格计数作为值时，VBA上的类型不匹配错误

Question

以下代码将导致

类型不匹配错误

并以黄色突出显示Set Cnt = App...行。 我不知道是什么问题，希望有人能帮助我。

Dim Sel As Range

Set Sel = Selection

Sel.Offset(1, 2).Select

Range(Selection, Selection.End(xlDown)).Select

Dim Cnt As Variant
Set Cnt = Application.Selection.Cells.Count

Sel = Cnt.Value