エクセルにて ’ を検索するには？

質問

エクセルで　’７　と入力すると、実際のセルには　７　のみが表示されます。
このような場合の、　’　を使ってるセルを検索したいのですが、
実際には検索機能を使っても検索できません。

なにか検索する手段はあるのでしょうか？

回答No.1

mu2011 · ベストアンサー

安直ですが、ジャンプ機能を使って如何でしょうか。

編集→ジャンプ→セル選択→定数をチェック（文字のみ選択）→ＯＫ
後は、ｔａｂキー移動で如何でしょうか。

お礼

回答ありがとうございます。

こういう方法でも出来るのですね。

回答No.4

subri

単純に、数値か文字列か見分けるだけであれば
=TYPE(A1)で区別はつけることができます。

お礼

回答ありがとうございます。
本当にいろいろな方法があるのですね。

回答No.3

imogasi

検索とはいえないとは思いますが、
＝CELL("prefix",A12)
とか入れると文字列の配置を表す記号が出てきます。
参考になればと思います。
LOTUS１２３との互換性のために特別処理をしてるのではないかと勝手に思ってます。
だから消しにくくて（昨日も質問があった）私らには理解不能の動きをします。値、書式、関数、コメントなどエクセルは重畳的分担的記憶構造になっていると思うが、どこに記憶されているのか、個人的に知りたいですが。

お礼

回答ありがとうございます。
確かに’を見つけてくれますね。

回答No.2

KenKen_SP

検索機能で接頭辞のあるセルを検索することは不可能だと思います。
（実は、知らないだけで方法があるのかな?）

VBA のよる方法をご紹介します。標準モジュールにコピー＆ペースト
してお試し下さい。

Sub FindPrefix()

　　Dim rngFound As Range
　　Dim rngCell　As Range

　　'選択範囲のセルの数だけループ
　　For Each rngCell In Selection
　　　　'接頭辞があるか?
　　　　If rngCell.PrefixCharacter <> "" Then
　　　　　　'接頭辞があれば、オブジェクト変数にセット
　　　　　　If rngFound Is Nothing Then
　　　　　　　　Set rngFound = rngCell
　　　　　　Else
　　　　　　　　Set rngFound = Union(rngFound, rngCell)
　　　　　　End If
　　　　End If
　　Next rngCell

　　'オブジェクト変数がセットされているか?
　　If rngFound Is Nothing Then
　　　　MsgBox "接頭辞のあるセルはありません"
　　Else
　　　　rngFound.Select
　　End If

　　'後始末
　　Set rngFound = Nothing
　　Set rngCell = Nothing

End Sub

お礼

回答ありがとうございます。

うまく行きましたよ。