ウォッチ漫画『酒男子』新連載開始!

外字が含まれているExcelデータをWeb上にアップすることになりました。
そこで外字の部分を他の簡易文字に置き換えたいのですが、
どれが外字かを簡単に調べる方法はないでしょうか?

このQ&Aに関連する最新のQ&A

A 回答 (3件)

こちらにあるように関数を作る方法があります。


http://q.hatena.ne.jp/1249433883

または、http://pltool.com で外字の位置を調べることもできます
    • good
    • 5

wordをお持ちなら


機種依存文字チェッカというアドインをインストールし、
http://www15.big.or.jp/~t98907/platformdependent …
適当なセルをワードに貼り付ければ機種依存文字をチェックできます。

参考URL:http://www15.big.or.jp/~t98907/platformdependent …
    • good
    • 0

こんにちは


ちょっと情報が古いかもしれませんが、検索すると
機種依存文字チェックするプログラム
http://www.shtml.jp/mojibake/izon_check.html
を使うのも一つの手段かもしれません。

では。
    • good
    • 1

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルで文字化けしているセルを検索するには?

あるDBをエクセルに読み込んだところ、文字が「・」と表示されている箇所がいくつもあるのを発見しました。DBは紙に印刷したものがありますので、それを参照して「・」を正しい文字に置き換えたいと思い、エクセルの検索機能を使って「・」(全角/半角)を検索しましたがうまく検索できません。どうも見かけは「・」でも実際には違う文字のようです。(たまたま発見したところを印刷したDBで調べたところ、やはり「株」を丸で囲んだ文字でした。)どなたか文字化けした「・」を漏れなく検索する方法をご存知でしたら教えてください。(何箇所もあるため、目を皿のようにして探すのは骨が折れます。)よろしくお願いします。

Aベストアンサー

こんにちは。

今、私は、状況を正しく認識しているわけではありませんので、出来れば、詳しい状況を知っておきたいです。それが解決の目処になります。もし、Dxakさんのおっしゃるように、EUCの外字?でしたら、もとより、私の考えていることはUnicode範囲内では不可能です。

ご質問者の
>エクセルの検索機能を使って「・」(全角/半角)を検索しましたがうまく検索できません。

これに関しては、Unicode範囲内でしたら、セルを選択し、数式バーに表示されて、その中から、「・」の該当する部分を選択し、Ctrl + C を確保し、[Esc] で選択を解除したら、検索機能や置換機能で、検索文字として、Ctrl+V で貼り付けをすれば、検索/置換は可能です。

私の知る限りでは、Excelのワークシート上で、「・」のように表示された場合、CODE()関数では、正しい文字コードは取れないと思っています。CODE()関数は、あくまでも、Shift-JIS 範囲内ですので、その範囲内のコードを返してくるはずです。

出来ましたら、ユーザー定義関数を、標準モジュールに貼り付け(記録マクロと同じ場所)てください。

'標準モジュール
Function U_Code(arg As Variant)
'ユニコードを調べる関数
If VarType(arg) = vbString Then
  U_Code = AscW(arg)
End If
End Function

セルに

文字化けの文字  =U_Code(A1)
         =CODE(A1)

と比較してみて、コードを教えていただけませんか?

こんにちは。

今、私は、状況を正しく認識しているわけではありませんので、出来れば、詳しい状況を知っておきたいです。それが解決の目処になります。もし、Dxakさんのおっしゃるように、EUCの外字?でしたら、もとより、私の考えていることはUnicode範囲内では不可能です。

ご質問者の
>エクセルの検索機能を使って「・」(全角/半角)を検索しましたがうまく検索できません。

これに関しては、Unicode範囲内でしたら、セルを選択し、数式バーに表示されて、その中から、「・」の該当する部分を選択...続きを読む

Q文字コードの調べ方を教えて下さい。

文字コードの調べ方を教えて下さい。
外字を作るため、文字コード表から参考の漢字を表示したいのです。
文字コードを調べる方法を教えて下さい。

Aベストアンサー

Word2002以降
文字が解っているなら
文字を入力
入力した文字の直後に文字キャレットがある状態で
Alt+X とキー操作すればUnicodeの文字コードに変換されます。
再度、Alt+X とキー操作すれば元の文字が表示されます。
Windows XPの外字エディタはUnicode仕様だったと思います。

文字コードを使わなくても
「参照」ダイアログの「形」の処に入力、あるいはコピペすることができます。

外字エディタの使い方
http://www.gon-net.jp/windows/gaizi/gaizi.htm

QUNICODE文字が含まれているかのチェック

お世話になります。

VBAを使用して、
セルに、UNICODEE文字が含まれているかのチェックをしたいと考えております。
・できれば、どの文字がUNICODE文字かどうか知りたい。
・最低でもどのセルにUNICODE文字が含まれているか知りたい
という形ですが、もし、ご存知の方教えて頂けないでしょうか?


