プロが教える店舗&オフィスのセキュリティ対策術

OS WinXP
Access Version:2003

今回したいこと
-宛名により「様」・「御中」を自動でつけたい-

私は、全くの初心者です。
1年半前に会社に入社し、以前からあるアクセスデータを使用してるのですが・・・
以前に作った人が、かなり詳しい人だったみたいで苦戦をしています。
どうぞ宜しくお願いします。


使用するクエリのフールドには、企業名・部署名・役職・個人名・郵便番号・住所・住所2があります。
レポートで新規作成のラベルを選んで作成をしていますが
作成時に「様」と入れると会社名のみの所も「様」になってしまいます。

下記のようにラベルに出す場合どのようにすればいいのでしょうか
会社名の場合は「御中」
個人名の場合は「様」
を自動的につけたい。
ただ企業名の中に、個人名が入っている場合もあります。

会社名のみの場合

郵便番号
住所
住所1
会社名 御中

個人名が記載されている場合

郵便番号
住所
住所2
会社名
部署
役職 個人名 様

わかりにくい説明かもしれませんが
どうぞ宜しくお願いします。

A 回答 (2件)

住所録:


ID__企業名_________部署名___役職___個人名_______郵便番号___住所______住所2
1___新日本商事___営業部___部長___鈴木 一郎___1111111____東京都___渋谷区
2___新日本商事________________________________________1111111____東京都___渋谷区

以上でテストしました。

まず、レポートウイザードでレポートを作成。
次に、レポート「住所録」をデザインでオープン。

メニューの<ab|>をクリックして<詳細>ブロックの余白でマウスをポイントしたままスライド。
一緒に配置されるラベルは必要がないので削除。
(ラベル名を消すと削除されます)

配置した非連結テキストボックスを右クリックして、更に、[プロパティ]をクリック。
[コントロールソース]に先の回答をコピペ。
これで、表示する企業名、表示する個人名は完成。

次に、連結している[企業名]、[個人名]を右クリックして、更に、[プロパティ]をクリック。
[可視]を'はい'から'いいえ'に変更。

これで完成です。

>個人名の所に役職が入るんですが、役職の後に上記の式を入れたら
いいんでしょうか

これが判らんです。
クエリの列名には、そういうのは見当たりませんよね。

表示個人名:[役職] & " " & [個人名]

このようでもないし。
ともかく、このテキストボックスをコピペして2つにする。
そして、それぞれの[コントロールソース]を[役職]と[個人名]にする。

=[個人名] & IIf(Len([個人名] & ""), " 様","")

を次の式に変えるでいけそうな????

=[役職] & " " & [個人名] & IIf(Len([個人名] & ""), " 様","")

※レポートをコピペしてオリジナルをバックアップしてから作業した方がいいかもです。

この回答への補足

Husky2007様

本当に何度も申し訳ございません。
ほぼ・・・完璧に近いところまできています。
本当にありがとうございます。

後、どうしても気になる部分があります。

現在 住所録

ID_企業名___部署__役職_個人名___〒___住所__住所2
1_○○○商事_営業部_部長_○田 ○郎_111111_東京都_渋谷区
2_○○○商事______________111111_東京都_渋谷区
3_○○○商事_営業部__________111111_東京都_渋谷区
4_○田 ○郎______________111111_東京都_渋谷区


上記のように入り混じっています。
ID-NO.1,2に関しましては、今まで教えていただいてた式で
バッチリいけたのですが・・
ID-NO.3に関しましては、○○商亊 御中
                 営業部

となってしまい
ID-NO.4に関しましては、○田 ○郎 御中

となってしまいます。

いっぺんにお話をしたらよかったんだんですが
こうなるとは・・・・思っていませんでした。
すいません。本当に初心者で・・・

どうぞ宜しくお願い致します

補足日時:2007/10/30 16:53
    • good
    • 0
この回答へのお礼

Husky2007様

本当に丁寧なご回答ありがとうございます
一度やってみます。

またすぐにお聞きさしていただくかもしれませんが
どうぞ宜しくお願い致します

お礼日時:2007/10/30 14:10

非連結テキストフォームを配置して、



=[企業名] & IIf(Not Len([個人名] & "")," 御中","")
=[個人名] & IIf(Len([個人名] & ""), " 様","")

後は、[企業名]と[個人名]を非表示に。
    • good
    • 0
この回答へのお礼

Husky2007様

本当に早速のお返事ありがとうございます。

ただ・・・非常に申し訳ございませんm(__)m
私、本当に初心者で・・・
非連結テキストフォームを配置というのと
「企業名」と「個人名」を非表示というのも
どうすればいいんでしょうか

上記の式ですが、会社名と個人名の所にいれたらいいんでしょうか
個人名の所に役職が入るんですが、役職の後に上記の式を入れたら
いいんでしょうか

本当にすいません。
厚かましいですが・・・
どうか宜しくお願い致します

お礼日時:2007/10/29 16:01

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!