• ベストアンサー

Accessの文字置換方法

Access2002を使用しております。 「結果テーブル」というテーブルの<支店名>というフィールドの空白のレコードをすべて"空白"と言う文字に置換する作業を行っています。 現在は一度「結果テーブル」を開いた後に<支店名>フィールドを全部指定してから置換作業を行っているのですが、これをマクロを使用して自動処理にさせたいのですが、どうもうまくできません。どのようにすれば自動でできますか? VBAでもかまいません。 よろしくお願いします。

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

  • ベストアンサー
回答No.1

以下のクエリーを実行してはどうでしょうか。 UPDATE 結果テーブル SET 支店名 = '空白' WHERE 支店名 is null

masa2000z28
質問者

お礼

ありがとうございますおかげで様で目的の物ができました。 またよろしくお願いします。

その他の回答 (1)

回答No.2

御疲れ様です 文字の置換と言うことだけ考えれば、更新クエリを使用すればできます。 下記SQLを実行すれば、<支店名>がNULLだったら”空白”にします。 UPDATE 結果テーブル SET 結果テーブル.支店名 = "空白" WHERE (((結果テーブル.支店名) Is Null)); >これをマクロを使用して自動処理にさせたいのですが、 自動処理にするタイミングが分かりません。 コマンドボタンとか、で実行するのであれば、上記SQLを実行すればできます Private Sub コマンドボタン_Click() Dim stSQL As String stSQL = "UPDATE 結果テーブル SET 結果テーブル.支店名 = '空白' " & _ "WHERE (((結果テーブル.支店名) Is Null));" Currentdb.Execute stSQL End Sub 参考になれば...

masa2000z28
質問者

お礼

ありがとうございます。 いまいち更新クエリがわかってなかったので勉強したいと思います また何か有りましたらよろしくお願いします。

