Excel VBA質問箱 IV

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

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


54032 / 76732 ←次へ | 前へ→

【27504】Modの除数をみつけるには
質問  にしもり  - 05/8/10(水) 15:03 -

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

lr = 416
Do while R<=lr
Select Case R Mod xx
Case a b c・・・
(処理1)
Case Else
(処理2)
Loop
というロジックを書いています。

Rが以下の数字のとき、処理1をしたいとおもいます。
9,13,27,31,81,85,99,103,153,157,171,175,225,229,
243,247,297,301,315,319,369,373,387,391
    
Rが以下の数字のとき、処理2にしたいと思います。        
45,49,63,67,117,121,135,139,189,193,207,211,261,        
265,279,283,333,337,351,355,405,409等

xxにどんな数字をもってくるのがいいのか、いろいろためしてもわかりません。    
a, b, c・・・にどんな数字をもってくるのがいいのかわかりません。
どうすれば早く発見できますでしょうか?
0 hits

【27504】Modの除数をみつけるには にしもり 05/8/10(水) 15:03 質問
【27513】Re:Modの除数をみつけるには 小僧 05/8/10(水) 17:33 回答
【27514】Re:Modの除数をみつけるには にしもり 05/8/10(水) 17:44 お礼
【27515】Re:Modの除数をみつけるには 小僧 05/8/10(水) 18:05 発言
【27544】Re:Modの除数をみつけるには にしもり 05/8/11(木) 12:30 お礼

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