VBA記述時のエラー？

前へ 次へ
このQ&Aのポイント
  • アクセス２００２を使っています。ＯＳはＷｉｎ２０００です。ＶＢＡを記述する際に、文字を入力しますとすぐに入力した文字が「赤く」変化し、スペースを入れても入力した文字の最後のカーソルが戻ってしまいます。
  • ＶＢＡ画面でツール⇒オプション⇒編集の中のコードの設定は、次のような状態です。・自動構文チェック　オフ・変数の宣言を強制する　オフ・自動メンバ表示　オン・自動クイックヒント　オン・自動データヒント　オン・自動インデント　オフ
  • 解決方法をご存知でしたら教えてください。
回答を見る
  • ベストアンサー

VBA記述時のエラー？

お願いします。 アクセス２００２を使っています。ＯＳはＷｉｎ２０００です。 ＶＢＡを記述する際に、文字を入力しますとすぐに入力した文字が「赤く」変化し、スペースを入れても入力した文字の最後のカーソルが戻ってしまいます。 例えばDim_とタイプしたらdimと赤く変わり、スペースを一文字分入れても「m」のすぐ後に戻るのです。 他の文字を入れても同様で、docmd.と入力すると、ドットの後に一瞬「候補コマンドリスト」が表示されるのですが、すぐに赤く変わりヒントも消えてしまいます。 なお、ＶＢＡ画面でツール⇒オプション⇒編集の中のコードの設定は、次のような状態です。 ・自動構文チェック　オフ ・変数の宣言を強制する　オフ ・自動メンバ表示　オン ・自動クイックヒント　オン ・自動データヒント　オン ・自動インデント　オフ どなたか解決方法をご存知でしたら教えてください。

質問者が選んだベストアンサー

  • ベストアンサー
  • BLUEPIXY
  • ベストアンサー率50% (3003/5914)
回答No.1

キーボードがおかしくなっていて 不特定のタイミングでＥＮＴＥＲが押されたことになっているような症状ですね。 notepadなどでタイプした時に勝手に改行されるというようなことはないでしょうか？ 全然的はずれだったらすみません。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. データベース
  4. その他(データベース)

