以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]从字符串“第x页”到类型“double”的转换无效  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=177760)
--  作者：manjusaka
--  发布时间：2022/6/2 15:00:00
--  [求助]从字符串“第x页”到类型“double”的转换无效

dim c as msexcel.range
dim d as integer =1
for each c in ws1.range("J1:L50")
  if c.value = "第x页"
           c.value = "第" &  cstr(d)  & "页"
d=d+1
end if
next c
然后他报错从字符串“第x页”到类型“double”的转换无效，哪里错了，又应该如何改呢？
--  作者：有点蓝
--  发布时间：2022/6/2 15:03:00
--  
if c.value = "第x页"
改为
if cstr(c.value) = "第x页"