関連するQ&A

  • ACCESSでコピーしたレコードのフィールド置換作業の繰返しを簡素化したいです

    ACCESS2000を使っています。テーブルには必ず「Nenndo」というフィールド名(数値型十新型)で西暦4桁が入力されています。(このフィールドはキーにもインデックスにもなってません)たとえば、 T_M001テーブルのNendoフィールドに2007が入力されたレコードが340件 T_M002テーブルのNendoフィールドに2004が入力されたレコードが823件 こんな感じでNendoフィールドがあるテーブルが沢山あります。 これらのテーブルのNendoフィールドに格納されているレコードをコピー置換作業して2004から2008までのデータを作成したいです。 T_M001であれば2007が入力されてるレコードをコピーして、貼付たレコードNendoフィールドの2007を2004へ置換、また2007のレコードをコピーして2005へを繰り返の作業してます。レコード数は340件が1360件増えて1700件。 テーブルが沢山あって作業に苦慮してます。 ACCESSのモジュールでもマクロでも構いませんので対応策等ご教授願います。

  • Access 1レコードずつcsvで出力したい

    使用しているのはAccess2000です。 クエリのレコードを、1レコードずつcsvにエクスポートしたいのですが、マクロなどで自動的におこなうことはできないでしょうか? 例. クエリ名:test レコード数:100件 フィールド名:ファイル名 testクエリの1から100までのレコードを、1件ずつcsvへエクスポートする。保存する際は「ファイル名」を参照して、csvファイル名とする。100件分のこれらの作業をすべてマクロ等で自動化したい。 VBAの知識はほとんどありませんが、VBAによる回答でも構いません。 よろしくお願いいたします。

  • Accessの文字の置換のクエリについて

    Accessについて教えて下さい。 SQLデータベースをODBCを使用して、Accessにてリンクしています。 テーブルのあるフィールドに顧客名が並んでいます。 頭の一文字を○に置換するには、どのようなクエリを組めばいいのでしょうか? 山田 太郎⇒○田 太郎 田中 一郎⇒○中 一郎 佐藤 花子⇒○藤 花子 また、間にスペースが入っている後の文字(名)の置換の方法も教えて下さい。

  • Accessでの文字の置換のクエリについて

    Accessについて教えて下さい。 SQLデータベースをODBCを使用して、Accessにてリンクしています。 テーブルのあるフィールドに顧客名が並んでいます。 頭の一文字を○に置換するには、どのようなクエリを組めばいいのでしょうか? 山田 太郎⇒○田 太郎 田中 一郎⇒○中 一郎 佐藤 花子⇒○藤 花子 また、間にスペースが入っている後の文字(名)の置換の方法も教えて下さい。

  • Accessでの置換

    Access97を使用しています。 置換のマクロ化って出来ますか。 具体的に言うとボタン一つで 「電話番号」のハイフンを消したいのです。 今はテーブルを開いて編集-置換で検索する文字列に 「-」、置換後の文字列に何も入れずにすべて置換しています。 Excelですと「SUBSTITUTE」という関数が一番近いのですが、 Accessでそれに準ずるものってあるのでしょうか? イベントプロシージャでの記述で教えて いただけると一番助かります。

  • AccessのデータをVBを使って置換する

    (1)VisualBasic6.0を用いて、Access2000のデータベースに接続します。 (2)データベースの中のテーブル(テーブル名:T-カレンダー)にあるフィールド(フィールド名:コード)に保存されているデータの一部分を置換したい。(⇒途中のアルファベットを変更したい。)(例;置換前:123FFF789 置換後:123III789)  テーブルを直接開いて、フィールドにカーソルをあわせて、”編集メニュー”の『検索と置換』から行っても出来るのですが、Accessを触らないでVBから作ったフォームから変更(置換)をさせたい。  ◇フォームに2つテキストボックスを作って、「検索する文字列」と「置換後の文字列」を入力し、『変換』ボタンを押したら、データが置換される、という流れ。   一回きりの置換でなくて、何回でも同じフィールド内のデータを置換したい。   SQLのREPLACE関数を用いて出来るかな、とは思っているのですが、どのように作成すればよろしいのでしょうか。  また他のやり方でシンプルな方法があればお教えください。

  • Access 抽出条件を自動で入力したい

    お世話になります。 マクロもVBAも現在鋭意勉強中の初心者ですが、よろしくお願いします。 取引先から送られてくるテーブルの、とあるフィールドにいつも不要なデータが入っています。 作業は、その不要なデータの削除から取り掛かるのですが、これが何気にめんどくさくて 自動化できないものかと、今回、質問させていただきます。 結果として、       フィールド1 フィールド2 フィールド3 フィールド4 抽出条件        like "a*" または           like "b*"               like "c*"               like "d*"               like "e*" ↑のような状態に、マクロないしVBAを使用し、抽出条件に、上記の文字列を自動で入力することは可能なのでしょうか? また、可能ならばどのようにすればいいのでしょうか? テーブルのフィールド数は毎回違いますが、 フィールド2に不要なデータが入っているのは決まっています。 フィールド2のデータ型はテキスト型です。 Access2007を使用しています。 どうぞ、よろしくお願いします。

  • アクセス 「#N/A」が置換、変換できない

    CSVから読み取ったデータに「#N/A」が 文字列(String型)としてテーブルのレコート゛に保存されています。 それを空白("")へ置換したいのですができません。 フィールドはテキスト型です。 ctrl+Fで「検索する文字列」に「#N/A」を入力し、 「次を検索」を押しても「指定した検索項目は見つかりませんでした。」 になってしまいます。 なぜでしょう?他の文字は検索、置換できます。 ご教授よろしくお願いします。

  • Access テーブルの標題の使用方法

    おせわになります。 テーブルのフィールドプロパティの「標題」で、フィールド名の表示を変えられます。 この標題でフィールド名を変える必要性がわかりません。 ただ単に、テーブルのフィールド名を直接変更してもテーブル、クエリ、フォームおよびレポートのレコード名も自動的に変わります。 結果は同じように思われます。 この「標題」はどういう場合に使用するのでしょうか。 よろしくお願いします。

  • ワード内の色がついた文字をマクロ(VBA)で削除したい

    お世話になります。 色指定で置換処理を実行するマクロを作成したいと思っています。 置換¥オプション¥書式¥色指定で空白と置換 の作業を 「マクロを記録」の状態で実行したのですが、マクロに記録されません。。。 VBAに追記する形、どのような形でもいいのでマクロで色指定も含めた置換方法を教えていただけないでしょうか? 何卒よろしくお願いします。

専門家に質問してみよう