![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
直接の回答ではありませんが、
どのようなシチュエーションでこのような事がしたいのかお書きになった方が
的確な回答が得られると思います。
末端の状況でチマチマ対応するより、上流で変換してしまった方が楽な時もありますので...
No.3
- 回答日時:
エクセル関数は無いようなので、本件はユーザー関数が最適でしょう
VBEの標準モジュールに
Function h2c(A)
p = Split(A, " ")
s = ""
For i = 0 To UBound(p)
s = s & Chr(Val(p(i)))
Next i
h2c = s
End Function
を入れる。
空白で分離し、数値化して、VBのCHR関数で文字化するだけ。
ーー
例データ
A列 B列
97 98 ab
99 100 101 cde
98 112 115 bps
B1セルに
=h2c(A1)
と入れて下方向に式を複写。
結果上記のとおり。
No.2
- 回答日時:
No.1
- 回答日時:
まず最初に質問に書かれている数字は10進です。
16進ではありません。ワークシート関数で「97」を「a」に変換するなら=CHAR(97)
という関数を使用しますが、文字列長も不定で、しかも10進を使用しているのでコードの桁数も1桁~3桁と不定になってしまいます。
16進数なら2文字ずつ取り出してCHAR関数で文字列にするのが多少楽ですが、それでもも関数だけで実現するのはかなり大変だと思いますので、やはりマクロでユーザ定義関数を作成するのが良いと思います。
以下はサンプルですが、10進文字コード間は半角スペースで区切られていることを前提にしています。また対応する文字コードがない場合のエラー処理は組み込んでいません。必要に応じて追加してください。
(ダンプコードを読む人ならそれくらいして欲しいと思います)
Function DecToChr(ByVal trg As Range) As String
Dim dec() As String
Dim idx As Integer
dec = Split(trg.Value, " ")
For idx = 0 To UBound(dec)
DecToChr = DecToChr & Chr(Val(dec(idx)))
Next idx
End Function
(使用例)A1セルに
97 98
が入力されているとき、任意のセルに
=DecToChr(A1)
なおマクロは標準モジュールシートに貼り付けてください
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Visual Basic(VBA) ファイル名の右側を変更したい ファイル名:「1001日別売上」の左側へ「2022」を追加し、「202 6 2022/10/14 10:03
- Visual Basic(VBA) 入力ボックスが繰り返しポップアップして止まらない。 下記コードでファイル名の変更をしたいのですが、変 1 2022/09/08 11:27
- Visual Basic(VBA) VBA B列にある前から10文字のみ表示 3 2023/08/07 11:24
- その他(コンピューター・テクノロジー) 【Tableau Desktop】文字列から8桁の数字を日付型(yyyyMMdd)として取得 1 2023/07/31 10:17
- その他(プログラミング・Web制作) テキストエディタで複数行にわたる文字列の行頭に番号を振る方法 4 2023/03/11 12:57
- フリーソフト フォルダ、ファイル名の一括変換について 3 2023/03/16 09:23
- その他(プログラミング・Web制作) python質問 1 2023/08/14 11:54
- Visual Basic(VBA) VBAで、特定の文字より後を削除して残った数値を文字列に変換と特定の文字より前も削除したい 3 2022/04/15 19:21
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access レポート印刷するときに...
-
実行時エラー3131 FROM 句の構...
-
accessクエリで直前の水曜日〜...
-
【至急・画像あり】建物or住所...
-
Accessのテキストボックスの入...
-
access2021 強制終了してしまう
-
ms access 2013で、チェックボ...
-
Accessのクエリの結果を、既存...
-
Access VBA [リモートサーバー...
-
Accessのデータ型の日付/時刻型...
-
Microsoft365にAccessってあり...
-
DoCmd.SearchForRecord が動か...
-
access レポート 請求書について
-
アクセスのレコードをフォーム...
-
Access runtimeでのオプション...
-
Accessが強制終了する理由はな...
-
ACCESSのレポートにフォームの...
-
access2021 更新前に処理をしたい
-
access2021 VBA メソッドまたは...
-
【世界はデータで出来ている】...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
数値をASCII文字にする方法につ...
-
カンマの含まれる文字列の数値...
-
16進数の文字列をアスキーコー...
-
マクロで半角を全角に
-
VC++ マルチバイト文字とUniCod...
-
fgetws関数で読み込んだUNICODE...
-
iPhoneの絵文字をWebサイトに表...
-
16進数の文字列を10進数の数値...
-
外字を削除したい
-
サロゲートペア文字の半角カナ...
-
文字数が決まっていないの文字...
-
絵文字のフォーム入力について
-
マージ型文字列のデリミタ2文...
-
VB6 機種依存文字の変換
-
シフトJIS⇒MIMEエンコード(RFC2...
-
1バイト文字の上位4ビット・...
-
Excel VBAの数値変換
-
SQLインジェクション対策で、エ...
-
c言語 文字 - '1'+26
-
特殊な文字列のデコードについて
おすすめ情報