関連するQ&A

  • excel2010 VBA コンパイルエラー

    excel2010 vbaで、編集中 自動構文チェックはOFFにしていますが キー入力する度に、頻繁にコンパイルエラーが出ます また、カーソルがかってに、手前に移動したりします 以前は、なかったように思うのですが 何か設定がおかしいのでしょうか？ 解決方法を教えて下さい。

  • VBAの正しい構文なのでしょうか？。

    VBAの正しい構文なのでしょうか？。 以下の構文は正しいのでしょうか？。 Option Explicit Dim stdocname As String Dim repo As Report 　　　　　： 　　　　　： 　　　　　： Private Sub 印刷_Click() On Error GoTo Err_印刷_Click 　　　　　： Set repo = Reports(stdocname)

  • Access VBA にて on error goto がたまに機能し

    Access VBA にて on error goto がたまに機能しないPCがあるます。 具体的には、on error gotoのコーディングを無視して、エラーのポップアップが表示される 何か対応する方法は、ありますか？ 環境 ネットーワークにあるmdbをドライブに接続して、Accessを起動しています。 　　Windows2000(sp4)+Access2000(sp3) 他のPCでは、問題ありません。PCは、イメージをクローンして作成していますので、同一です。 ※コーディングイメージ Private Sub 稼働時間_AfterUpdate() on error goto ERR_稼働時間 Dim errcnt as integer errcnt = 0 DoCmd.GotoRecord A_FORM,"時間入力",A_NEXT <----- エラーのポップアップが表示される if errcnt = 1 Then DoCmd.GotoRecord A_FORM,"時間入力",A_PREVIOUS end if exit sub ERR_稼働時間: errcnt = errcnt + 1 resume next end sub

  • VBAの記述の中で半角スペースで区切らなければいけない時、区切ってはい

    VBAの記述の中で半角スペースで区切らなければいけない時、区切ってはいけない時を教えてください。 以下は参考書のとうりに記述しました。 ------------------------------------- Sub 分割() 氏名 = Range("A2").Value 姓 = Left(氏名, 2) 名 = Mid(氏名, 4, 10) Range("B2").Value = 姓 Range("C2").Value = 名 End Sub ------------------------------------- ・氏名 = Range ・Left(氏名, 2) ・姓 = Left ・名 = Mid ・氏名, 4, 10 半角スペースは無しで記述を入力したのですが 上記の　 　　=　の前後と 　　2　と　4　と　10　の前に 勝手に半角スペースが入りました。 試しに Range("C2")の　Range　と　("C2")　の間に半角スペースを入れようと Range　("C2")とすると 強制的に排除され　Range("C2")　に戻されました。 試しに 氏名 = Range("A2").Value　の「.Value」の前に半角スペースを入れて 氏名 = Range("A2")　.Value　としたら記述が赤字になって エラーメッセージが出ました。 試しに Range("B2").Value = 姓　の　Range　の部分でRとaの間に半角スペースを入れて 　R ange　と記述したら確定されました。 （強制的に戻らないのでしょうか？ 　またエラーメッセージが出ないのでしょうか？） １．記述の中で半角スペースを入れなければならない所。 ２．記述の中で半角スペースを入れてはいけない所。 ３．入力してはいけない所に半角スペースを入力した場合エラーと表示される時。 ４．入力してはいけない所に半角スペースを入力した場合エラーと表示してくれない時。 ５．半角スペースが必要な部分に自動で入力してくれない時。 ６．半角スペースが必要な部分に自動で入力される時。 　　 上記4種類の定義を教えていただきたいです。 NO.4とNO.5は実害があります。 NO.3とNO.6は実害はないのですが理屈を知らないので、 NO.1とNO.2を知っていないと駄目ではと思いました。 参考書では見当たりませんでした。 わかりやすいサイトがあったら教えていただけるとありがたいです。 お願いします。

  • ＶＢＡユーザーフォームで

    　エクセルＶＢＡでユーザーフォームより、テキストボックスで入力させたものをセルに表示させようとしています。 　テキストボックスは１と２があり、テキストボックス１で入力した値の最初の５文字＋固定値をテキストボックス２に自動で入力（表示）したいのですがなかなかうまくいきません。（自動入力後、手動で一部修正します。） 　ＶＢＡをはじめたばかりの初心者ですが、どうぞよろしくお願いします。

  • エクセルVBAの質問

    エクセル2000で住所録を作りながらＶＢＡを学習している初心者です。現在次の３点について壁につきあたり、入門書を調べてみたのですが、解決できません。 （１）ユーザーフォーム内のテキストボックスに入力する　　　時日本語入力のＯＮ、ＯＦＦをテキストボックス別　　　に自動的に切り替えるようにしたいのですが、プロ　　　パティウィンドウかどこかで指定できるのでしょう　　　か？ （２）同様に、テキストボックスに表示させた値を勝手に　　　変更されないようにする設定は可能でしょうか？ （３）あるユーザフォームの変数に入力した値を別のユー　　　ザフォームやプロシージャで同じ変数名で引き出し　　　たい場合、変数の宣言をDimはなくPublicにすればよ　　　いのでしょうか？それとも別の方法があるのでしょ　　　うか？ いっぺんに質問して申し訳有りませんが、どれか１つでも結構です。どなたかご指導願えないでしょうか。

  • VBAで実行時エラー'13':　がでます

    初歩の初歩ですいません。 VBAで Dim A As Integer Dim B As Integer Dim C As Integer Dim gokei As Integer For i = 8 To 70 A = Cells(i, 4).Value B = Cells(i, 5).Value C = Cells(i, 6).Value goukei = A + B + C Cells(i, 7) = goukei Next i としていますが A = Cells(i, 4).Value のところで今使っているシートだと止まってしまいます。 新規でワークシートを使って仮に数字を代入すると普通に動きます。 今使っているシートもセル内には　=100 と入力して　100　と表示され セルの書式設定も数値になってるんですがどうしてでしょうか？

  • Access2010、値を入力したら自動保存の方法

    Access2010でフォームよりフィールドに値を入力し、保存ボタンを押した時の動作を 自動でできる方法を探しています。つまり値を入力したら即、保存になる動作です。 vbaでbeforeupdateを使えば実現できるのではと思っていますが、上手く行きません。 beforeupdeteにDocmd.RunCommand acCmdSaveRecordを絡ませれようとしてもエラーで 動きませんでした。 上記のことが実現できるvbaの構文を教えて下さい。 よろしくお願いします。

  • EXCEL VBA のエラー処理

    EXCEL VBA でセルの文字列を読み(基本的に2007/05/08のような日付データが入っている)、 もしそれ以外のデータ("あいう"のような文字列)が入っていた場合はエラールーチンに飛ばして処理をしようと思ったのですが、 エラーが発生して、発生箇所が黄色く反転表示され、止まったままになってしまいます。 エラールーチンに飛ばすためにはどうしたらいいのでしょうか？ Sub test() Dim LineNo As Integer Dim WrkDate As Date On Error GoTo Err LineNo = 1 WrkDate = Range("S" & LineNo).Value　←ここが黄色く反転表示される。 WrkDate = WrkDate + 7 Range("X" & LineNo).Value = WrkDate GoTo Owari Err: (処理ルーチン) Owari: End Sub

  • ExcelのVBAについて。

    ExcelのVBAについて。 ハイパーリンクのイロハ？ アクティブセルを入力して、それをリンク先にB10セルにハイパーリンクを作りたいのですが、textboxから迄しかできず、、自動的にできません。自動的に割り振り出来るようにするにはどうしたらよいでしょうか？ 参考やヒントなどもよろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する