![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
今日一日考えたのですが、解決できずお力をお借りいただけますでしょうか?
テーブルのレコード内の文章に半角スペースが含まれていないかをチェックしたいと思います。
下記のように半角スペースを★へ置換したいのですが、空欄のレコードがエラーとなります。
エラーを非表示にしたいのですが、どうやっても無理でした。
宜しくお願いします。
Function DelSpc(str As String) As String
Spc = Replace(str, " ", "★", 1, -1, 0)
End Function
No.3ベストアンサー
- 回答日時:
えっと、、、
このようなクエリ(0を””に書き換えた)を作って、事前に実行させて対応しましたという意味です。
テーブル上でnull不可、デフォルトでブランク(””)としておけば以後発生しなくなると思います。
https://www.feedsoft.net/access/guide-query/guid …
なるほど、、、デフォルトでnullを不可にすれば、今後はOKそうですね。
今までのデータは、更新クエリを使ってみたいと思います。
ありがとうございます。
No.2
- 回答日時:
更新クエリで事前にデータをブランクに書き換えておくという意味でした。
>どうしてでしょう。。。
アクセスの環境が今ありませんのでチェックできないのですが、たぶん、replace関数はヌル値には対応できない、ということでしょうから、どうしてもファンクション一発で処理したいとのことでしたら、エラーハンドリングして捕まえたらブランク返すとか、、、汚いやり方しかないかもしれません。
ご回答ありがとうございます。なんか難しそうですね。
アクセスやVB等は初心者で、いろいろなサイトを参考にさせてもらってます。
あきらめたほうがよさそうですね。。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【マクロ】フォルダを3つ、POモニター上に、決まった並べ方をしたい 4 2022/08/31 11:05
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) VBAでfunctionを利用しようとしたときに「引数は省略できません」というエラーが出ます 1 2022/10/15 16:30
- Excel(エクセル) 【マクロ】フォルダAからダBへファイルを、ファイルの更新日時の条件で、1つづつ移動するには? 3 2022/08/25 09:56
- Visual Basic(VBA) Excel VBA メール作成について 本文の中にExcel でコピーした図を上下に2つ 貼り付けを 2 2023/06/14 01:48
- Excel(エクセル) エクセル VBA For Next 繰り返しの書き方を教えてください 6 2022/09/01 14:11
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:48
- Excel(エクセル) 【マクロ】フォルダを2つのモニターの定位置に並べたい 2 2022/09/02 01:14
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBScript+SQLServerでcountがう...
-
access2000でつまづいてます
-
半角スペースの置換でエラーを...
-
「更新に必要なキー列の情報が...
-
accessでレコード編集後、自動...
-
Excel 2019 のピボットテーブル...
-
Accessでテーブル名やクエリ名...
-
Accessのフィールド数が255しか...
-
エクセルVBAで5行目からオート...
-
「直需」の意味を教えてください
-
列が存在しないと言われる
-
Vbaでアクセスからエクセルにリ...
-
Accessのクエリでデータの入力...
-
エクセルグラフの凡例スペース
-
複数のレコードを1つのレコード...
-
Accessでコードを入れると名前...
-
Accessファイルを作成者以外は...
-
テーブルの存在チェックについて
-
Access テキスト型に対する指定...
-
Accessでテーブルの値をテキス...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
access count数を変数に格納
-
access2000でつまづいてます
-
Accessの更新前処理について。D...
-
ADOでループすると1レコードず...
-
「更新に必要なキー列の情報が...
-
ACCESSのFindコマンドが遅い
-
Access2003でのテーブルの有無確認
-
[Access]削除時のエラーメッセ...
-
Access VBAで自動連番を振るには
-
VBAのデバックをどなたかお手伝...
-
ECサイトの購入後の在庫処理
-
AceessVBA 非同期処理について
-
cobolのカーソルについて
-
ACCESS 処理件数の取得
-
adoのWHERE句 クエリだとフィ...
-
VB2010のSQLを使ったレコードカ...
-
VBScript+SQLServerでcountがう...
-
半角スペースの置換でエラーを...
-
Set rst = db.OpenRecordset("S...
-
Access VBA
おすすめ情報
下記でもダメでした。。。どうしてでしょう。。。
Function Spc(str As String) As String
Spc = Replace(Nz(str, ""), " ", "★", 1, -1, 0)
End Function