运行时错误‘13 类型不匹配

楚雪飞扬

运行时错误‘13 类型不匹配
Dim t!
    t = Timer
    Set d = CreateObject("Scripting.Dictionary")
    Set dic = CreateObject("Scripting.Dictionary")
    Set d1 = CreateObject("Scripting.Dictionary")
    rq1 = Cells(2, 5)
    rq2 = Cells(2, 6)
    gd = Cells(2, 7)
    lx = Cells(2, 8)
    jb = Cells(2, 9)
    xs = Cells(2, 4) * -24
    cc = Val(Left(Cells(2, 1), 1)) & "-InchWafer"

砂海

Cells(2, 4) 的值有问题 , 非数字

楚雪飞扬

砂海 发表于 2021-4-22 11:10
Cells(2, 4) 的值有问题 , 非数字

好的，我把单元格值，重新改下格式，应该就可以了吧，！