Excel VBA質問箱 IV

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

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


3182 / 76735 ←次へ | 前へ→

【79190】If
質問  トキノハジメ  - 17/6/11(日) 11:32 -

引用なし
パスワード
   少し教えてください。

  D
37 坂
38 53
39 24.5
40 12.3
41 36.8

上記の表にて次のようなコードを組んだのですが上手く動かないので教えてくださ
い・宜しくおねがいいたします。

'With Range("D37:D41")
    If Range("D37").Value = ("栗C") And Range("D38").Value <= 51 Or Range("D41").Value <= 51 Then
      Range("D38") = .Interior.ColorIndex = 43
      Range("D41") = .Interior.ColorIndex = 43
    ElseIf Range("D44").Value = ("美坂") And Range("D45").Value <= 55 Or Range("D48").Value <= 39 Then
      Range("D38") = .Interior.ColorIndex = 43
      Range("D41") = .Interior.ColorIndex = 43
    End If
  'End With

0 hits

【79190】If トキノハジメ 17/6/11(日) 11:32 質問[未読]
【79191】Re:If カエムワセト 17/6/11(日) 13:57 発言[未読]
【79192】Re:If トキノハジメ 17/6/11(日) 16:05 質問[未読]
【79193】Re:If マナ 17/6/11(日) 17:04 発言[未読]
【79197】Re:If トキノハジメ 17/6/11(日) 21:36 質問[未読]
【79208】Re:If マナ 17/6/14(水) 21:11 発言[未読]
【79194】Re:If カエムワセト 17/6/11(日) 17:11 発言[未読]
【79198】Re:If トキノハジメ 17/6/11(日) 21:41 質問[未読]
【79205】Re:If トキノハジメ 17/6/13(火) 19:05 質問[未読]
【79206】Re:If カエムワセト 17/6/13(火) 19:22 発言[未読]
【79207】Re:If トキノハジメ 17/6/13(火) 22:12 質問[未読]
【79271】Re:If トキノハジメ 17/6/24(土) 16:00 お礼[未読]
【79272】Re:If マナ 17/6/24(土) 16:39 発言[未読]

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