Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
920 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【77529】do~loop を使った式 質問 15/10/19(月) 22:07 質問[未読]
【77530】Re:do~loop を使った式 β 15/10/20(火) 2:43 発言[未読]
【77531】Re:do~loop を使った式 β 15/10/20(火) 3:38 発言[未読]
【77529】do~loop を使った式
質問  質問  - 15/10/19(月) 22:07 -
引用なし
パスワード
   問題で悩んでいます。
ご存知でしたら教えてください


日付　　　　　　　　担当者　　　　売上
9月12日　　　　土　　　　鈴木　　　　1,014
9月13日　　　　日　　　　田村　　　　5,340
9月14日　　　　月　　　　中村　　　　7,972
9月15日　　　　火　　　　鈴木　　　　6,686
9月16日　　　　水　　　　鈴木　　　　3,935
9月17日　　　　木　　　　中村　　　　9,799
9月18日　　　　金　　　　田村　　　　1,207
9月19日　　　　土　　　　田村　　　　4,764
9月20日　　　　日　　　　中村　　　　9,703
9月21日　　　　月　　　　田村　　　　1,495
9月22日　　　　火　　　　中村　　　　3,898
9月23日　　　　水　　　　田村　　　　5,688
9月24日　　　　木　　　　鈴木　　　　9,879
9月25日　　　　金　　　　田村　　　　3,210
9月26日　　　　土　　　　中村　　　　9,998
9月27日　　　　日　　　　鈴木　　　　7,632
9月28日　　　　月　　　　鈴木　　　　3,342
9月29日　　　　火　　　　田村　　　　7,211
9月30日　　　　水　　　　田村　　　　6,995
10月1日　　　　木　　　　中村　　　　2,861


Do〜Loopステートメントを使用してください

問題1
火曜日の売上だけを合計して、セルG2に代入するマクロ

問題2
「担当者」列をチェックして、もし"鈴木"だったら
その行のA列からD列までを、赤色の文字にするマクロ
【77530】Re:do~loop を使った式
発言  β  - 15/10/20(火) 2:43 -
引用なし
パスワード
   ▼質問 さん：

これは、学校なんかの課題でしょうか？
課題であれば、その前に、授業で習っているはずで、掲示板で質問して回答されたコードを提出するのは
【インチキ】だと思うんですがねぇ。

また、学校なんかの課題でなければ、Do/Loopを使えという前提は不要で、
この処理にふさわしい組み立て（For/Next 等々）でもいいのでは？

さらにいうなら、

問題1 は G2 に数式を入れる。（必要なら、曜日をセットする作業列をつくる）
問題2 は 領域に条件付書式を設定する。

が、いいのかもしれませんよ。


>問題で悩んでいます。
>ご存知でしたら教えてください
>
>
>日付　　　　　　　　担当者　　　　売上
>9月12日　　　　土　　　　鈴木　　　　1,014
>9月13日　　　　日　　　　田村　　　　5,340
>9月14日　　　　月　　　　中村　　　　7,972
>9月15日　　　　火　　　　鈴木　　　　6,686
>9月16日　　　　水　　　　鈴木　　　　3,935
>9月17日　　　　木　　　　中村　　　　9,799
>9月18日　　　　金　　　　田村　　　　1,207
>9月19日　　　　土　　　　田村　　　　4,764
>9月20日　　　　日　　　　中村　　　　9,703
>9月21日　　　　月　　　　田村　　　　1,495
>9月22日　　　　火　　　　中村　　　　3,898
>9月23日　　　　水　　　　田村　　　　5,688
>9月24日　　　　木　　　　鈴木　　　　9,879
>9月25日　　　　金　　　　田村　　　　3,210
>9月26日　　　　土　　　　中村　　　　9,998
>9月27日　　　　日　　　　鈴木　　　　7,632
>9月28日　　　　月　　　　鈴木　　　　3,342
>9月29日　　　　火　　　　田村　　　　7,211
>9月30日　　　　水　　　　田村　　　　6,995
>10月1日　　　　木　　　　中村　　　　2,861
>
>
>Do〜Loopステートメントを使用してください
>
>問題1
>火曜日の売上だけを合計して、セルG2に代入するマクロ
>
>問題2
>「担当者」列をチェックして、もし"鈴木"だったら
>その行のA列からD列までを、赤色の文字にするマクロ
【77531】Re:do~loop を使った式
発言  β  - 15/10/20(火) 3:38 -
引用なし
パスワード
   ▼質問 さん：

ちなみにβなら

問題1　G2 に　=SUMPRODUCT((WEEKDAY(A2:A1000)=3)*(C2:C1000))

問題2 A:D列を選択して条件付書式。【数式が】=$B1="鈴木" で　書式でフォント色を赤。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
920 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free