SUB 138 昇順の解決方法

質問者が納得何度かご質問にお答えした記憶はありますが、内容はまったく覚えてません。 質問歴を拝見すると同じようなソートの質問を何度かされているよう見受けられますが、コピペで動かないとまったく応用できないという事でしょうか？ ロジック的にどうかなという気持ちもありますが、サンプルコードを UserForm_Initialize の End Select と End With の間に追加したら、とりあえず画像のようになりました。 '---省略--- End Select '----サンプル ここから--- i = 0...