エクセルで分数の通分

質問

教えてください。エクセルで計算結果があえて分数で出るようにしています。複数の分数の値が出た場合、直感的に数値の大小がわかるようにするために、これらの数値（分数）を通分したいのです。分子、分母を隣り合わせのセルに入力し、分母側の数値のみの最小公倍数を出し、その結果分子側の数値を導き出すという方法で視覚的には通分したように見えますが、そうするためには出てきた答えを分子、分母で入力しなおす必要があります。望むものは、出てきた複数の分数の答えを、入力しなおすことなく通分したいのです。一発関数がなければ、２～３段階の過程（式の入力等）を経ての方法でもOKです。
使用しているエクセルは2000です。
よろしくお願いします。

回答No.2

keithin · ベストアンサー

簡易版で
B1に
=A1*LCM(LEFT(TEXT(1/$A$1:$A$2,"0000/0000"),4)*1)&"/"&LCM(LEFT(TEXT(1/$A$1:$A$2,"0000/0000"),4)*1)
を記入して「コントロールキーとシフトキーを押しながらEnter」で入力し，B2にもコピー。

＃補足
C1に
=LEFT(TEXT(1/A1,"000000000/000000000"),9)*1
のように記入してふつーにEnterで入力し下向けにコピーしておくと，この方法で得られる分母を切り出せます。必要な範囲に対してLCMを計算し，文字列結合で分数の体裁に仕立ててください。

お礼

なるほど、おっしゃるとおり分母が取り出せました。
あとはLCMを使って通分できそうです。ありがとうございました。
『目からうろこ』です。

回答No.1

KURUMITO

A1セルから下方に分子がB1セルから下方に分母が入力されているとします。
計算の結果をそれぞれのセルに表示させることはできませんので、結果をC1セルから下方に分子を、D1セルから下方に分母を表示させることにして、C1セルには次の式を入力してD1セルまでオートフィルドラッグしたのちに下方にもオートフィルドラッグします。

=IF($A1="","",IF(COLUMN(A1)=1,$A1*LCM($B$1:INDIRECT("B"&COUNT($B:$B)))/$B1,IF(COLUMN(A1)=2,LCM($B$1:INDIRECT("B"&COUNT($B:$B))),"")))

補足

さっそくの回答ありがとうございました。
ただ、残念なことに、これは私の意とするところではありません。
回答者さんの方法は、A列に分子（の値）、B列に分母（の値）を入力した場合の方法ですね。私の説明がまずかったのかもしれませんが、私の場合、ひとつのセル内に分数が表記（計算結果）されています。例えば、A1＝3/5、A2＝6/8がある場合、通分された結果、B1=24/40、B2=30/40（A列の各分数の分母が40に通分されB列に表記されている。）これが欲しいのです。
よろしくお願いします。