![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.3ベストアンサー
- 回答日時:
#2の回答者です。
>最低でもどのセルにUNICODE文字が含まれているか知りたい
ということで、#2のユーザー定義関数を利用した、シート全体を探すマクロを加えておきます。どちらも、標準モジュールを使います。
'//
Sub Macro_8996251()
Dim Rng As Range
Dim c As Variant
On Error Resume Next
Set Rng = ActiveSheet.Cells.SpecialCells(xlCellTypeConstants, 23)
If Err() <> 0 Then Exit Sub
On Error GoTo 0
For Each c In Rng.Cells
If CheckUNICODE(c.Value) = 1 Then
c.Interior.ColorIndex = 3
End If
Next c
End Sub
'///
No.2
- 回答日時:
UNICODE文字というのは、あくまでも、JISに対するUNICODEのみの文字ですね。
Excel VBAというのは、Excel 97の時にUNICODEに対応するようになったのに、未だにVBEditor は、JIS対応のようです。以下は、7年前に、そのUNICODEが、「?」になることを着目して作られたものです。UNICODE文字を直接ヒットするわけでありません。
文字列の中に、UNICODE文字が含まれてれば、1が返る
文字列の中に、外字が含まれていれば、2が返る
そうでなければ、0 になる、
というプログラムです。
'//
Function CheckUNICODE(ByVal txt As String)
Dim i As Integer
Dim c As String
For i = 1 To Len(txt)
c = Mid$(txt, i, 1)
If Asc(c) = 63 Then
If "?" <> txt Then
CheckUNICODE = 1 'Unicode
Exit Function
End If
ElseIf AscW(c) > -8193 And AscW(c) < -5887 Then
CheckUNICODE = 2 '外字
Else
CheckUNICODE = 0 '一般(JIS)
End If
Next
End Function
No.1
- 回答日時:
「UNICODE文字」とは何を意味していますか。
Windowsで扱える文字は,Symbolのような特殊なフォントに含まれるものとPrivate Use領域に定義した文字を除くと全てUnicodeに収録されている文字になります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- C言語・C++・C# VisualStudioのソースコードで漢字を使いたい 4 2022/05/21 10:16
- Windows 8 win8 "ベータ ワールドワイド言語サポートで Unicode UTF-8 を使用"を出したい 2 2023/05/23 19:57
- Excel(エクセル) Excelについて▶あるセルに文字を入力すると、別のセルに色がつく(条件付き書式) 1 2022/03/27 16:43
- Excel(エクセル) Excelのリストにある文字を含むセルを、複数の色で色付けしたいです 2 2022/08/11 17:39
- Excel(エクセル) 幾何学模様のセル内貼り付け 1 2023/07/11 00:45
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
- Visual Basic(VBA) 列を指定して値を左から5文字にそろえる 1 2022/06/10 20:28
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- その他(プログラミング・Web制作) iMacのターミナルにユニコード文字を出す方法 2 2022/06/22 21:48
- Visual Basic(VBA) VBAで、特定の文字より後を削除して残った数値を文字列に変換と特定の文字より前も削除したい 3 2022/04/15 19:21
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Excel上でどれが外字か調べたい
その他(コンピューター・テクノロジー)
-
VBAにて読み込みが出来ない環境依存文字 ㉖ の文字コードを教えて下さい。
Excel(エクセル)
-
アクセスで外字を探す方法
Access(アクセス)
-
-
4
エクセルで文字化けしているセルを検索するには?
Excel(エクセル)
-
5
VBAでUnicodeしか存在しない文字の判定について
Visual Basic(VBA)
-
6
[VBS] Unicodeの文字化けを防ぎたい
Visual Basic(VBA)
-
7
Unicodeの文字がどれか、調べたいです
Windows 7
-
8
Excel/Accessで画面に「・」と表示された文字のコードが知りたい。
Excel(エクセル)
-
9
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
10
VBAで文字を反映させると255文字の制限になってしまいます。
Visual Basic(VBA)
-
11
テキストボックスのカーソル位置の取得・設定方法
Visual Basic(VBA)
-
12
StrConvでUnicodeに変換出来ない文字
Visual Basic(VBA)
-
13
VBAで仕様書は書きますか?
Visual Basic(VBA)
-
14
VBAでワークシートを引数としてサンプル関数に渡したい
Visual Basic(VBA)
-
15
エクセルのセル内の文字から、JISコードまたはシフトJISコードを知りたい
Excel(エクセル)
-
16
DATE型変数を初期化する方法
Visual Basic(VBA)
-
17
ADOを使ったDBアクセス後のメモリ解放
その他(データベース)
-
18
EXCELのVBAでLenB関数について
Excel(エクセル)
-
19
エクセルでセルの中身が漢字かどうか識別する方法は?
Excel(エクセル)
-
20
コンボボックス内の文字サイズ変更
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessのクエリで、replace関数...
-
文字列の後ろから必要分だけ削...
-
UNICODE文字が含まれているかの...
-
ダブルクォーテーションを文字...
-
文字列にアルファベットが何文...
-
strcmp( )関数について教えて...
-
64進数
-
◆COUNTIF関数またはダブルクォ...
-
PHPのdate()関数のformat文字の...
-
環境依存文字?をEnumで定義したい
-
8文字以上の文字を暗号化する方法
-
awk で右端の文字を1文字削除...
-
Windows form アプリ C# 文字の...
-
VBA:小数点以下の数字を取得で...
-
特定のセルが空白だったら、そ...
-
【Excel VBA】指定行以降をクリ...
-
count(*)で取得した値をJAVAの...
-
VB.NETで DataRow()を利用して...
-
i=cells(Rows.Count, 1)とi=cel...
-
データ数をカウントしたいのですが
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessのクエリで、replace関数...
-
文字列の後ろから必要分だけ削...
-
UNICODE文字が含まれているかの...
-
ダブルクォーテーションを文字...
-
エクセル関数で記号から記号の...
-
文字列にアルファベットが何文...
-
C言語でギリシャ文字は使えます...
-
GetDlgItemTextについて
-
strcmp( )関数について教えて...
-
VS C++6.0のCString にて先頭1...
-
お願いです!!
-
URLで使える文字・使えない...
-
文字数と単語数を数えるプログラム
-
awk で右端の文字を1文字削除...
-
右から何文字目にあるか文字位...
-
CSVの禁則文字
-
VBScriptでXcopyしたいのですが
-
64進数
-
環境依存文字?をEnumで定義したい
-
VB2008 文字列に等間隔にスペ...
おすすめ情報