エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
コンボボックスに表示するデータをマクロで処理したい
Sheet2のComboBox1のMouseDownイベントプロセジュアとして Private Sub ComboBox1_MouseDown(ByVa... Sheet2のComboBox1のMouseDownイベントプロセジュアとして Private Sub ComboBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) d = Worksheets("sheet1").Range("A1").CurrentRegion.Rows.Count f = Trim(Str(d)) Sheet2.ComboBox1.ListFillRange = "sheet1!a1:a" & f End Sub として見ました。 Sheet1のA列の最下行を増やしたり減らしたりすると、その後にコンボのリストがクリックするごとに増減していることを確認しました。 d = Worksheets("sheet1").Ran