Excel VBA質問箱 IV

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

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


37385 / 76738 ←次へ | 前へ→

【44521】Re:小数点以下を二桁に
発言  りん  - 06/11/20(月) 14:46 -

引用なし
パスワード
   minarai さん、こんにちわ。


>自動記録してmarikoさんに教えてもらいましたRange("H5").NumberFormatLocal = "0.00"を付け加えましたら思い通りの計算結果になりました。
これは表示上2桁(セルの書式設定で下2桁に設定)になっているだけで、数値としてはそれ以下の桁があります。

>りん さんのシンプルにしていただいたコードではコンパイルエラーになったり

コンパイルエラー?

Sub 株価オシロレータ自動計算()
  With Application.ActiveSheet
   .Range("H3").Formula = "=B3-C3"
   .Range("H4").Formula = "=D3-E3"
   .Range("H5").Formula = "=ROUND(H3/H4,2)" 'ROUNDワークシート関数で四捨五入
   .Range("H6").Formula = "=ROUND(H5*F5,2)" 'ROUNDワークシート関数で四捨五入
   'オートフィル
   .Range("H3:H6").AutoFill Destination:=.Range("H3:H34"), Type:=xlFillDefault
  End With
End Sub                 

どこでエラーになりますか?

>EXCELVBAコードが他人が開けないようにできますか。
エディタの画面で、ツール→VBAProjectのプロパティ
保護のところでパスワードを設定するといいです。

0 hits

【44487】小数点以下を二桁に minarai 06/11/18(土) 16:13 質問
【44488】Re:小数点以下を二桁に Mariko 06/11/18(土) 17:41 発言
【44489】Re:小数点以下を二桁に minarai 06/11/18(土) 21:33 お礼
【44491】Re:小数点以下を二桁に minarai 06/11/18(土) 22:30 お礼
【44493】Re:小数点以下を二桁に Mariko 06/11/19(日) 7:57 発言
【44494】Re:小数点以下を二桁に りん 06/11/19(日) 12:53 回答
【44520】Re:小数点以下を二桁に minarai 06/11/20(月) 14:14 質問
【44521】Re:小数点以下を二桁に りん 06/11/20(月) 14:46 発言
【44535】Re:小数点以下を二桁に minarai 06/11/20(月) 19:23 お礼

37385 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free