どなたか教示お願いします

質問

表中より「０」が入力されているセルは「空欄」、「１」より大きい数字（黄色）が入力されているセルは「○」と置き換えたい。
「０」は「空欄」に置き換えることができたのですが、「１」より大きい数字を「○」に変換するにはどのような方法があるのか教えてください。（エクセル2007使用）
よろしくお願いいたします。

この投稿のマルチメディアは削除されているためご覧いただけません。

回答No.2

keithin · ベストアンサー

日本語で「１より大きい」ってのは、１を超えて２とか３とかの数字で１自体は含まないという意味ですが、文脈から実際は「ゼロより大きい」のと「ゼロ」の２つにしたいご相談と勝手に解釈します。

簡単な方法：
セル範囲をまとめて選ぶ
セルの書式設定の表示形式のユーザー定義を開始
"○";;0;@
と設定してＯＫする。

以上でゼロより大きい数字のセルは、まとめて○になります。

＃参考
ゼロより大きい数字を○に「実際に書き換えてしまって構わない」場合：
上述の設定を施したセル範囲をまとめて選んでコピーする
ホームタブの「クリップボード　□」の□をクリックしてクリップボードを表示させる
コピーしたのがそこに載ってるので、クリックする

以上で、数字が○に書き換わります。

お礼

回答ありがとうございました。こんな方法があるのですね。勉強になりました。

回答No.4

tom04

こんばんは！

VBAになってしまいますが・・・
データそのものを変えてしまいます。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面に
↓のコードをコピー＆ペースト　→　Excel画面に戻り、
データ範囲を範囲指定してマクロを実行してみてください。
（Alt＋F8キー　→　マクロ　→　マクロ実行です）

Sub Sample1() 'この行から
Dim c As Range
For Each c In Selection
If IsNumeric(c) Then
If c = 0 Then
c = ""
ElseIf c > 1 Then
c = "○"
End If
End If
Next c
End Sub 'この行まで

※　必ず範囲指定した後にマクロを実行してください。
※　項目行（文字列）を含んで範囲指定しても構いません。
※　一旦マクロを実行すると元に戻せませんので、別Sheetでマクロを試してみてください。m(_ _)m

お礼

簡単に作成することができました。マクロが使いこなせると便利ですね。ありがとうございました。

回答No.3

keithin

おっと。ゼロはゼロじゃなく空欄にしたいんでしたね。

セルの書式設定の表示形式のユーザー定義を
"○";;;@
とします。他は回答した通りです。

失礼しました。

＃参考
ご相談の説明がちゃんと正しくて、実際に１は１のまま、ゼロは空欄、そして１より大きい数字を○にしたいご相談だった場合

[>1]"○";[<1]"";0;@
などのようにします。

回答No.1

Nebusoku3

A列に　０　1　２　５　１００　などがあったとき
B列に　=IF(A1=0,"","○")　と入れてやれば良いのでは。
（０以外の数字は全て ○　にしますが。。。）

表が良く見えないので感覚で書いております。

お礼

回答ありがとうございました。
表が不明瞭で申し訳ありませんでした。