Blogの外観をちょいと変えてみた。また変えるかも。
さて、Windows10でExcel2010とか2013とかを使うようになって、Windows7で作ったExcelマクロのActiveXコントロール（コンボボックス）がうまく表示されないようになった。
これは困った・・・
グループ化すれば治る・・・って、治んない。
困りましたな・・・
ってことで、もうフォームコントロールに変えることにした。
面倒だわ・・・
ActiveXコントロールだと、リストの情報はマクロ上で設定すればいいのだが、フォームコントロールはリストの情報をセルに持たせて、そのセルとリンクを貼る・・・という厄介な手順を踏まなければならない。
ということで、ActiveSheet上にあるフォームコントロール「DLIST」のリストにしたい情報が、同じシートのセル「A2～A10」にあるとすると、
With ActiveSheet.Shapes("DLIST").ControlFormat
.ListFillRange = "A2:A10"
.LinkedCell = "B2"
End With
参照リストセルが別のシート(仮に「Sheet2」とする)にある場合、ListFillRange の設定をちょっと変える必要がある。
.ListFillRange = "Sheet2!A2:A10"
でも、コントロールのフォントサイズの変え方がわかんない・・・
もうヤダ。