アクセス iff関数、format関数について

質問

いつもお世話になっております。

アクセスのフィールドへ関数を埋め込みたいのですが、
関数に誤りがあるため、うまく実行ができておりません。

今回、実行したいことは、

※数字列の左端に０を埋め込み、５桁にしたい。
※数値が負の場合、マイナスを含めて、５桁にしたい
※数字列に入る数値は-1000～1000の予定
※当方、アクセス2003を利用。

ex) 1 →　 00001
　　-3 →　 -0003
　　 0 → 00000
　　156→ 00156
-1000 → -1000
15000 →15000

当方の作成関数は、以下の通りですが、
どこが悪いのかよくわかりません。。ご教示願います。
あるいは、全くの見当違いである場合は正しい関数をご教示頂けないでしょうか。

式1: IIF((format([数字列]<0),([数字列],"0000"),([数字列],"00000"))

→数字列が0よりも小さい場合→マイナス　＋　0-4個　0を付ける。
→それ以外の場合→左端に0-5個0を付ける。
という考えのもと、考えました。

回答No.3

imogasi · ベストアンサー

例データI
D フィールド1 式1
1 0 00000
2 -3 -00003
3 1 00001
4 156 00156
5 -1000 -01000
6 15000 15000
式１は
式1: Format$([フィールド1],"00000;-00000;00000")
マイナスだけが有効数字４桁だが其れで良いのなら
式1: Format$([フィールド1],"00000;-0000;00000")
で質問のようになる。
３書式のＦｏｒｍａｔ関数を使う。
順序はエクセルと同じく、正；負；０のときの順

お礼

いつもありがとうございます。
完璧な回答でした。
前提条件（正数は5桁、負数は4桁）も把握でき大変役に立ちました。

回答No.2

IDii24

結果に前ゼロを入れたいと云う事は、結果は数値ではなく文字でよい？と云う事になりますが良いでしょうか？
その場合は数値を文字に替えてから整えます。

iif([数字列]<0,"-"& right("00000" & cstr([数字列]),5) ,right("00000" & cstr([数字列]),5))

でもゼロだった場合　00000 になってしまうので、もしこれを　0 にしたければ、

iif([数字列]=0,"0",(iif([数字列]<0,"-"& right("00000" & cstr([数字列]),5) ,right("00000" & cstr([数字列]),5))))

て長くなってしまうしパフォーマンスも悪い。VBAでモジュール処理した方が良いとは思います。

お礼

ご丁寧にありがとうございました。
参考にさせていただきました。

回答No.1

mitarashi

formatの場所が違ってますね。思いこんでしまうと、間違いに気づきにくいモノです。ご参考まで。
式1: IIf([num]<0,Format([num],"0000"),Format([num],"00000"))

お礼

ありがとうございました。
助かりました。