エクセルにおける置換について教えてください

質問

アクセスがあれば簡単にできると思うんでですが、置換について教えてください。

表に入力された文字が、別表の文字と一致した場合において別表の別の文字に置換を行いたいのです。

例えば、Ａと入力した場合、別表にＡがあればＡとなければ置換しない場合です。同様に、Ｂ・Ｃ・・・あります。

よろしくお願いします。

回答No.4

imogasi

関数はA1の値を使って何か行い、結果をA1セルに戻せません。
この大原則を認識してますか。
ーーーー
VBAならA1の値を使って、何かを行い結果をA1セルに戻せます。
置換前の文字列をFindして、置換後の文字列を代入すればよい。
また対応表を作っておけば、VLOOKUP関数などつかえる。
置換したいセル範囲を範囲指定して、下記を実行する。
Sub test01()
Dim cl As Range
For Each cl In Selection
x = Application.VLookup(cl, Range("h1:I10"), 2, False)
If IsError(x) = True Then
Else
cl = x
End If
Next
End Sub
置換対照表
H1:H3に
xx あああ
bb ううう
cc hjkkk
と入れておく
置換前データ　A1:C7　（下記データはOKWAVEでは左片隅に表示されますが、適当に散らばらしてください）
aa

bb

cc

xx
実行後（置換後）
aa

ううう

hjkkk

あああ

補足

詳しくありがとうございます。

＞関数はA1の値を使って何か行い、結果をA1セルに戻せません。

結果は別表のセルにはきだしたいです。

ＶＢＡを使わないと難しいですかね。
ＶＢＡよく解らないのが現状です。

回答No.3

noname#204879

[No.1回答に対する補足]に対するコメント、

最初の質問では「表」「別表」だけでしたが、今度は「別表」「表１」「表２」「表３」なるやら、表１には AB、CD、EF の半角文字列なのに「表２にＡ」とか「表３等にＢ」とかの別の全角１文字が登場するやらで、私の頭の混乱が倍増しています。
済みませんが、私は退散いたします。

回答No.2

noname#37676

置換ではありませんが、文字列操作の関数組み合わせでできないこともないと思います。（内容によっては置換も可能かも）ですが、質問の内容がイマイチ理解できません。
>表に入力された文字が、　　　←たとえばどんな？
>例えば、Ａと入力　　←どこ（手入力/セル参照/他）に入力？
実際のないようそのものとは言いませんが、もう少し具体的な表現にしたら皆さんからのお知恵がもらえると思いますよ♪

回答No.1

noname#204879

》 別表の文字と一致した場合において別表の別の文字
》 に置換…
》 別表にＡがあればＡとなければ置換しない…

何か支離滅裂？
何れにしても置換すべき「別表の別の文字」は「別表」の何処にあるかを教えてください。

補足

すいません。
別表のセルに文字があります。

表１ AB
CD
EF
とあった場合に、表２にＡと入力すると表３等にＢとセルに出力する方法です。
関数のsubstituteでやってみたんですが、やり方が悪いのかうまくいきませんでした。

お願いします。