Excel VBA質問箱 IV

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

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


44997 / 76732 ←次へ | 前へ→

【36742】Re:複数の長方形における干渉をチェック...
発言  ハト  - 06/4/11(火) 18:06 -

引用なし
パスワード
   ▼こたつねこ さん:
>▼ハト さん:
>
>みなさん、こんにちは
>
>>この比較ですとBの四角形の中にAの四角形が内包されるケースがひっかかりま
>>せん
>>以下の様にしてみたらどうでしょうか?
>>  If rectB(3) < rectA(4) Or rectB(4) > rectA(3) Then
>>    f = False
>>  Else
>>    f = True
>>  End if
>>
>余計なお世話かもしれませんが・・・
>上記の条件だと、正常に判断できないと思いますよ
>
>例えば
>rectA(3)=1,rectA(4)=7
>rectB(3)=6,rectB(4)=8
>の場合
>f=True
>にならなければいけないと思うのですが
>
>rectB(3) < rectA(4)は 6<7=True
>rectB(4) > rectA(3)は 8>1=True
>True Or True=True
>
>なので
>f=False
>になりませんか?

確かにそうなんですが、
>rectA(3) = Range("G" & i) + Range("J" & i) / 2 '上
>rectA(4) = Range("G" & i) - Range("J" & i) / 2 '下
ということなんで
rectA(3) > rectA(4)
rectB(3) > rectB(4)
が条件なのでこの判断でいけると思います
3 hits

【36725】複数の長方形における干渉をチェックするマクロについて しとうと 06/4/10(月) 22:55 質問
【36728】Re:複数の長方形における干渉をチェックす... ちくたく 06/4/11(火) 10:22 発言
【36729】Re:複数の長方形における干渉をチェックす... しろうと 06/4/11(火) 10:51 発言
【36731】Re:複数の長方形における干渉をチェック... わいわい 06/4/11(火) 11:33 発言
【36733】Re:複数の長方形における干渉をチェック... ちくたく 06/4/11(火) 11:57 発言
【36738】Re:複数の長方形における干渉をチェック... ハト 06/4/11(火) 16:01 発言
【36739】Re:複数の長方形における干渉をチェック... ちくたく 06/4/11(火) 16:31 発言
【36740】Re:複数の長方形における干渉をチェック... ハト 06/4/11(火) 17:05 発言
【36747】Re:複数の長方形における干渉をチェック... ハト 06/4/12(水) 8:09 発言
【36741】Re:複数の長方形における干渉をチェック... こたつねこ 06/4/11(火) 17:41 発言
【36742】Re:複数の長方形における干渉をチェック... ハト 06/4/11(火) 18:06 発言
【36744】Re:複数の長方形における干渉をチェック... こたつねこ 06/4/11(火) 18:30 発言
【36736】Re:複数の長方形における干渉をチェックす... こたつねこ 06/4/11(火) 15:13 回答
【36745】Re:複数の長方形における干渉をチェックす... ichinose 06/4/11(火) 21:42 発言
【36746】Re:複数の長方形における干渉をチェックす... 平塚在住 06/4/11(火) 22:37 回答

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