Excel VBA質問箱 IV

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

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


45833 / 76732 ←次へ | 前へ→

【35884】Re:任意に数字を入れて結果を求めるVBAを教えてください
回答  ちくたく WEB  - 06/3/15(水) 13:58 -

引用なし
パスワード
   うさちゃん さん
こんにちは。

実行のタイミングがわかりませんが、
A1、B1、C1に数字を入れて以下のマクロを実行しますと、
E1、E2にそれぞれ3つの数字を足した物と乗算したものが表示されます。

はずしていたらごめんなさい。

Sub test()

  Dim A As Double, B As Double, C As Double
  
  '3つの数字を
  A = Range("A1").Value
  B = Range("B1").Value
  C = Range("C1").Value
  
  'なんかの処理してふたつのセルに出す。
  Range("E1").Value = A + B + C
  Range("E2").Value = A * B * C
  

End Sub
4 hits

【35881】任意に数字を入れて結果を求めるVBAを教えてください うさちゃん 06/3/15(水) 12:11 質問
【35884】Re:任意に数字を入れて結果を求めるVBA... ちくたく 06/3/15(水) 13:58 回答
【35888】Re:任意に数字を入れて結果を求めるVB... うさちゃん 06/3/15(水) 14:57 質問
【35893】Re:任意に数字を入れて結果を求めるVB... ちくたく 06/3/15(水) 16:02 回答
【35895】Re:任意に数字を入れて結果を求めるVB... うさちゃん 06/3/15(水) 16:37 質問
【35907】Re:任意に数字を入れて結果を求めるVB... ちくたく 06/3/15(水) 18:35 発言
【35914】Re:任意に数字を入れて結果を求めるVB... うさちゃん 06/3/15(水) 21:35 質問
【35915】Re:任意に数字を入れて結果を求めるVB... やっちん 06/3/15(水) 22:15 発言
【35921】Re:任意に数字を入れて結果を求めるVB... やっちん 06/3/16(木) 0:39 発言
【35916】Re:任意に数字を入れて結果を求めるVB... ichinose 06/3/15(水) 22:17 発言
【35920】皆さん、どうもありがとうございました。 うさちゃん 06/3/16(木) 0:27 お礼
【35928】パラメータがバラバラの場合を教えてくだ... うさちゃん 06/3/16(木) 9:20 質問
【35964】Re:パラメータがバラバラの場合を教えてく... ichinose 06/3/16(木) 22:05 発言
【35979】Re:パラメータがバラバラの場合を教えてく... ちくたく 06/3/16(木) 23:48 発言
【35983】Re:パラメータがバラバラの場合を教えて... うさちゃん 06/3/17(金) 1:52 お礼
【35982】Re:パラメータがバラバラの場合を教えて... うさちゃん 06/3/17(金) 1:49 お礼

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