VB RUN TIME error 1004!

sfs991126 2008-06-26 02:38:31
这是excel中的vb code,

For ck = 1 To CCount
UpdateCountry = CountrySN(ck)
If UpdateCountry <> "" Then
For k = 1 To CatCount
TableName = UpdateCountry & "_" & CatNum(k)
Temp = Range(TableName).Address(External:=True) <<<这一句出错
Temp = Mid(Temp, InStr(Temp, "]") + 1, Len(Temp))
WSN = Replace(Left(Temp, InStr(Temp, "!") - 1), "'", "")
TCS = Range(TableName).Column
TRS = Range(TableName).Row

假设ccount 是10
CountrySN(ck)中,1是china,2是usa,3是japan
cat_num = 1 ,2 ,3, 4,......
等等
为何我run的时候,会出现run time error 1004?
它说我是 method 'range' of object '_global' failed ,怎解决?
...全文
518 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
Tiger_Zhao 2008-06-26
  • 打赏
  • 举报
回复
就是用 TableName 命名的名称定义在 Excel 中不存在。

2,503

社区成员

发帖
与我相关
我的任务
社区描述
VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区管理员
  • VBA
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