投稿時間：2002/10/16(Wed) 22:01
投稿者名：KENKEN
Ｅメール：
ＵＲＬ ：
タイトル：Ecxel で解放後もメモリ上に残る現状について
初めまして。いつも参考にさせて頂いてます。
早速質問なのですが、VBからEXCElを開きあらかじめ準備しているTextBoxに値を
書き込む処理を作っていましたところ、解放してもメモリ上に残ってしまいました。
そこで、TextBoxではなくセルに書き込む用にしてみたらＯＫでした。
となるとやっぱり TextBox に書き込む所がまずいと思うのですが、HPには省略系は
ダメとあるのですが、正しい書き方がわかりません。
どなたか分かる方教えてください。よろしくお願いいたします。
( Selection.Characters.Text がダメなのでしょうか？？？多分... )
（抜粋）
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
Set xlsApp = New Excel.Application
Set xlsBook = xlsApp.Workbooks.Open("ファイル名)
Set xlsSheet = xlsBook.Worksheets("シート名")
xlsSheet.Unprotect ("PassWord")
xlsApp.DisplayAlerts = False
With xlsSheet
.Shapes("txtNendo").Select: Selection.Characters.Text = "年度です"
.Shapes("txtTitle").Select: Selection.Characters.Text = "タイトルです"
.Shapes("txtDate").Select: Selection.Characters.Text = "日付です"
End With
xlsSheet.Save
xlsApp.Quit
Set xlsSheet = Nothing
Set xlsBook = Nothing
Set xlsApp = Nothing
|