12345を一万二千三百四十五のように表示したいのです。
関数ででも、表示形式ででも結構です。
再変換せずに処理する方法はないでしょうか?

ちなみにExcel2000です。

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

A 回答 (2件)

NUMBERSTRING関数を使います。

NUMBERSTRING関数の第二引数には1から3の数字を指定することができます。
A1セルに「123」が入っている場合。
=NUMBERSTRING(A1,1)で「百二十三」
=NUMBERSTRING(A1,2)で「壱百弐拾参」
=NUMBERSTRING(A1,3)で「一二三」
値のみを複写することで漢数字を文字列としてコピーすることもできます。

または、「書式」-「セル」の「表示形式」のユーザー定義で、[DBNum1]G/標準 を指定すると「百二十三」と表示されます。[DBNum2]G/標準 なら「壱百弐拾参」となります。
    • good
    • 0
この回答へのお礼

ありがとうございます。
この関数は「関数貼り付け」には入っていないので手入力するのですよね。たいへん助かりました。

お礼日時:2001/11/05 16:07

[DBNum1]G/標準


を表示形式に設定して下さい。

他にも[DBNum2]G/標準、[DBNum3]G/標準、[DBNum1]0、[DBNum2]0、[DBNum3]0
等、いろいろな表示が出来ますので、機会があればためして下さい
    • good
    • 0
この回答へのお礼

ありがとうございます。
漢数字でこんなに多種類の表示形式が選択できるなんて便利ですね!

お礼日時:2001/11/05 16:05

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

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

QEXCELの表示形式にある「C.A.P.」とは何でしょうか。ちなみに、

EXCELの表示形式にある「C.A.P.」とは何でしょうか。ちなみに、同一画面内のロケール(国または地域)(L:)には「イタリア語(イタリア)」と設定されております。EXCELのヘルプ、ネットで探したのですが見つかりませんでした。

Aベストアンサー

イタリアの5桁の郵便番号のことのようですね。

イタリアの郵便番号
http://ja.wikipedia.org/wiki/%E3%82%A4%E3%82%BF%E3%83%AA%E3%82%A2%E3%81%AE%E9%83%B5%E4%BE%BF%E7%95%AA%E5%8F%B7

QExcel2000の表示形式で・・

Excel2000の セルの表示形式のユーザー定義について教えてください。
桁数の多いセルの表示単位を千にするには、#,#, または#,###,などでできますよね。
それでは、表示単位を 万や百にはできないのでしょうか?
よろしくお願いします。

Aベストアンサー

質問の主旨にあっていないかもしれませんが・・・・
1.例えば10000で割って、ユーザー定義で書式を#,###"万"にしては?
2.同じようですがユーザー定義関数です。入力と出力が異なっていれば使える?一旦変換すれば数値として使えません。
'=======================
'万円単位で表示する関数
'=======================
Public Function Tan100manen(vGaku As Long)
Application.Volatile
Tan100manen = Format(Int(vGaku / 10000), "#,#") & "万"
End Function

'=======================
'100円単位で表示する関数
'=======================
Public Function Tan100en(vGaku As Long)
Application.Volatile
Tan100en = Format(Int(vGaku / 100), "#,#") & "百"
End Function

3.Worksheet_Changeを使って・・・(大事なシートに使用しないで、新しいシートで試してください)
Sheet1に貼り付けてください。(モジュール)
Sheet1のC列に入力すると万表示するようにしてあります。
'************************************************
'ワークシートのC列に値の変更があった場合、万円表示にする
'************************************************
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo ErrorTrp

Application.EnableEvents = False
If Target.Column = 3 Then
Target = Format(Int(Target.Value / 10000), "#,#") & "万"
End If
Application.EnableEvents = True

Exit Sub

ErrorTrp:
Application.EnableEvents = True
End Sub

質問の主旨にあっていないかもしれませんが・・・・
1.例えば10000で割って、ユーザー定義で書式を#,###"万"にしては?
2.同じようですがユーザー定義関数です。入力と出力が異なっていれば使える?一旦変換すれば数値として使えません。
'=======================
'万円単位で表示する関数
'=======================
Public Function Tan100manen(vGaku As Long)
Application.Volatile
Tan100manen = Format(Int(vGaku / 10000), "#,#") & "万"
End Function

'=======================
'...続きを読む

Qユーザー定義の表示形式の設定について 数値の表示形式

#と0との違いは理解できるのですが、
「#,##0,」 がなぜ1000で割って小数点以下を四捨五入して表示する。(千単位で表示)
を意味するのかがわかりません。
入力データ 12345678
表示結果  12,346
となるとテキストにあります。
12,345,678ではないのでしょうか?

お分かりになる方 ご教授くださいm(__)m

Aベストアンサー

実際に「#,##0,」を設定し、12345678を入力すると 12,346になりますね。
こちらに詳しく説明されています。
https://allabout.co.jp/gm/gc/297804/3/

QエクセルIF関数の質問です。条件1、処理1、条件2、処理2、それ以外の処理の式をご指導願います。

A3セルに、
条件1、もしL4>S4ならば、式1((L4*10-S4*10)+V4)/V4*100 を実行する。
条件2、もしL4<S4ならば、式2(V4-(S4*10-L4*10))/V4*100 を実行する。
条件3、もしI4=""ならば、式3(V4-(S4*10))/V4*100 を実行する。
 ただし、条件1、2ともI4には数値の記入があるときとします。

以上の式を考えていますが、なかなかうまくいきません。
どなたかご教授ねがえませんか?

Aベストアンサー

あなたの式をそのまま、すなおに書いてみました。
=IF(I4="",(V4-(S4*10))/V4*100,IF(L4>S4,((L4*10-S4*10)+V4)/V4*100,(V4-(S4*10-L4*10))/V4*100))

但し、L4>S4の場合、式1、そうでない場合、式2となっています。(式2はL4=S4のケースも含んでいます)

QExcel(2000)形式のファイルを一括でタブ区切りテキストに変換

Excell形式の複数のファイル(あるフォルダの中にある全てのxlsファイル)を一括で、タブ区切りのテキストファイルに変換する必要があります。

このような操作をできるツールまたはマクロを教えていただけませんでしょうか。

ExcelはExcel2000を使っています。

Aベストアンサー

こんにちは。

お使いのWindowsのバージョンがわからないので使えるかどうかわかりませんが、excel2txt.vbsはどうでしょうか。

参考URL:http://www.vector.co.jp/soft/win95/business/se259640.html


このカテゴリの人気Q&Aランキング

おすすめ情報