動的配列の開放チェック (ID:77582)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 良く考えたら、VarPtrArrayを使う必要は無かったかも。 Private Declare Function SafeArrayGetDim Lib "oleaut32" _ (ByRef psa() As Any) As Long と宣言して、 If SafeArrayGetDim(udtArray) = 0 Then Debug.Print "ReDimされていない" End If という感じで十分かな。