エクセルの質問です。

セルの書式設定→ユーザ定義で「00000」とすればいいのではないですか？

=RIGHT(TEXT((A1+100000),0),5)

でどうですか？

一旦数字に10万を加え、TEXT関数で文字列化して、右５ケタの文字を拾います

セルの書式設定→ユーザー定義→種類を「######000000」と設定してみてはいかがでしょうか。（でも、文字列にはなりませんね…）

変換自体には「TEXT」関数が便利かと存じます。

A1セルに「100」が入っているとした場合、下記の手順を踏めばよいです。

１）任意のセル（B1とします）に式を入力。

=text(A1,”00000”)

→B1セルに「00100」と表示されます

２）このままですと単に式の結果でしかありませんので、もしA1の値が消えてしまうとB1の値が保たれなくなってしまいます。

B1のセルの値自体を「’00100」とするためには、

B1を選択してコピー→形式を指定して貼り付け（「値」を指定）を選択し、OKを押すと、A1に入っていた「100」が「00100」に変換されます。

※ここまでの操作が終わればA1を消去しても問題ありません。

少々邪道かもしれませんが(^_^.)

A1=100として、

B1=”’”&(A1,”00000”)

を入力したファイルをテキスト形式にて保存。

(カンマ区切りでなくタブ区切りで。CSVは不可です)

保存したテキストファイルを一旦閉じ、

再度Excel画面よりファイルオープンする。

すると「テキストファイルウイザード」が起動するので、そのまま完了ボタンをクリック。

　 |　　A | 　 B

--------------

1　| 100 | ’00100

と表示されるので、B1セルをダブルクリック。

すると、データとしては「’00100」、表示は「00100」になるかと思います。

>「’00100」と「00100」は別物ではないですか？

”’”は入力データを文字列に定義する場合に使用します

また、TEXT()のコマンドは、数値を指定したレイアウトの文字に変換するコマンドです。

どちらも同じ文字列になります。

TEXT関数を利用するとよいでしょう

例えば、A1セルに対象の数値があるのであれば

B1セルに =TEXT(A1,”00000”)

のように記述してください

自動的に文字形式になります

B1セルに =TEXT(A1,”’00000”)

にした場合は、頭に ’がくっついてしまいます

(CSVで保存する場合はこれでいいかも）

あとは、それを適用したい列に対してドラッグして、コピー→形式を指定して貼り付け

「値」にチェックをして上書きすれば

全ての数値が５桁の表示になります

もしも、数値形式のまま ’00100にして なおかつ表示は 00100にしたいのであれば、Macroを使わなくてはいけません

ツールバーのVisualBASICをチェックして

▽定規のアイコンを押したあとVisialBASICEditorという四角いアイコンをクリックするとプログラムを編集できます

Private Sub CommandButton1_Click()

' 変換する桁を指定

    X = 1

    For i = 1 To 5:  ' この場合は１から５行を変換

    Cells(i, X).Value = "'" & Right("00000" & Cells(i, X).Value, 5)

    Next

End Sub

Private Sub CommandButton2_Click()

' 変換する行を指定

  Y = 1

    For i = 1 To 5:  ' この場合は１から５桁を変換

    Cells(Y, i).Value = "'" & Right("00000" & Cells(Y, i).Value, 5)

    Next

End Sub

これは行と列そそれぞれ１～５つめまで変換するものです

http://www.hatena.ne.jp/1138949258①:detail]

①セルの書式設定で表示形式を文字列にする

②置換「100」→「’00100」で全置換

これだけで画面での表示は00100になりますよ。

ダメでしょうか？

http://www.hatena.ne.jp/1138949258②:detail]

どこかのセルが100の値のときに別のセルで’00100で拾いたいのでしょうか？

その場合は、別シートに参照表を作ってお区と良いです。

①別シートのB列のセルの書式設定を文字列に変更。

②A1に100、B1に’00100を入れる。

③もとのシートで’00100に変換したいセルに=VLOOKUP(＄100の入っているシート,参照するシート名!A1:B1,2,FALSE)と入力。

これで、このセルをコピーしたところが’00100と表示されます。

やりたい事がやっと解りました。

以下の例だと数値入力の右のセルに希望の文字列をセットします。

Private Sub Worksheet_Change(ByVal Target As Range)

Application.EnableEvents = False

Cells(Target.Row, Target.Column + 1) = Format$(Target, ”’00000”)

Application.EnableEvents = True

End Sub

http://www.hatena.ne.jp/1138949258・・・orz:detail]

5番にて回答したものです。すみませんでした。

焦ってコピペを間違えてしまいました…。

B1=”’”&(A1,”00000”)

　　　　↓

B1=”’”&TEXT(A1,”00000”)

尚、”’”の「’」は半角です。

dhalmelさんの回答を、一部訂正させていただきます。

＞１）任意のセル（B1とします）に式を入力。

＞=text(A1,”00000”)

↓

=”’” & TEXT(A1,”00000”)

あとはdhalmelさんの回答どおりで、いかがでしょうか。

A1に100が入っているとして

TEXT(A1,”00000”)

とし、

コピー→形式を選択して貼り付け→値

で可能です。

「’00100」と文字型の「00100」は全く同じ意味です。前者は書式設定をしていないセルに文字型で簡単に入力する手法とお考え下さい。