■　　　　　な　ー　る　ほ　ど　！　Ｖ　Ｂ　Ａ　　　　　■ 読者数 18,277名
→ご意見・ご感想をお待ちしております。             　　(2007.08.23)


======================================================================
Ｑ．\20,000,000を\20,000と表示したい
======================================================================

例えば、A,C,Eというような感じで列を指定し
\20,000,000を\20,000と表示したいのですが、
VBAで変換可能でしょうか

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Ａ．
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

いくつか方法が有りますので，ご希望に合ったものをお選びください。

（１）　表示形式で変えるなら，
Sub test1()
Range("A:A,C:C,E:E").Select
Selection.NumberFormatLocal = "#,##0,"
End Sub


（２）下３桁を削るなら
Sub test2()
Dim c As Range
On Error Resume Next
Range("A:A,C:C,E:E").Select
For Each c In Selection.SpecialCells(xlCellTypeConstants, 23)
    c.Value = Int(c.Value / 1000)
Next
End Sub


　　　　　　　　　　　　　　　　　　　　　　　　　　（ふじお）


───<お知らせ>───────────────────────────

　◇　役に立った。気になっていたことがわかって、すっきりした。などなど
　　　些細な事でも結構ですので、ぜひお聞かせ下さい。
　　　執筆者一同、お待ちしております。
　　　http://www.na-ruhodo.com/comment/index.html


　◇　なーるほど！ドットコムでは、このメルマガに取り上げてほしい質問を
　　　常時、募集しています。
　　　疑問に思うことやわからないことありませんか？
　　　特に、つまづきがちな初心者の方からのご質問をお待ちしています。
　　　http://www.na-ruhodo.com/question/index.html


　◇　ＣｏｍｂｚＭａｉｌ(コンビーズメール)　http://www.combzmail.jp/

　　　メール配信ＡＳＰ業界で最安値帯を実現！ 
　　　ＣｏｍｂｚＭａｉｌは、月２３００円で５万部配信より

　　　なーるほど！ドットコムはＣｏｍｂｚＭａｉｌの配信システムを
　　　利用しています。メルマガ発行者が開発したシステムだから、
　　　かゆいところに手が届く便利な機能を搭載！業界最安値！


───────────────────────────────────


**********************************************************************

　◇　なるほど！シリーズも、ぜひお読みください。
      http://www.na-ruhodo.com/procedure/index.html

　　　ＰＣ向けＴＥＸＴ形式　なるほど！ＷＩＮＤＯＷＳ
　　　　　　　　　　　　　　なるほど！インターネット
      　　　　　　　　　　　なるほど！ホームページ 
        　　　　　　　　　　なるほど！ＷＯＲＤ
        　　　　　　　　　　なるほど！ＥＸＣＥＬ
        　　　　　　　　　　なるほど！ＡＣＣＥＳＳ
        　　　　　　　　　　なるほど！ＶＢＡ


　◇　ＣｏｍｂｚＭａｉｌ最新情報はこちら
      http://www.combzmail.jp/?c=about&o=index#mg


----------------------------------------------------------------------
◆メールマガジン発行人と登録解除方法に関する表示◆

　◇発行人サイト　なーるほど！ドットコム　http://www.na-ruhodo.com/

　◇発行会社　　　株式会社コンビーズ　　http://www.combz.jp/

　◇お問い合わせ　http://www.na-ruhodo.com/contact/index.html

　◇登録・解除　　http://www.na-ruhodo.com/procedure/index.html

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

このメールマガジンの内容により損害を被った場合、一切の責任を負いかねま
す。このメールマガジンの著作権は、なーるほど！ドットコムに帰属します。一
部を改変または無断で転載掲示するなどの一切を禁止します。 

                        Copyright(C)1998-2007
           なーるほど！ドットコム  http://www.na-ruhodo.com/