エクセルに見えない文字(JISX0211 C0,C1 制御文字?)を表示又は入力させる方法
あるQRコード(1)の内容です。
先頭から
・3ケタ 「番号」 (数字3ケタ)
・1ケタ 「識別子」 0x1E(RS)
・3ケタ 「性別」(数字1ケタ)男=1、女=2
・1ケタ 「識別子」 0x1D(GS)
・4ケタ 「年齢」(数字3ケタ)
・フッタ 0x04(EOT)
すべて固定長。数値は前にゼロ埋め。
となっています。
このQRコード(1)を読込んでエクセルのセルに挿入すると
0121032となります。
これは(番号012、性別1、年齢32)になります。
ですが識別子やフッタが表示されません。
この0121032をQR生成ソフトでQRコード(2)に変換すると
識別子やフッタがないQRコードになってしまい、
QRコード(1)と照合させると相違するQRコードと判定されてしまいます。
QR生成ソフトにはQRコードにできる文字コードとして
制御コード:0x01~0x1F
となっています。
エクセルにこれ(JISX0211 C0,C1 制御文字?)を表示させたり
手入力(文字と文字の間に挿入)させるのは無理なのでしょうか?
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
コピーやペーストで制御文字が欠落するのはよくあることです。
リーダーから直接Excelのセルに入力してたら、もしかしたら制御文
字のあるべきところに1文字分の空白が見えてたかもしれませんね。
場合によってはフォントのデザインで空白が限りなく狭い場合もあ
りますので、len関数で文字数を確認するのがいいかも。
で、確かに制御文字が欠落していて補いたい場合ですが、制御文字
は数式の中でchar関数に10進表記で値を与えて使います。たとえば
0x1Eならchar(30)、0x04ならchar(4)ですね。これで添付画像の様に
新しい文字列を生成してやってみてはいかがでしょう。
No.2
- 回答日時:
ふつう,制御コードは表示されません。
手入力でこれで入るが,表示はされません。="012"&CHAR(30)&"1"&CHAR(29)&"032"&CHAR(4)
数多くあるなら,VBAですね。
Sub test()
s = ActiveSheet.Range("A1").Value
s = Left("0" & s, 7)
s1 = Left(s, 3)
s2 = Mid(s, 4, 1)
s3 = Right(s, 3)
s = s1 & Chr(&H1E) & s2 & Chr(&H1D) & s3 & Chr(&H4)
ActiveSheet.Range("A1").Value = s
End Sub
のようでしょうか。
項目が30種類で項目ごとにGSを入れないと元のコード同様にならないみたいです。
マクロしかないですか。
ちょっと難しそうです。
どうもありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
QRコード作成で質問です。
その他(パソコン・周辺機器)
-
バーコードに制御文字を入れるには…
その他(パソコン・周辺機器)
-
制御文字[エンター]だけのQRコードを作成したいです。
画像編集・動画編集・音楽編集
-
-
4
バーコードリーダー だけで Enterキーを押すことはできますか?
その他(パソコン・周辺機器)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
フィルターかけた後、重複を除...
-
アクセスVBAのSQL文の記述の仕...
-
GrapeCityのSpreadについて
-
JANコードとPOSコードは同じ?
-
1日に1人がこなせるプログラム...
-
オブジェクトファイルのファイ...
-
ACCESS VBA ヘッダなしCSVの入...
-
特定行の背景色を変えたいのですが
-
QRコードの印刷
-
ASCIIコード表の出力
-
コマンドボタンを押したときに...
-
美しいソースとは?
-
VBAでファイルオープン後にコー...
-
エクセルに見えない文字(JISX0...
-
COBOLの文法
-
アスキーキャラとは?
-
JavaScriptの定数名が取り消し...
-
Nullの使い方が不正です。
-
ActiveReportの改ページ不具合...
-
VB6.0で製作中の「もぐらたたき...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
フィルターかけた後、重複を除...
-
JANコードとPOSコードは同じ?
-
access2003 クエリSQL文に...
-
1日に1人がこなせるプログラム...
-
オートフィルタで抽出結果に 罫...
-
変数名「cur」について
-
JavaScriptの定数名が取り消し...
-
ACCESSユニオンクエリでORDER B...
-
Exel VBA 別ブックから該当デ...
-
UWSCでMOUSEORG関数が上手く処...
-
COBOLの文法
-
PreviewKeyDownイベントが2回...
-
1、Rstudioで回帰直線を求める...
-
VBAでファイルオープン後にコー...
-
【VB6】実行ファイルとした後、...
-
Nullの使い方が不正です。
-
特定行の背景色を変えたいのですが
-
◾️Excel VBA 統合について Cons...
-
アルファベットに付いて質問し...
-
Excel VBAでOpenTextのFieldInf...
おすすめ情報