2017-02-03 6 views
-2

不連続列を書式化する必要があります。私の列はEND(xl.Down)を使って定義されています。私は範囲を定義した後、以下を使用しています。VBA形式不連続列

For Each rCell In MyRange   
    rCell.NumberFormat = "0.00"  
Next rCell 
+0

I 'rCell'と' MyRange'が正しく宣言され、 'MyRange'が正しく設定されていれば、コードに間違いはありません。おそらく、あなたが 'MyRange'を設定するために使用しているコードを質問に含めると、現時点で何が動作していないのかを言うなら、おそらく最適でしょう。 – YowE3K

+0

これは問題ではありません。失敗したエラーや動作を投稿してください。 – awiebe

+0

'MyRange.NumberFormat =" 0.00 "' –

答えて

0

使用終了(xlup)の代わりにxldownの一番下のセル を見つけるために(あなたがそれに基づいて範囲を設定するための準備として、列Aの最大行を見つけていると仮定)

rMax = Cells(Rows.Count,"A").End(xlUp).row