エクセル2002 文字列で作成のセルを標準に

質問

エクセル2002　　5000行程の参照シートからVLOOKUPで検索した数値を表にし合計をする作業をしています。参照シートは全てを文字列に設定したものです。☆(゜o゜
（多分0を入れたい為　全てを文字列設定にしています）。

上記シートをVLOOKUPで検索した数値をはりつけると　すべて文字列になっています。
・元シートのせいか？
・私の設定方が悪く　何かミラクル設定方法があるのか教えて下さい。

書式設定で標準に戻しても　関数入らず（そのセルさえ文字列になっています）
区切り位置　→　完了で訂正しますが　シート全体を　書式設定　標準にでき　関数が入る方法はないでしょうか？

修正すると・・・文字列に戻っていたりします。

説明下手で申し訳ありませんが　いい方法があればご教授お願いします。

回答No.3

tom04 · ベストアンサー

こんばんは！

参考になるかどうかわかりませんが・・・
VBAで範囲指定したセルが文字列で数値の場合、
セルの表示形式は「標準」にして数値データにするようにしてみました。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面がでますので、
範囲指定をした後にマクロを実行してみてください。
（Alt+F8キー　→　マクロ　→　マクロ実行です）

Sub test() 'この行から
Dim c As Range
Application.ScreenUpdating = False
For Each c In Selection
If c <> "" And IsNumeric(c) And c.NumberFormatLocal = "@" Then
With c
.NumberFormatLocal = "G/標準"
.Value = c * 1
End With
End If
Next c
Application.ScreenUpdating = True
End Sub 'この行まで

※　一旦マクロを実行すると元に戻せませんので、別Sheetでマクロを試してみてください。
※　必ず範囲指定してマクロを実行します。

お役にたてば良いのですが・・・m(_ _)m

回答No.4

imogasi

質問者の思考が不適当な方に向いていると思う。
質問にはデータと関数の例を挙げてほしい。
（１）参照シートのデータ例
（２）ＶＬＯＯＫＵＰ関数を入れているシート
について
（１）は検索列と引っ張ってくる値の例、それぞれのセルの表示形式
（２）のＶＬＯＯＫＵＰ関数式を入れているセルの表示形式
の実例を数行分でも判るから、挙げて質問すべきでは。
（２）のセルの列合計を求めたいのだよね。
＞参照シートは全てを文字列に設定したものです
なぜそうするか判らないが、
それでも結果に*1(1を掛ける）で数値化するのでは。
=VLOOKUP(・・・・)*1

回答No.2

mu2011

>・元シートのせいか？
　⇒その通りと思います。
　　「0を入れたい為」の理由が良く分かりませんが、元シートの抽出列を標準又は数値に
　　すべきと思います。

　　仮に参照先シートの抽出列で有効数字以上の桁に「０」を表示したいという事ならば、
　　セルの書式設定で表示形式をユーザ定義で桁数分の「０」を設定するとか、
　　又は、数値を文字列にTEXT関数等で変換しては如何でしょうか。

お礼

回答ありがとうございました。

年明け　色々と試してみます。ありがとうございました。

補足

回答ありがとうございます。
ワープロのようにエクセルで作表されているため　文字列にされているのだと思います。
(見栄えのみで　表計算など念頭にない方が作成されているのです。)

参照元は　訂正できないので　はりつけた表で　なんとかならないのかと・・・
自分用にコピーしても　参照元が変動するので不可なんです。

回答No.1

damejan3988

=参照したいデータの先頭のセル*1（掛ける１）　の数式を入れて、セルの書式設定で標準を選んでentreしたらどうですか？

あとはドラッグコピーでどうでしょう？