小编use*_*679的帖子

我使用split函数并在变量中分配值并在几次迭代后在循环中运行代码,它给出错误"此数组是固定的或暂时锁定的(Visual Basic)"..

例如; 这里从excel读取的movies_cat1的值是以这种形式------"电影 - >列出所有电影,电影 - >世界电影 - >亚洲,电影 - >按语言划分的电影 - >僧伽罗语,电影 - >戏剧"

For crow = 1 To 100

    Value = Worksheets("Movies_categories").Range("A" & crow).Value
    cat_final = Worksheets("Movies_categories").Range("B" & crow).Value

    If Value = "y" Or Value = "Y" Then

      'Loop for reading the data from tabsheet- Movies

      For crowss = 5 To 3000
        movies_cat1 = Worksheets("Movies").Range("B" & crowss).Value
        movies_language = Worksheets("Movies").Range("C" & crowss).Value

        If movies_language = "English" Then

          Temp = Split(movies_cat, ",")  'run time Error:10  occurs here..

          For …