宜しくお願い致します。

Aベストアンサー

#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
'///

Qエクセルで、記号文字を検索したい

いつもお世話になります。
エクセルで得意先リストを作り、印刷会社に送ろうと思っているのですが、記号文字が入っていた場合に文字化けする可能性があるとのことで、全ての記号文字を無くしたいのです。(株)や(有)など一般的なものは置換で対応できるのですが・・・。

よろしくお願い致します。

Aベストアンサー

> 機種依存文字を特定する方法をご存知でしたら、ご教授くださりませ。

IMEで「"機種依存文字"の文字コメントを表示する」にチェックがされていると、日本語に変換する時、変換候補の横に「機種依存文字」の「文字コメント」が表示されますので、使用(変換)しないようにします。

変換してしまった後は、残念ながら記憶に頼るしか「機種依存文字」の特定方法を知りません。
例:括弧や丸で囲まれた文字で、1字で表示された文字はすべて「機種依存文字」など

「Microsoft(R)IME」変換候補一覧に「単語コメント」や「文字コメント」を表示する方法<Windows Vista(R)>
http://dynabook.com/assistpc/faq/pcdata/006487.htm

Qエクセルで、頭に0をつけて数字の桁を揃える方法

エクセルで、必ず5桁の数字を入れる列があるとします。
ところが、数値データとして最初に作っているので、0が頭になく桁が足りない場合があります。
任意文字として5桁の数字にしたいのですが、

何かいい方法はありませんでしょうか?

例)
A列 A列
50      00050
1000  ⇒  01000
11111    11111

どうぞよろしくお願いいたします。

Aベストアンサー

次の方法は如何でしょうか。
(1)表示だけで良いのならば、セルの書式設定→表示形式→ユーザ定義で00000を設定
(2)データとして必要ならば、空き列(仮にB列)B1に=TEXT(A1,"00000")を入力、下方向にコピー→B列をコピー→A列に形式を選択して貼り付けで「値」を選択→OK、B列を削除

Q外字エディタで作成した外字をエクセルで表示するには

外字エディタで、文字をつくったのですが、
それをエクセルにもってくるにはどうしたらいいのでしょうか。

Aベストアンサー

お使いの日本語入力システムはMS-IMEですか?
その場合は「がいじ」と入力しCtrl+Yもしくは
F5を押してください。

よく使う文字でしたら登録すると便利ですよ

Qアクセスで外字を探す方法

アクセスを使って名前や住所を管理しています。外字が含まれていることがあり、今は、クエリで?や・を探していますが、・でもクエリで検出できるものとできないものがあるみたいで、100%見つけることができず、結局目でチェックしています。
何か簡単に探す方法はないでしょうか?

Aベストアンサー

フォーム>挿入>標準モジュールで、VBA の編集画面(VBE)が
開きます
そこに、先ほどのコードをコピペしてください
これで、外字を★に変換する test という関数がクエリ等で
利用できるようになります

新規にクエリを作り、例えば「住所」のフィールドを
表示させます
隣のフィールドの「フィールド」欄に
test([住所])
「抽出条件」欄を
Like "*★*"
としてデータシートビューに変更します

外字を含むレコードのみ、外字が含まれた箇所が
★に置換されて表示される筈です(多分)
上手く説明できませんので、尚不明な点があれば教えてください

>何か、文字以外は探すとか、記号を探すとかは無理なんでしょうか?
一旦 CSV などテキスト形式に変換して正規表現をつかう、とか?

#3さん、フォロー有難うございます
調べた限りでは unicode では E000~F8FF までの6400文字が
私用領域に充てられているようです。

Qexcelで文字コード(JISコード)を表示する関数ってありますか?

仕事の都合で、JISコードを調べなければならなくなったのですが、
調査対象がいっぱいあって困っています。
excel(に限りませんが、excelが使い慣れているので)の関数などで、
文字コードを返してくれる関数などってありますか?
CODE関数を試してみたのですが(=CODE(山))、循環参照というエラーが出てしまって困っています。
できれば複数の文字(1行単位など)が一度に文字コード変換ができればいいのですが、無理なら1文字ごとでもいいので探しています。
教えてください。

Aベストアンサー

文字列がA1にあると仮定して、

B1に下記数式を記入して、右方向にフィルコピー♪
=IF(ISERROR(CODE(MID($A$1,COLUMN(A1),1))),"",CODE(MID($A$1,COLUMN(A1),1)))

