最適化

題名: 最適化
著者: 匿名
日時: 2002/07/18 17:03:00
ID: 335
この記事の返信元:
- （なし）
この記事への返信:
- [336] 回答:最適化どぼん 2002/07/19 0:29:00
ツリーを表示

アクセスのVBAでモジュールで最適化の実行した後、アプリを終了させたいのですが、最適化コマンドの後にコマンドがあると最適化コマンドが有効になりません。何か良い対処はありませんか？

Function 最適化実行()

Dim ret As Byte
ret = MsgBox("PHS支援システムDBを終了します。 ", vbOKCancel + vbCritical, "よろしいですか？ ")

If ret = vbOK Then
SendKeys "%TDC", False　'最適化コマンド

　　　 Application.Quit　　'アプリケーション終了コマンド

Exit Function

End If

End Function

題名: 回答:最適化
著者: どぼん
日時: 2002/07/19 0:29:00
ID: 336
この記事の返信元:
- [335] 最適化匿名 2002/07/18 17:03:00
この記事への返信:
- [337] 回答:最適化匿名 2002/07/19 10:39:00
ツリーを表示

>アクセスのVBAでモジュールで最適化の実行した後、アプリを終了させたいのですが、最適化コマンドの後にコマンドがあると最適化コマンドが有効になりません。何か良い対処はありませんか？

申し訳ありませんが、私はVBAの知識はまったくないためよくは分からないのですが、とりあえず返事を書かせていただきます。見当違いでしたら申し訳ありません。

「最適化コマンドの後にコマンドがあると...」の2番目の「コマンド」の意味がよく分かりません。すべてのコマンドでだめなのでしょうか、それとも匿名さんが書かれた例のように「Application.Quit」だとだめということでしょうか？

題名: 回答:最適化
著者: 匿名
日時: 2002/07/19 10:39:00
ID: 337
この記事の返信元:
- [336] 回答:最適化どぼん 2002/07/19 0:29:00
この記事への返信:
- [338] 回答:最適化どぼん 2002/07/19 23:52:00
ツリーを表示

>>アクセスのVBAでモジュールで最適化の実行した後、アプリを終了させたいのですが、最適化コマンドの後にコマンドがあると最適化コマンドが有効になりません。何か良い対処はありませんか？
>
>申し訳ありませんが、私はVBAの知識はまったくないためよくは分からないのですが、とりあえず返事を書かせていただきます。見当違いでしたら申し訳ありません。
>
>「最適化コマンドの後にコマンドがあると...」の2番目の「コマンド」の意味がよく分かりません。すべてのコマンドでだめなのでしょうか、それとも匿名さんが書かれた例のように「Application.Quit」だとだめということでしょうか？

>>どぼんさん、ご回答ありがとうございます。「最適化コマンドの後にどんなコマンドがあっても」という意味です。何かいい案ないでしょうか？

題名: 回答:最適化
著者: どぼん
日時: 2002/07/19 23:52:00
ID: 338
この記事の返信元:
- [337] 回答:最適化匿名 2002/07/19 10:39:00
この記事への返信:
- [340] 回答:最適化匿名 2002/07/22 9:23:00
ツリーを表示

>>>どぼんさん、ご回答ありがとうございます。「最適化コマンドの後にどんなコマンドがあっても」という意味です。何かいい案ないでしょうか？

微力ながらいろいろ調べてみた結果、下記のURLが参考になるかもしれません。なにぶん私はVBAに関してはほとんど知識がないため、あまりお役に立てませんが。

MsAccess便利もの
http://ws.31rsm.ne.jp/~pension/access/tips/saiteki.htm

Excelファンクラブ
http://keep-on.com/~excelyou/2000off20/200005/00050002.txt
の真ん中あたり（SendKeysで検索してください）

題名: 回答:最適化
著者: 匿名
日時: 2002/07/22 9:23:00
ID: 340
この記事の返信元:
- [338] 回答:最適化どぼん 2002/07/19 23:52:00
この記事への返信:
- （なし）
ツリーを表示

>>>>どぼんさん、ご回答ありがとうございます。「最適化コマンドの後にどんなコマンドがあっても」という意味です。何かいい案ないでしょうか？
>
>微力ながらいろいろ調べてみた結果、下記のURLが参考になるかもしれません。なにぶん私はVBAに関してはほとんど知識がないため、あまりお役に立てませんが。
>
>MsAccess便利もの
>http://ws.31rsm.ne.jp/~pension/access/tips/saiteki.htm
>
>Excelファンクラブ
>http://keep-on.com/~excelyou/2000off20/200005/00050002.txt
>の真ん中あたり（SendKeysで検索してください）

>>どぼんさんご回答ありがとうございます。早速サイトで確認してみます。