Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7001 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【41879】%の表示について tou 06/8/24(木) 21:20 質問[未読]
【41880】Re:%の表示について かみちゃん 06/8/24(木) 21:28 発言[未読]
【41981】Re:%の表示について tou 06/8/27(日) 21:36 お礼[未読]
【41879】%の表示について
質問  tou  - 06/8/24(木) 21:20 -
引用なし
パスワード
   みなさんこんにちは。
sub keisan()
　dim i as long
　with worksheets("Sheet1")
　　　for i = 1 to 150
　　　.cells(i,29).value=.cells(i,24).value-.cells(i,16).value
　　　.cells(i,29)=format(cells(i,29),"##.##%")
　　　next
　end with
end sub

X列マイナスP列（ともに％表示）の計算結果をAC列に書き出したいと思っています。
0%という結果の場合、0.00%と表示させたいのですが
上記のコードを実行すると
.%になってしまいます。

どこを変えればよいか教えてください。
よろしくおねがいします。　
【41880】Re:%の表示について
発言  かみちゃん  - 06/8/24(木) 21:28 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>0%という結果の場合、0.00%と表示させたいのですが
>上記のコードを実行すると
>.%になってしまいます。

以下のような感じでいかがでしょうか？

Sub keisan2()
　MsgBox Format(0, "#0.#0%")
End Sub
【41981】Re:%の表示について
お礼  tou  - 06/8/27(日) 21:36 -
引用なし
パスワード
   かみちゃんさんありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
7001 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free