tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル  Subroutineの引数が原因でExcelが開放できなくなります。
投稿日: 2009/08/31(Mon) 17:30
投稿者camputer
 こんにちは、質問させていただきます。camputerと申します。
10年近く研究で計算プログラムを作成しておりましたが、
1年ほど前にVB.NETに触れVBが好きになりました。
どうぞよろしくお願いいたします。
 開発環境はVB2008+XP+Excel2003になります。

 ↓のように、Subroutine呼び出しの行で解放できなくなるのですが、

Private Sub Excel練習
・・・
 Dim Shape1 As Excel.Shape
・・・
 subroutine1(String1, String2, Shape1, String3, Integer1, Integer2)
                                 '↑ここの行が無ければ開放されます。。
・・・
End Sub


Sub subroutine1(ByVal String1, ByVal String2, ByVal Shape1, ByVal String3 , ByRef Integer1, ByRef Integer2)

   '※Subroutine内のコード無し
End Sub


 テストしておりますと、上のsubroutine1の引数を(2行とも)変更して、
subroutine1(String1, String2, Shape1, String3, Integer1) 
だと開放できるので、Integer2が怪しいのかな?と考え、次のようにしてみましたが、
subroutine1(Integer2) 
何故か↑でも開放できます。。。

 解決手段が塞がってしまいました。。。何か思い当たることなど
是非ともヒントをいただけないでしょうか。
Excelの開放については散々出ているようなので、どこかに情報源があるのではと
思うのですが、「Subroutine 開放」などと検索しても分かりませんでした。
 もしもとんちんかんな質問でしたら申し訳ございませんが、
是非ともアドバイスをいただきたくお願いいたします。
どうぞよろしくお願いいたします。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。