| 投稿日 | ： 2005/02/01(Tue) 12:21 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: VB6からエクセルを終了させる方法 |
> そうですか。一応該当のコードを調べて修正しましたが、終了することができません。
> どうしてなんでしょう？？
おそらく、「修正しきれていないから」だと思われますが、
ソースコードを見ているわけではありませんので、具体的な回答はできません。
ためしに、ワークブックなどを開かず、単に、「Excelの起動」と「終了」しか
行わないプログラムを作成し、それが期待動作するかどうかを調べてみてください。
Private X As Object
Private Sub Command1_Click()
Set X = CreateObject("Excel.Application")
X.Visible = True
End Sub
Private Sub Command2_Click()
X.Quit
Set X = Nothing
End Sub
これで終了できなければ、Excel環境側に、何らかの問題があるのでしょう。
逆に、これが正常に終了するのであれば、既存のコードに問題があるのだと思われますので、
既存のコードで、ワークブック/ワークシートを操作している部分のコードを、すべて
コメントアウトしていき、正常に終了するような最低限のコードに置き換えてみましょう。
その後は、それらのコメントを徐々に外していき、どの行を実行すると、
終了しなくなってしまうのかを突き止めてみてください。