エクセルで範囲選択したセルだけ数式を表示させたいのですが

エクセルで範囲選択したセルだけ数式を表示させたいのですが、
どうすればいいでしょうか？
印刷し、数式自体を確認したいのです。
教えてください。お願いします。
質問の意味がわからなければ補足いたします。

No.2 ベストアンサー 回答者： imogasi 回答日時： 2004/07/26 21:41

VBAになります。

セルの場所に表示するとして、壊れてはだめなので
Sheet2に出します。
Sheet2に列幅を十分広げておいてください。
Sub test01()
Dim cl As Range
Dim sh1, sh2 As Worksheet
Set sh1 = Worksheets("sheet1")
Set sh2 = Worksheets("sheet2")
For Each cl In Selection
r = cl.Row
c = cl.Column
sh2.Cells(r, c) = "'" & cl.Formula
Next
End Sub
（VBA）
ツール－マクロ－ＶＢＥをクリック。
出てくるVBE画面で、メニューの挿入－標準モジュールをクリックして出る画面に上記を貼りつける。
（注意）
Set sh1 = Worksheets("sheet1")
Set sh2 = Worksheets("sheet2")
のSheet1、Sheet2を自分のシート名に合わせて変えること。
（やり方）
Sheet1の式を出したいセルを範囲指定する。
上記を実行する。
Sheet2を印刷。

この回答へのお礼

できました！
大変助かりました、ありがとうございましたっ！！

お礼日時：2004/07/30 12:42

No.3 回答者： conversion 回答日時： 2004/07/28 21:42

はじめまして。

ひとつの案として、次の方法を提示させて頂きます。
尚、この方法は当方所有のEXCEL2000で確認した内容です、他のバージョンでの確認は不十分ながらとれていません。

1.目的のセルを範囲指定します。
2.「編集」メニューの「置換」をクリックします。
3.[検索する文字列] ボックスに、「=」（半角イコール）を入力します。
4.[置換後の文字列] ボックスに、「　=」（半角スペース半角イコール）を入力します。
5.[完全に同一なセルだけを検索する]オプションは付けずに、[次を検索] をクリックします。
注：ボックス内に入力する文字にカギカッコは含めません。

以上の操作にて目的に近い結果が得られると推測いたします。
元に戻す方法は、同じ手順のうち[検索する文字列] ボックスと、[置換後の文字列] ボックスに配する文字を入れ替えることで可能と思われます。
以上、わずかながらご提案まで。

この回答へのお礼

ご回答ありがとうございました。
次はそのようなやり方でやってみたいと思います。
ありがとうございました。

お礼日時：2004/07/30 12:43

No.1 回答者： alarm_set 回答日時： 2004/07/26 21:17

「ツール」＞「オプション」で「表示」タブの「ウィンドウオプション」の「数式」に

チェックを入れる方法ではダメでしょうか？

ご質問の「範囲選択したセルだけ」という条件にはそぐわないですが。

この回答へのお礼

アドバイスありがとうございました！

お礼日時：2004/07/30 12:44