この中で、「COLUMN(A1)」はセル番地を変更しなくていいです。
実際に文字が存在する番地に合わせて変更するのは、
「MID($A$1」 このMIDの右のセル番地だけです。

これでセルに含まれた文字数分、右にコピーすれば
一文字づつコードが返ります。

Qexcelからexcelへの差し込み印刷

お世話になります。

excelでwordへの差し込み印刷をよく利用するのですが、
同様に、
excelのデータをexcelに流し込んで印刷する方法はありますでしょうか。

excelの名簿のデータを
excelの表のフォーマットに流し込んで
1人づつ印刷したいのですが。

お分かりの方いらっしゃいました教えてください。
どうぞ宜しくお願い致します。

Aベストアンサー

イメージはわかるが、エクセルに差込印刷の機能はありません。
ワードなどと違ってA.X氏1人分書類シート作成、B印刷、Aのシートををy氏分のデータでシート内容(セル)を置き換え、印刷、の繰り返しをします。
ーー
例データ Sheet1 A1;D3
連番氏名住所品物
1山田 三郎東京都江東区かばん
2植田 健横浜市港北区帽子
A列はこのたび連番を振りました。
Sheet2   に送り状の書式を体裁よく作ります。
H1セル(どこでも良いが、下記のVLOOKUPの式は変わる)

送り状

住所X
氏名Y

品物Z

上記の品をお送り申し上げます。
ご査収ください

以上
Xの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,2,FALSE)
Yの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,3,FALSE)
Zの場所のセルに =VLOOKUP($H$1,Sheet1!$A$1:$D$3,4,FALSE)

---
結果

送り状

住所山田 三郎
氏名東京都江東区

品物かばん

上記の品をお送り申し上げます。
ご査収ください

以上
ここで
VBE画面で標準モジュールに
Sub test01()
For i = 1 To 2 '人数分
Range("H1") = i
Range("A1:G20").PrintOut '印刷範囲は各人同じとする
Next i
End Sub
を張り付け、実行する。
山田、植田分の紙が2枚印刷されました。
これは質問者はVBAの経験も無いでしょうと、最低限にしてあります。
VBAを勉強してください。
別ブックにある名簿を対象などは複雑になるので避けています。

イメージはわかるが、エクセルに差込印刷の機能はありません。
ワードなどと違ってA.X氏1人分書類シート作成、B印刷、Aのシートををy氏分のデータでシート内容(セル)を置き換え、印刷、の繰り返しをします。
ーー
例データ Sheet1 A1;D3
連番氏名住所品物
1山田 三郎東京都江東区かばん
2植田 健横浜市港北区帽子
A列はこのたび連番を振りました。
Sheet2   に送り状の書式を体裁よく作ります。
H1セル(どこでも良いが、下記のVLOOKUPの式は変わる)

送り状

住所X
氏名Y

品物Z

...続きを読む

Qコード変換について

はじめまして
VB初心者です。
以下のような処理を行いたいのですがご教授願います。

項目A(漢字10文字)があります。
項目Aの中には外字で作成した漢字が埋もれています。

項目Aを参照し、そこにある外字コードを判断し
別の外字コードに変換したい。

ロジック的には1文字(2バイト)を読み込み
外字をバイナリ判定して別のコードに置き換えする
処理をしたい。

当方vb6.0ですが
定義の方法、ロジックなど教えていただければ幸いです。

Aベストアンサー

ASCはShiftJIS コードですが、UNICODEで取得したいのならASCWです。
出力する場合も同様にCHRかCHRWとなります。16進数を使いたいならHEX関数で変換するか、「&hF040」と置き換えれば問題ありません。
単純に下記のようなコードになります。
IF ASCW(x)=-8032 then
Msgbox(ChrW(-8031))
End IF
あるいは
If Asc(x) = &HF040 Then
MsgBox (Chr(&HF041))
End If

ただそれ以前の問題として。
これってF040に登録されている文字を表示する、あるいは「A」という文字がF040に登録されているという情報を得ているだけのことですよ?
あるPC「A」の文字コード"0001"に「あ」という文字が登録されているとしますよね。でもPC「B」の文字コード"0001"は「い」だったりするわけですよ。外字の文字コードに何が入っているかはその機種固有のものなので、F040をF041に変換したところで、どう動作するかはそのPCに登録されている文字次第の話なんですがそれでもよいのでしょうか?

ASCはShiftJIS コードですが、UNICODEで取得したいのならASCWです。
出力する場合も同様にCHRかCHRWとなります。16進数を使いたいならHEX関数で変換するか、「&hF040」と置き換えれば問題ありません。
単純に下記のようなコードになります。
IF ASCW(x)=-8032 then
Msgbox(ChrW(-8031))
End IF
あるいは
If Asc(x) = &HF040 Then
MsgBox (Chr(&HF041))
End If

ただそれ以前の問題として。
これってF040に登録されている文字を表示する、あるいは「A」という文字がF040に登録されているという情報を...続きを読む


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング