Excel 2010 Redim Preserve crash - программирование

Я как-то могу сбой Excel 2010, введя следующее в среду IDE в новой книге:

private sub foo
    redim v(,1 to 3)

ОК, вы вряд ли напечатаете это... но вот что на самом деле произошло:

private sub foo
    dim v(1 to N, 1 to M)
    ...
    M = New_Value
    redim preserve v(,1 to M)  ' seemed reasonable ... then CRASH !!!

Забавно, что VBA требует, чтобы вы были явным с 1-м параметром резервной копии 2D (поскольку вам не разрешено изменять 1-е измерение). Но это не смешно, когда штраф за простую синтаксическую ошибку - тяжелый сбой. Это ИТ-отдел с достаточно чистой средой (без установленных добавлений, пустая пустая панель проекта в среде IDE), а "redim v (, 1 to M)" тоже разбил мою соседнюю машину - так что это не только я.

Мне интересно, если это происходит с другими, и я отправляю его на всякий случай, если он спасет кого-то еще в те часы, которые я потратил впустую на восстановление моих книг до тех пор, пока я не зафиксировал ошибку.

Option Explicit 'Just wanted to make the Interpreter more picky Private Sub test() 'Go through some basic declaration Dim v() As Variant Dim M As Integer Dim New_Value As Integer ReDim v(2, 2) 'No Problem ReDim Preserve v(1, 1 To M) ' No Problem ReDim Preserve v(1 To M) ' No Problem ReDim Preserve v(,400) 'Compile Error 'Crash on this 'ReDim Preserve v(,1 To M) 'BOOM!!! 'and this: 'ReDim Preserve v(,1 To 2) 'BOOM!!! 'and this: 'ReDim Preserve v(1 to 5,,1 To 2) 'BOOM!!! End Sub

Ответ 1