[過去ﾛｸﾞ] VBAなんでも質問スレ Part2 [転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
386(1): 2017/09/22(金)22:15 ID:250/7oh7(1) AAS
え？え？日本語理解できてる？
質問には「Elseを使わずに」なんてどこにも書いてないぞ
ざっくり意訳すれば「IfとElseの数を最小に」する方法を聞いてるんだろ
387: 2017/09/23(土)06:12 ID:6cN/4Ux4(1) AAS
372のは374が書いてるように、例えば
x=1
y=1
z=3
と入れただけで誤判定する。アルゴリズムの最低限を割ってるぞ。
372がベストアンサー(笑)だと質問者が思ったなら気の毒なので念のため。
388(1): 2017/09/23(土)07:50 ID:nAanI8EG(1) AAS
そもそも計算量も最少じゃないしな
普通に
最小値 = x
If y < 最小値 Then 最小値 = y
If z < 最小値 Then 最小値 = z
ってやる方がわかりやすい
389: 2017/09/23(土)10:07 ID:hX9NlXap(1) AAS
うん、ベストアンサーはMin使った方だね。
俺だったら迷わずMin使用する。
同時にMin使わない方法も考える。
配列ループも考えた。
でも、別にIf文使っても良いんじゃない?
そんな目くじらを立てるようなことじゃない。
390: 2017/09/23(土)12:22 ID:/uotOgAp(1) AAS
>>386が分かってないバカ多すぎｗ
391: 2017/09/23(土)14:36 ID:OMtgmcpv(1) AAS
だから372はif elseだとしても最小(計算量的に)の答えにもなってないし、そもそも答えとして間違ってるって話だろ
392(1): 2017/09/23(土)17:06 ID:HTwX+3ra(1) AAS
それは勉強する奴と仕事にしてる奴のスタンスの違いだな。
仕事にしてる奴はIfを使わなきゃならないなんてことに遭遇しないから、はなっから抜けてる。
393(1): 2017/09/23(土)23:00 ID:9AVefP05(1/2) AAS
必ずIfを使う縛りなら>>388がベストアンサー
ソートアルゴリズムの最初の1回目のループを展開してるだけなんだけど、基本中の基本のやり方
394(1): 2017/09/23(土)23:28 ID:UvR7p8sn(1) AAS
>>392
if文の使い方を聞かれてmin()関数を教えるような人はプログラムを仕事にしないで欲しいのです
いえ、仕事をしないで欲しいのです
395(1): 2017/09/23(土)23:49 ID:9AVefP05(2/2) AAS
仕様書はちゃんと読んで、条件は無視しちゃいけないよね
396: 2017/09/24(日)02:12 ID:3B64fACL(1) AAS
勉強のため何が何でもIfだけで解決しなきゃいけなかったのか、
まだ初心者だからMinという便利な物があることを知らなかったのか
それによって変わってきちゃうからー
397: 2017/09/24(日)08:43 ID:LX+6AD0q(1) AAS
>>395
仕様書ならそれが正解
しかし案件定義なら顧客が何をしたいかを読み取ってより良い方法を提案することも必要
そもそも>>370にはIf使えとは書いてないし
398(1): 2017/09/24(日)09:20 ID:SDtHFGLj(1) AAS
>>394
分かってねえなあ。
勉強を教える仕事じゃないならユーザーにとって一番使いやすいとか、速度が速いとか、ユーザーが満足するようなものかどうかが大事なのであって、どんなコードじゃなければならないとかの要望は普通無い。
そして、メンテナンス性とかコードの書き方に関してもMinの方が良いとなればそもそもの問い掛け自体仕事で発生することは無い。
そして実際には、何でMinじゃ駄目なのと問い掛けられない奴は仕事の出来ない奴ということになる。
(もちろん明確に理由が有るならIfで書く。)
指示通りにしか作れない奴じゃ単なるコーダって奴になるしかない。
仕事ではMinを使わないなら明確な理由が存在するし、打ち合わせなんかのやり取りで既に意思統一されてる筈だ。
つまり今回の問い掛けのような事態は存在しない。
399: 2017/09/24(日)10:07 ID:lViLIhLn(1) AAS
>>393
だな、簡素で分かりやすく奇麗なコードだ
400(1): 2017/09/24(日)15:00 ID:3BjqQEbI(1) AAS
>>398
なんか仕事をしてる体で話してますけど
あなたの想像上の仕事では自分にとって都合の悪い事態は存在しないのですね
さぞかし楽しかろうとは思いますが
あなたは社会に出ないでください
401: 2017/09/24(日)16:46 ID:jWeMnfEt(1) AAS
>>400
仕事をしたことの無い奴には分かるまいw
402: 2017/11/08(水)05:55 ID:mrDDFdOE(1) AAS
こっちを再利用？
403: 2017/11/08(水)09:41 ID:VRSOCYqC(1/2) AAS
再利用したいけどExcelの話をしたいときに困るのかな
404: 2017/11/08(水)10:15 ID:6WBHyYXn(1) AAS
そのうち立つんじゃね
405: 2017/11/08(水)11:10 ID:JKxKdsR3(1) AAS
「Excelの話」したいんだったら総合相談所でやれ
406: 2017/11/08(水)11:59 ID:VRSOCYqC(2/2) AAS
なるほどなるほど
407: 2017/11/08(水)12:50 ID:+KUB1/9h(1/4) AAS
早速質問
今vbaでマップ使って
とある表の集計を行なっております
一つのkeyに対しアイテムが複数あるので
配列で入れようと思ったのですがうまくいきません
何か良い方法はありませんか？
408(1): 2017/11/08(水)16:45 ID:pE/cp7rq(1) AAS
もう少し具体的にどうぞ
409(1): 2017/11/08(水)21:23 ID:+KUB1/9h(2/4) AAS
>>408
一つのキーに対して複数のアイテムがある
これをどうにかこうにか出来ないか
やりたいことは
キーが重複された二次元配列を
グループ化&合計を取りたい
410(1): 2017/11/08(水)21:28 ID:aQlO1Uq5(1/4) AAS
>>409
エクセルならピボットテーブルでいいんじゃない？
411(1): 2017/11/08(水)21:32 ID:+KUB1/9h(3/4) AAS
>>410
自動で計算させるんだよ
412: 2017/11/08(水)21:33 ID:aQlO1Uq5(2/4) AAS
>>411
ピボットテーブルをvbaで作ればいい
413: 2017/11/08(水)21:38 ID:vt31E4Mm(1) AAS
エスパーじゃないんだから、もっと具体的に説明しないと、何がしたくて何ができないのか判んないよ。
そして多分だけど普通にifで分岐するプログラムを書くだけだと思う。
414: 2017/11/08(水)21:40 ID:0sSRKP/b(1/2) AAS
いや多分forでループするプログラムを書くだけだと思う
415(1): 2017/11/08(水)22:38 ID:+KUB1/9h(4/4) AAS
データシート
キー 金額a 金額b
1 10 20
2 20 50
1 30 90
結果（期待）
キー 金額a 金額b
1 40 110
2 20 50
上のような感じのシートがあって
集計かけたり
平均とったり
最大値だったりしたい
上下前次1-新書関写板覧索設栞歴
あと 587 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.017s