[[20120509172419]]　『マクロで文字列に直接変換？』（YMO）　ページの最後に飛ぶ

『マクロで文字列に直接変換？』（YMO）

 （2010、xp）
 いつもお世話になります。
 マクロの記録をして、下記のマクロをつくりました。
 アクティブシートはsheet2です。
 sheet2のCells(1, 2)には3.2346435となっています。
 これを、文字列で小数点以下2桁にすることは出来ますでしょうか？
 マクロで直接3.23（文字列）としたい。
 今は他のセルに「=TEXT(B1,"0.00")」として変換しています。
 宜しくお願いします。

 Sheets("sheet1").Cells(1, "A").Copy
 Cells(1, 2).PasteSpecial Paste:=xlPasteValues

 レスが付かないようなので叩き台を。

  With Cells(1, 2)　
     .NumberFormatLocal = "@"
     .Value = Format(Sheets("sheet1").Cells(1, "A").Value, "0.00")
  End With
　
 ちなみに私なら Rangeプロパティを使います。

  With Range("B1")　
     .NumberFormatLocal = "@"
     .Value = Format(Sheets("sheet1").Range("A1").Value, "0.00")
  End With
　
（純丸）(o^-')b

 提示して戴いたマクロでできそうです。
 （純丸）さん有難う御座いました。
 （YMO）

コメント返信：

[ 一覧(最新更新順) ]

[[20120509172419]] 『マクロで文字列に直接変換？』（YMO） ページの最後に飛ぶ

[[20120509172419]]　『マクロで文字列に直接変換？』（YMO）　ページの最後に飛ぶ