okome36333のプロフィール

たとえば、１位～５位まで順位を成績順に決めて、賞品３つ（商品の数は毎回変動する）を１つずつ上位から分けたいのですが、vbaで上記を行うにはどう記述すればよいでしょうか。 イメージは、賞品の数が書いてあるセルがあり（上記の例では３）、そのセルの数値が０になるまで上位から分けていく、というものです。商品の数によっては当たらない人もいます。よろしくお願いします。

コンボボックスの値をＶＢＡで配列に格納したいのですが どういうコードにすればいいでしょうか？ コンボボックスの参照元を格納するのではなく、 現在コンボボックスに表示されてるデータを格納したいです。 今、 Sub test() Dim varComb As Variant varComb = ActiveSheet.ComboBox1.Value End Sub というコードを作ったのですが、 これだと「aaa」しか取得できません。 varCombに"aaa,bbb,ccc"とカンマ区切りで格納するにはどうすればいいでしょうか？ ComboBox1に表示されるデータ数を取得し、 ループさせ、 varComb = varComb & "," & ActiveSheet.ComboBox1.Value で格納していくイメージですが、コードが作れません。 よろしくお願いします。

ユーザーフォームの背景だけを 完全に透明にすることは出来ますか？ 調べてみると他のコントロールも 透明になるコードが見つかりました。 もし背景だけというのが可能であれば 回答お願いします。