Excel VBA中的redimension动态多维数组

时间:2014-08-25 04:46:34

标签: excel vba

我已经问过这个问题而且没有回答。由于某种原因,mods认为锁定它并让我再次问它是一个好主意。我不明白。问题没有得到解答,为什么我被迫再次转发这个?无论如何,这是最初的问题:

看看以下代码。我的问题是我无法弄清楚如何重新定义n整数和b整数。我正在做的是数组sent1已经工作,它填充了大约4个句子。我需要仔细阅读每一句话,但我遇到了麻烦。

有人建议尝试使用以下语法dim sent2(,),但Excel中不允许使用该语法。

<code>
dim sent1() 
dim sent2()

dim n as integer, b as integer, x as integer
dim temp_sent as string
b = 0
For n = 1 to ubound(sent1)

temp_sent = sent1(n)
    for x = 1 to len(temp_sent1)
    code
    if a then
        b = b + 1
        '**THIS IS THE PART OF THE CODE THAT IS NOT WORKING**
        redim preserve sent2(1 to ubound(sent1), b)
        sent2(n,b) = [code]
    next
next
</code>

0 个答案:

没有答案