Excel GetCell "Type mismatch"

[Gintaras]

In ExcelSheet.GetCell

replace

s=r.Value

to

VARIANT v=r.value
out v.vt
s=v

What number is in QM output?

To edit System functions, uncheck readonly in System folder properties.