|
ご質問させていただきます。A1セルからC8まで例えばAAAAA5308BDKLUとかAAAAA5308CCBBDという文字列が記載されています(ただし、C2セルだけは空白です)。要するに、最初の5桁は同じ文字、次の4桁が数字、最後の5桁は規則性が全くない文字列です。やりたいことは、固定されていない任意の4桁の数字を置換することです。上記の例でいえば、5308を他の4桁の数字、例えば0919に置換したいのですが、4桁の数字が常に5308で固定されているならReplace What:="5308", Replacement:="0919"でいけるのですが、置換前の数字は常に5308で固定されているのではなく、また、置換したい新しい数字も常に0919なわけではありません。しかも、C2セルに置換したい新しい数字(0919)を入力することによって置換を実行したいのです。さらに、置換前の数字を自分で入力せずに(自分で5308と入力せずに)、5308を自動的に認識して、0919に置換したいのです。自分で入力するのはあくまでも置換したい新しい数字(0919)だけです。要するに、事前に私が指定した不規則な4桁の数字を、自分でC2セルに新しい4桁の数字を入力することによって置換したいのです。やりたいことをもう一度例を用いて説明いたしますと、最初に7203と入力されている数字をC2セルに5401と打ち込むことによって7203を5401に置き換えたいのです。
色々考えてみたのですが、全く思いつきませんでした。どなたか教えていただけないでしょうか?よろしくお願いいたします。ちなみに、当方のVBAの知識は初心者レヴェルです。よろしくお願いいたします。
|
|