- ベストアンサー
エクセル VBA
初歩的なことですいません。 自分で作った外字をVBAで扱いたいのですが、 どうすればよいのでしょうか。 Chr()の中に数字を入れればいいのでしょうか。 そうとしても、どんな数字を入れればよいのでしょうか。 たとえば、シフトJISで f040 の文字を作ったとします。 それをVBAで呼び出す方法をどなたか教えてください。 よろしくお願いしまーーーす。
- MrTakuya
- お礼率96% (48/50)
- その他（プログラミング・開発）
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
＞たとえば、シフトJISで f040 の文字を作ったとします。 その外字が「●」だったとすると MsgBox "●" のように直接ＶＢＡの中に記述するか、 MsgBox Chr("&H" & "F040") というように、コードの先頭に「"&H" & 」を付けて10進数に変換したものを [Chr 関数] で外字に変換できます。 いずれにしましても、画面に表示される文字はお使いのパソコンに依存します（機種依存文字）。
関連するQ&A
- エクセル VBA
いつもお世話になっております。 エクセルでVBAで外字の出し方はわかったのですが、 その和算とかは、どうすればよいのでしょうか。 たとえば F040 を出すとき MsgBox Chr("&H" & "F040") で変換した文字を出したとします。 その2つとなりの F042 を出したい時、 "&H" & "F040" + 2 の方法が、知りたいのですが、 どなたかよろしくお願いいたします。
- ベストアンサー
- その他（プログラミング・開発）
- 外字の除去方法
WindowsXP(SP2) VisualBasic6.0(SP6) を使って開発をしています。 現在、文字列から外字を除去するプログラムを作っています。 S-JIS（F040～F9FC）にあたる外字を除去する方法は分かったのですが、Unicode（E000～F8FF）にあたる外字を除去する方法が分からず困っています。 ご存知の方がいましたら教えてください。 宜しくお願いします。 （追伸） ↓↓S-JIS外字を除去する場合------------------------------------- Public Function DeleteGaiji(strText As String) As String Dim Reg As New RegExp Reg.Pattern = "[" & Chr(&HF040) & "-" & Chr(&HF9FC) & "]" Reg.Global = True DeleteGaiji = Reg.Replace(strText, "") End Function 上記の方法でS-JIS外字を除去しようと思っています。 Unicodeの場合は、 Reg.Pattern = "[" & Chr(&HE000) & "-" & Chr(&HF8FF) & "]" とすれば良いのでしょうか？ 別の表現方法があるのかなと思って、悩んでいます。
- 締切済み
- Visual Basic
- Excel VBAで、「"」を表示するには？
お世話になります。 Excel VBAで、「"」を文字列の中に含めるにはどうしたら良いのでしょうか？ たとえば、Msgboxで「答えは"５"です」のように表示させたい場合です。 chr()を使う方法は分かるので、それ以外の、より簡単な方法があれば教えてください。宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel Ｘｐ で外字が使えない？
外字を作成したのですが、ＥＸＣＥＬ／ＸＰだと、文字（シフトＪＩＳ）コードで Ｆ１４０ から以降が ハングル文字のような文字が出てきています。 Ｆ０４０からＦ０ＦＣまでは使用できています。 ＥＸＣＥＬでも２０００ではキチンと表示されますし、ＸＰでもｗｏｒｄでは正常に使用できます。 ＥＸＣＥＬ／ＸＰの特有の機能追加の所為だと思うのですが、外し方が分りません。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- EXCEL VBAにて、WORDへ置換
EXCEL VBAにて、WORD文書への文字列置換を行っております。 文字列の置換自体はできています。 が、 置換文字列に「改行」(vbCRやvbLF）をいれて置換すると、 word側での表示が□になってしまいます。 vbCrだけでもvbLFだけでも、vbCRLFでも□と表示されてしまいました。 chr(13) & chr(10)でも□になりました。 EXCEL VBA にて WORDへ文字列置換する場合に送る、改行コード （たぶん「^p」と予測をつけているのですが）を chr関数等での 表示方法を教えてください。 EXCEL2003 WORD2003 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 外字神社のリンク解除について
外字神社のフォントをインストールして、外字エディタのフォントのリンクも無事設定できたのですが、シフトJISコードで入力した字が、リンクで表示されているとおりの字ではなく、文字化けして出力されるので、やむなく外字のリンク解除をマニュアル通り行いました。そこで、自分で外字を作ってシフトJISコードで入力したのですが、自作してコード上に表示されている外字ではなく、リンク解除前の文字化けした字が出力され、解決策がわかりません。 初歩的な質問かもしれませんが、リンクの解除方法など解決策をご存知でしたら宜しくお願い致します。（ちなみにＯＳはビスタです。）
- 締切済み
- フリーウェア・フリーソフト
- 外字の登録
会社で使用する外字の登録をシフトＪＩＳコードＦ１４０～Ｆ４ＦＦに登録しているのですが、ＭＳゴシックとＭＳ明朝のみ外字がうまく表示されません。（他のフォントでは表示されます。）まったく表示できないというわけでなく、シフトＪＩＳコードＦ１４０のところに外字を登録しているはずなのに、違う文字が表示されてしまいます。（Ｆ１４０だけでなく、ところどころ登録している外字と違う文字になってしまいます。） なにか違うフォントが邪魔しているのでしょうか？ ちなみに外字の登録は、外字エディタからビットマップフォントの取り込み→古い外字フォントの取り込み→USERFONT.FON→ＯＫでやっています。 もし対処法がわかる方がいらっしゃいましたら教えてください。よろしくお願いします。 ちなみにノートパソコン（FUJITU）で、ＯＳはＸＰProです。
- ベストアンサー
- その他（ITシステム運用・管理）
- EXCELのVBAの数字。
VBAで「Maisuu」に応じて、セルに表示される数字を制御するようにして有ります。 If iMaisuu > 1 Then suuji = Chr(48 + pg) End If というようなかんじにしてあるのですが、10を超えると数字が出なくなってしまいます。 これを回避するにはどうしたらいいのでしょうか？ Win・Ex2000です。
- ベストアンサー
- オフィス系ソフト
- 外字エディタで作った文字が文字化けする
外字エディタで作った文字が、ワードにうちこむと中国語の簡体字のような文字に変換されます。 作成した文字は、勉強の「勉」の力を「日」に置き換えた文字です。 「ばん」と読ませたいと考えています。 IMEパッドの「シフトJIS－外字」の0×F040、０のところに この文字を表示させることはできました。 使用しているワードは2007です。 よろしくお願いいたします。 この文字をワードで使うにはどうしたらよいのでしょうか？
- 締切済み
- オフィス系ソフト
- エクセル2003 VBAなのですが
エクセル2003 VBAなのですが A B C D E F 1 あ い う お う 123 2 お さ え あ お お 3 あ い え お え 888 上記のような表があるときに 3個以上同じ文字がある場合にセルに色をつけていきたい状況です 上記表でいうと『あ』と『え』と『お』のセルに色をつけたいのです セルには文字列のほかに数字も入っている状況です 単純にCtrl+Fで検索をして『すべて検索』で 出てきたセル全部に色をつける。 それをA1から文字があるところ全部やる と言った事をマクロでやりたいと思っております。 皆様よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
お礼
できました。ありがとうございました。 参考にさせていただきます。 また、よろしくお願いいたします。