Excel VBA質問箱 IV

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

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


6 / 12975 ツリー ←次へ | 前へ→

【79023】二つのセルの数値の判定 トキノハジメ 17/4/17(月) 14:37 質問[未読]

【79028】Re:二つのセルの数値の判定 トキノハジメ 17/4/17(月) 18:31 質問[未読]
【79029】Re:二つのセルの数値の判定 トキノハジメ 17/4/17(月) 18:32 質問[未読]
【79030】Re:二つのセルの数値の判定 β 17/4/17(月) 19:30 発言[未読]
【79032】Re:二つのセルの数値の判定 β 17/4/17(月) 21:26 発言[未読]
【79034】Re:二つのセルの数値の判定 トキノハジメ 17/4/18(火) 7:53 お礼[未読]

【79028】Re:二つのセルの数値の判定
質問  トキノハジメ  - 17/4/17(月) 18:31 -

引用なし
パスワード
   ▼トキノハジメ さん:
▼β さん:
ありがとうございます。

If Range("F37").Value <=-2 And Range("F37") >= -6 And Range("G37").Value >= 4 and Range("G37").Value <= 6 Then

Range("B30").Value = "普通 A"

上記のコードですが Then のところが 黒くなります。構文エラーです。

宜しくお願い致します。

コードを訂正いたしました。

【79029】Re:二つのセルの数値の判定
質問  トキノハジメ  - 17/4/17(月) 18:32 -

引用なし
パスワード
   ▼トキノハジメ さん:
>▼トキノハジメ さん:
>▼β さん:
>ありがとうございます。
>
>If Range("F37").Value <=-2 And Range("F37").Value >= -6 And Range("G37").Value >= 4 and Range("G37").Value <= 6 Then
>
>Range("B30").Value = "普通 A"
>
>上記のコードですが Then のところが 黒くなります。構文エラーです。
>
>宜しくお願い致します。
>
>コードを訂正いたしました。

【79030】Re:二つのセルの数値の判定
発言  β  - 17/4/17(月) 19:30 -

引用なし
パスワード
   ▼トキノハジメ さん:

不思議ですねぇ。

もし、このコードの下にちゃんと End If が記述されているなら、少なくともコンパイルエラーにはなりません。

If Range("F37").Value <= -2 And Range("F37") >= -6 And Range("G37").Value >= 4 And Range("G37").Value <= 6 Then

  Range("B30").Value = "普通 A"

End If

End If がないと、もちろんエラーですが、その時には End If が無いという明確な
メッセージになりますので、気づかれるはずで、ちゃんと End If の記述はあるのだと思います。

★コードを書き直しました ということですが、掲示板上で書き直したのですか?
 もし、そうであれば、実際のコードとは異なっているかもしれませんので、検討できません。

【79032】Re:二つのセルの数値の判定
発言  β  - 17/4/17(月) 21:26 -

引用なし
パスワード
   ▼トキノハジメ さん:

あぁ、やっぱり掲示板上で手打ちで修正されたんですね。
本物のコードなら and には なりませんから。
And になります。

本物のコードを、なぜアップされないのですか?

【79034】Re:二つのセルの数値の判定
お礼  トキノハジメ  - 17/4/18(火) 7:53 -

引用なし
パスワード
   ▼β さん:

色々ありがとうございました。お騒がせして、すみませんでした。

プログラムのコードをよく見直して打ち込み直してちゃんと動きました。

以後気をつけます。

今後とも宜しくお願い致します。

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