オートコレクト

ee 2005-06-09 00:43:18 No: 90284

vbではないですが・・・

Accessのオートコレクト機能をコードで無効にしたいのですが、できますでしょうか？

いな 2005-06-09 00:57:12 No: 90285

>vbではないですが・・・
VBAってこと？

http://www.geocities.jp/cbc_vbnet/cnntrol/other.html#autocollect

ee 2005-06-09 01:17:02 No: 90286

説明不足でしたが・・・
コントロール自体のプロパティではなくて、Access自体の設定をプログラムで制御したいのですが、できますでしょうか？

いな 2005-06-09 01:49:41 No: 90287

>プログラムで制御したいのですが
つまりＶＢＡ以外のプログラム言語ってこと？

言語を指定してください。

だい URL 2005-06-09 01:50:37 No: 90288

レジストリを操作すればよいので、VBでもVBAでもVBSでも可能です。

拙作でよろしければ、
http://homepage2.nifty.com/Dee/
→サンプル集
→MSAccessのオートコレクト設定の制御（VBS)

だい 2005-06-09 01:55:28 No: 90289

あれ、リンク切れ．．．確認中。

ee 2005-06-09 02:07:20 No: 90290

レジストリはちょっとまずいので・・・。
しかも、レジストリを変えるとワードとかのOffice製品すべてに影響はしないのですか？

Access自体の設定をレジストリ以外で制御することはできないでしょうか？
自分が考えているのは、実行時にすべてのコントロールのオートコレクトを無効にするという方法を考えたのですがどうでしょうか？

だい 2005-06-09 02:24:34 No: 90291

>しかも、レジストリを変えるとワードとかのOffice製品すべてに影響はしないのですか？
もちろん影響します。
Access自体の設定=Office全体になります。

>自分が考えているのは、実行時にすべてのコントロールのオートコレクトを
>無効にするという方法を考えたのですがどうでしょうか？
それでいいと思います。
Accessで行うなら、Controlsコレクションでコントロールを列挙して、
AutoCorrectプロパティを設定してみてください。
ただし、コントロールの種類によりAllowAutoCorrectプロパティを持たない
ものがあるので、その辺は工夫してみてください。
例）
Private Sub Form_Open(Cancel As Integer)
Dim ctl As Control
For Each ctl In Me.Controls
    If ctl.Name Like "テキスト*" Then
        ctl.Properties("AllowAutoCorrect") = False
        Debug.Print ctl.Name, "のオートコレクトOFF"
    End If
Next ctl
End Sub

ささ 2005-06-09 02:37:56 No: 90292

>だいさん
先のレスで、いなさんが
AllowAutoCorrectにFalseを設定するリンクが張られていますが、

>説明不足でしたが・・・
とあるように、どうもこれでは駄目らしいですよ？
何故かは知りませんが

http://www.geocities.jp/cbc_vbnet/cnntrol/other.html#autocollect

いな 2005-06-09 02:45:00 No: 90293

>コントロール自体のプロパティではなくて

コントロールのプロパティを変更せずに実装できるのか？
随分難易度が上がるぞ・・・。
というかそうゆう制限ならば無理ではないか？

だい 2005-06-09 02:47:02 No: 90294

>さささん

確かにそうですね。
「Access自体の設定」というのが無理であることを理解されたと解釈し、

>自分が考えているのは、実行時にすべてのコントロールのオートコレクトを
>無効にするという方法を考えたのですがどうでしょうか？

と前回より具体的に「やりたいこと」を提示いただいたので、
「実装例」を一つ示してみたのですが、あとはご本人の思い次第かと思われます。