アフィリエイト広告を利用しています
ファン
最新記事
カテゴリーアーカイブ
日別アーカイブ

広告

posted by fanblog

2017年07月27日

ExcelVBAコンボボックス








マイクロソフトアクセスの記事はこちら

人気ブログランキングへ



にほんブログ村 IT技術ブログ ソフトウェアへ
にほんブログ村

コンボボックスのプロパティ

また「ColumuCount」=「2」をVBAでも指定できます。

ComboBox1.ColumnCount = 2という記述をすればプロパティの指定が出来ます。

やってみましょう。

前回コンボボックスのプロパティで「ColumuCount」を「2」にしましたが、「1」に戻しましょう。

Private Sub UserForm_Initialize()

ComboBox1.ColumnCount = 2


ComboBox1.AddItem

ComboBox1.List(0, 0) = "国語"

ComboBox1.List(0, 1) = 80


ComboBox1.AddItem

ComboBox1.List(1, 0) = "社会"

ComboBox1.List(1, 1) = 60


ComboBox1.AddItem

ComboBox1.List(2, 0) = "英語"

ComboBox1.List(2, 1) = 50


ComboBox1.AddItem

ComboBox1.List(3, 0) = "数学"

ComboBox1.List(3, 1) = 90

End Sub

最初にComboBox1.ColumnCount = 2という記述を追記しました。

これで通常表示にすると先ほどと同じ表示になったと思います。






次は変数を使用する方法です。

Private Sub UserForm_Initialize()

Dim hairetu(4, 2)

ComboBox1.ColumnCount = 2


hairetu(0, 0) = "国語"

hairetu(0, 1) = 80


hairetu(1, 0) = "社会"

hairetu(1, 1) = 60


hairetu(2, 0) = "英語"

hairetu(2, 1) = 50


hairetu(3, 0) = "数学"

hairetu(3, 1) = 90


ComboBox1.List() = hairetu


End Sub

上記になります。

hairetuという変数を使用して、変数内に配列を作成し、

最後にコンボボックスのリストとして変数を代入するという方法です。


このように色々な方法でリストに登録することができます。

様々な場面で一番いい方法を使用すれば良いと思います。








この記事へのコメント
コメントを書く

お名前:

メールアドレス:


ホームページアドレス:

コメント:

※ブログオーナーが承認したコメントのみ表示されます。

この記事へのトラックバックURL
https://fanblogs.jp/tb/6531098
※ブログオーナーが承認したトラックバックのみ表示されます。

この記事へのトラックバック
検索
タグクラウド
プロフィール
yoshimatsuさんの画像
yoshimatsu
60過ぎのおっちゃんです。同じ年齢層の中ではそこそこパソコンが使える方だと自負しています。今まで会社等で学んだ知識等を紹介していきたいと思います。
プロフィール
google-site-verification: google948a2bbbd2fd5164.html
×

この広告は30日以上新しい記事の更新がないブログに表示されております。