■ - ( ・ω・)ノ＜しすてむ開発。

ExcelのVBAの仕事の中で、 「現在動いているものですからサンプルに〜」 っといただいたものがあった。 コードを開いたら・・・・・・ Sub Edit_Proc2(Flg As Integer) Dim i As Long Dim j As Long Dim k As Long Dim m As Long Dim n As Long Σ(ﾟдﾟ )！？！？ ソースを開いてわずか1秒。 目の前がクラクラしました。 この後のソースを見るまでも無く断言できる。 (,,ﾟДﾟ)＜これはクサレコードだ たった7行ですが以下の状況により次のことが推測できます。 Function名が連番名になっている おそらくループカウンタが5つもある その全てが1文字変数である これらより 2より、このFunctionの行数はだいぶ長い 同じようなFunctionが複数ある サブルーチン化などされてようはずはない

[fuki1234]

アホソース晒し上げて啓蒙活動すると面白いかも。今度、アホソース見つけたら晒し上げてやる！

[fbis]

関数が連番とか。

[rxh]

泣いた。

[wata_d]

これはひどいw

[moro]

VB(A)にも多いよね、こういうの。てかちょうどいま目の前に(ry

[shin_ikety]

あるある