查找范围的列数

K17*_*K17 5 excel vba count

下面是一些Excel VBA代码,它应该打印字符串中指定范围的列数.我在该Debug.Print部分中收到错误.我究竟做错了什么?

Dim val1a As String
val1a = "A1:D1"

Dim Rng1 As Range

Debug.Print Rng1(var1a).Columns.Count  ' error here
Run Code Online (Sandbox Code Playgroud)

chr*_*sen 11

使用

Range(var1a).Columns.Count
Run Code Online (Sandbox Code Playgroud)