Excel 2007のマクロ記述について

質問

Excel 2007で、B4セルからＩ最終行までの整数のみを小数点以下１桁にする処理をマクロで実行したいのですが、どのように記述したらよいか教えてください。
最終行とはＩ列にセルの値がある最後の行です。

下記の例のマクロ実行結果は、1→1.0、2→2.0となります。

（例）
　　　　　列
　　　　　A　　B　　　　C　　　　D　　　　E　　　F　　G　　　H　　I　　　　J　　　　　　K
　行4　　A1　0.9　　　0.9　　　0.9　　　0.9　　1.2　　1.2　　 2 　2　　　CIRCLE　　CIRCLE
　　 5　　A2　1.4　　　1.4　　　1.6　　　1.6　　 1　　　1　　1.5　　1.5　　CIRCLE　　CIRCLE
　　 6　　A3　0.71　　0.71　　 0.71　　0.71　　1　　　1　　1.5　　1.5　　CIRCLE　　CIRCLE

マクロ実行結果
　　　　　列
　　　　　A　　B　　　　C　　　　D　　　　E　　　F　　G　　　H　　　I　　　　J　　　　　　K
　行4　　A1　0.9　　　0.9　　　0.9　　　0.9　　1.2　　1.2　　2.0　　2.0　　CIRCLE　　CIRCLE
　　 5　　A2　1.4　　　1.4　　　1.6　　　1.6　　1.0　　1.0　　1.5　　1.5　　CIRCLE　　CIRCLE
　　 6　　A3　0.71　　0.71　　 0.71　　0.71　　1.0　　1.0　　1.5　　1.5　　CIRCLE　　CIRCLE

回答No.1

imogasi

>マクロ実行結果
マクロのコードは出来ている風に読めるが、まだ出来てないのでしょう？紛らわしい。
ーーー
質問者はセルの値と、表示形式をセルに適用後に、セルに見えている状態の違いを理解できているのかな？。
0.71はそのまま、2は2.0にするのは、全範囲指定の一律の表示形式の設定では出来ないのでは。
--
従って、毎（各）セルについて小数点つき数かどうか（VBAで）判別し、整数の場合は表示形式を小数点以下１けたに設定するほかない。
これはセルの値を必要があって小数点つき数から整数に修正入力したりしたら連動しないので、おかしくなる。
ーー
この件は先日質問に答えたと思うがどうなったのかな。
そのコードが実行して意図どおりにならなかったのかな。同じ内容の別質問は避けて、回答があったお礼欄の補足にでもしてほしい。
＞最終行とはＩ列にセルの値がある最後の行です。
これをコード化するのが質問か？