运行显示下标越界，如何解决

Ubound(PlayListArr)和Ubound(SPartArr)不一定相等，当Ubound(SPartArr)小于Ubound(PlayListArr)时，for i=0 to Ubound(PlayListArr)中的i就会出现大于Ubound(SPartArr)的情况，因此SPartArr(i)就会提示下标越界了。
希望对你能有所帮助。

在提示下标越界时，点“调试”，会打开vba代码窗口，看一下是在哪个语句上出现错误，此时，将鼠标放在错误语句上，可以显示出错误变量的“当前值”。由于这个代码是针对你的指定工作表的，所以在出现错误时要结合你的表格来分析错误原因。

---