掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
[アプリケーションの追加と削除] の情報 (ID:100801)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
度々、すみません。 > IShellApp:: GetAppInfoと進んでも (列挙させないで) > エクセルが最後は強制終了 > (イミディトウィンドウに書き出されはしますが)。 > End If > 'IUnknown::Release > Invoke_ ObjPtr(pia), 2 > 'Wend > 'IUnknown::Release > Invoke_ ObjPtr(peia), 2 > End If > 'IUnknown::Release > Invoke_ ObjPtr(p), 2 > End Sub End If Set pia = Nothing 'Wend Set peia = Nothing End If Set p = Nothing End Sub だと大丈夫でした(何でだろう)。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.